Background Image

FORUM

조회 수 22252 추천 수 0 댓글 4
?

단축키

Prev이전 문서

Next다음 문서

크게 작게 위로 아래로 댓글로 가기 인쇄
개발은 Visual Basic 6.0 으로 하고 있습니다

        aAdoCn.ConnectionString = "Provider = CUBRIDProvider;" & _
                                      "Data Source = " & aDataSource & ";" & _
                                      "Location = " & aIp & ";" & _
                                      "User ID = " & aUseID & ";" & _
                                      "Password = " & aPassword & ";" & _
                                      "Port = 30000;" & _
                                      "Fetch Size = 100"

다음과 같이 연결을 하고
ADO를 이용하여 조회를 하고 있는데
adors.Recordcount
adors.MoveNext 등 의 함수를 이용하면

데이터 공급자나 기타 서비스가 E_FAIL 상태를 반환했습니다 라고  에러가 발생합니다.


참고로 
            aAdoCn.ConnectionString = "driver={CUBRID Driver};" & _
                                      "server=" & aIp & ";" & _
                                       "port=33000;" & _
                                      "uid=" & aUseID & ";" & _
                                      "pwd=" & aPassword & ";" & _
                                     "db_name=" & aDataSource & ";"
이런 식으로 연결하면 정상적으로 실행이 됩니다.
  • ?
    손승일 2009.02.12 19:56
    recordset의 CursorLocation 속성의 값을 AdUseClient로 설정해보시기 바랍니다.
  • ?
    늘푸른거북이 2009.02.13 18:05
    답변 감사합니다
    CursorLocation 속성을 AdUseClient로 변경을 하였는데도 같은 에러가 발생을 하네요.
    혹시 제가 더 확인해 봐야 하는 부분이 있을까요?
  • ?
    늘푸른거북이 2009.02.13 18:05
    답변 감사합니다
    CursorLocation 속성을 AdUseClient로 변경을 하였는데도 같은 에러가 발생을 하네요.
    혹시 제가 더 확인해 봐야 하는 부분이 있을까요?
  • ?
    flypig 2009.02.12 20:36

    아래 테스트 코드를 작성하여 시험한 결과 문제 없이 작동을 하였습니다.
    기본적으로 OLEDB의 cursor location은 Server에 만들어지고 이때에 recordset의 count는 사용할 수 없습니다.
    recordset.recordcount를 사용하기 위해서는 cursor location을 클라이언트로 하고 질의를 수행해야 합니다.
    아래 코드를 참조하시기 바랍니다.
    -------------------------------------------------------------------------------------------------------------------------------------------------------------------------
    Private Sub Command1_Click()
        Dim adoConn As ADODB.Connection
        Dim adoRset As ADODB.Recordset
        Dim strConn As String
        Dim strSQL As String
       
        strConn = ""
       
        'make OLEDB connection string
        strConn = strConn & "Provider = CUBRIDProvider;"
        strConn = strConn & "Data Source = db_name;" ' database name
        strConn = strConn & "Location = server_ip;"  ' database server ip address
        strConn = strConn & "User ID = user_id;"     ' database user id
        strConn = strConn & "Password = user_passwd;" ' database user id's password
        strConn = strConn & "Port = 33000;"          ' broker port
        strConn = strConn & "Fetch Size = 100;"

        ' connect to database with ado connection object
        Set adoConn = New ADODB.Connection
        With adoConn
            .ConnectionString = strConn
            .ConnectionTimeout = 30
            .Properties("Prompt") = adPromptNever
            .CursorLocation = adUseClient ' default valuse is adUseServer
            .Open
        End With
       
        ' create SQL statement and run the SQL
        strSQL = " select client_id, client_name from css_client where rownum < 101 "
       
        Set adoRset = adoConn.Execute(strSQL, , adCmdText)
       
        If adoRset.EOF Then
            MsgBox "No data found...", vbInformation + vbOKOnly, "Notify"
           
            If Not adoRset Is Nothing Then
                adoRset.Close
                Set adoRset = Nothing
            End If
            Exit Sub
        End If
        ' display select record count
        MsgBox adoRset.RecordCount, vbInformation + vbOKOnly, "notify"
       
        ' display data on spread sheet
        With vaSpread1
       
            While Not adoRset.EOF
                .MaxRows = .MaxRows + 1
                .Row = .MaxRows
               
                .Col = 1
                .Text = adoRset(0)
               
                .Col = 2
                .Text = adoRset(1)
               
                adoRset.MoveNext
            Wend
        End With
       
    End Sub


List of Articles
번호 제목 글쓴이 날짜 조회 수
공지 CUBRID 사용자를 위한 DBeaver 도구 출시 안내 admin 2024.04.23 68
공지 SQLGate for CUBRID 영구 무료 라이선스 제공 file admin 2020.04.09 4465
1299 MyBatis에서 clob 데이터 이상현상 문의 권태성 2017.11.08 717
1298 DB복구 3 hoon 2017.11.08 1028
1297 DB내보내기에서 스키마 파일 문의드립니다 3 qswaert 2017.11.08 588
1296 날짜시간 함수를 조건 절에서 어떻게 처리하는지 궁금해서요 1 펌피 2017.11.08 4761
1295 DB복구 질문드립니다. 7 hoon 2017.11.09 933
1294 CUBRID 10.1 64bit LINUX 다운이 안되네요 1 뿡뿌이다네 2017.11.09 153
1293 Upgrading From CUBRID 2008 R4.1/R4.3/R4.4 To CUBRID 10.1 시 문의사항 3 뿡뿌이다네 2017.11.09 129
1292 트리거 작성 도중 알 수 없는 오류가 발생했습니다. 1 코코밥 2017.11.09 342
1291 사용하던 view 가 갑자기 사라지는 현상 1 coolkkm 2017.11.13 162
1290 큐브리드 설치 후 디비 서버 시작 실패 3 뿡뿌이다네 2017.11.13 486
1289 큐브리드 10.1.0 PHP driver 확인 1 뿡뿌이다네 2017.11.13 197
1288 CUBRID 10.1 LIST Partition 생성 오류 2 종이 2017.11.14 406
1287 DB 이전관련 질문 드립니다. 1 hoon 2017.11.14 464
1286 CUBRID Manager 영문버전 제공여부 2 bikehee 2017.11.14 166
1285 DB 이전 문제 문의 드립니다. 3 hoon 2017.11.15 390
1284 연계과정에서 질문드릴게있습니다. 1 qswaert 2017.11.16 165
1283 UPPER 를 이용한 like 검색 과 한글 문제 1 akasima 2017.11.16 1709
1282 clob에서 varchar(1073741823) 으로 변경된 테이블 조회시 오래걸리는 현상 4 최범규 2017.11.17 1038
1281 DB연계과정에서 에러코드 발생되어 문의 드립니다. 1 file kik 2017.11.20 347
1280 쿼리 조회시 인덱스를 타지 않고 full scan 으로 나오는 경우 질문드립니다. 3 file 덴드로비움 2017.11.20 4355
Board Pagination Prev 1 ... 131 132 133 134 135 136 137 138 139 140 ... 200 Next
/ 200

Contact Cubrid

대표전화 070-4077-2110 / 기술문의 070-4077-2113 / 영업문의 070-4077-2112 / Email. contact_at_cubrid.com
Contact Sales