액세스 기본모의고사 2회 문제 4번의 4 질문입니다.
ado개체를 이용하여 msgbox를 나타내라고 하는데요
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 구문은 왜 들어간건가요? 처음보는 지문이라 이해가 안되네요
그리고 Msgbox "행선지가 " & txt행선지 & "인 개수는 : " ~~ 이라고 하지 않고 txt행선지가 아닌 [행선지]를 입력한 이유도 알려주세요.
안녕하세요.
1.
폼이 실행된 상태에서 어떤 컨트롤을 클릭하냐에 따라 값이 달라져야 하는 경우에는 'rs.cursorLocation = adUseClient를 사용한다고 보시면 됩니다.
rs.CursorLocation = adUseClient : CursorLocation(레코드의 현재 위치)는 기본적으로 Server(서버)에 위치하는데,
이를 Client(클라이언트)로 이동시키는 것입니다.
CursorLocation을 Client로 설정해야 레코드의 개수를 정상적으로 표시할 수 있습니다.
2.
txt행선지로 하셔도 동일한 결과가 나오긴 합니다.
사용하셔도 되구요.
txt행선지에 표시되는 내용은
폼의 컨트롤 원본인 운행관리 쿼리의 '행선지' 필드의 내용입니다.
그래서 해설에서는 컨트롤 원본에서 데이터를 가져온 것입니다.
좋은 하루 보내세요.
-
관리자2019-02-12 22:20:08
안녕하세요.
1.
폼이 실행된 상태에서 어떤 컨트롤을 클릭하냐에 따라 값이 달라져야 하는 경우에는 'rs.cursorLocation = adUseClient를 사용한다고 보시면 됩니다.
rs.CursorLocation = adUseClient : CursorLocation(레코드의 현재 위치)는 기본적으로 Server(서버)에 위치하는데,
이를 Client(클라이언트)로 이동시키는 것입니다.
CursorLocation을 Client로 설정해야 레코드의 개수를 정상적으로 표시할 수 있습니다.
2.
txt행선지로 하셔도 동일한 결과가 나오긴 합니다.
사용하셔도 되구요.
txt행선지에 표시되는 내용은
폼의 컨트롤 원본인 운행관리 쿼리의 '행선지' 필드의 내용입니다.
그래서 해설에서는 컨트롤 원본에서 데이터를 가져온 것입니다.
좋은 하루 보내세요.