문제. 운행관리폼에서 txt행선지 컨트롤에 표시된 행선지와 같은 레코드의 개수를 표시하는 메시지 박스를 표시할 것
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.cursorlocation = aduseclient
rs.activeconnection = CurrentProject.Connection
rs.Open "select * from 운행관리 where 행선지 = '" & txt행선지 & "'"
MsgBox "행선지가 " & [행선지] & "인 개수는 : " & rs.RecordCount
rs.Close
이 식에서 빨간 부분의 역할은 무엇인가요?
전에 본적없는 구문이어서요.
개수를 세기 위한 작업인가요? 어떤 의미인지 잘 모르겠습니다.
책의 해설에는 '레코드의 현재 위치를 클라이언트로 이동시킨다.'라고 나와있는데
이 말 자체를 이해못하겠습니다.
rs.CursorLocation = adUseClient : CursorLocation(레코드의 현재 위치)는 기본적으로 Server(서버)에 위치하는데,
이를 Client(클라이언트)로 이동시키는 것입니다.
CursorLocation을 Client로 설정해야 레코드의 개수를 정상적으로 표시할 수 있습니다.
그렇지 않으면 레코드 개수가 -1로 표시됩니다.
좋은 하루 되세요.
-
*2017-08-02 20:58:09
rs.CursorLocation = adUseClient : CursorLocation(레코드의 현재 위치)는 기본적으로 Server(서버)에 위치하는데,
이를 Client(클라이언트)로 이동시키는 것입니다.
CursorLocation을 Client로 설정해야 레코드의 개수를 정상적으로 표시할 수 있습니다.
그렇지 않으면 레코드 개수가 -1로 표시됩니다.
좋은 하루 되세요.