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 52
공지 SQLGate for CUBRID 영구 무료 라이선스 제공 file admin 2020.04.09 4458
1195 attempt to divide by zero .. 조회문제 도와주세요 1 file 아프월 2023.02.07 270
1194 asp.net 의 oledb 연동 3 webdoors 2009.01.04 38313
1193 asp.net 윈도우즈 설치 문의 3 shblitz 2011.12.29 14673
1192 asp.net ibatis connection string is null 1 noy 2020.02.04 680
1191 asp 에서 olddb driver 사용시 parameter 문제 4 file 데베안 2012.10.10 7661
1190 asp 레퍼런스가 있나요? 1 바다왕자님 2010.01.21 10357
1189 asp oledb로 연결해서 사용시 1 슈퍼뚱땡이 2016.03.08 8948
1188 asc, desc 기능 존재 여부와 sort 속도. 1 아장아장 2009.09.08 14420
1187 archive log 삭제 관해서 3 알칸펠 2013.11.08 11978
1186 app interface 에 관해서 1 hellower 2009.08.27 8563
1185 alter로 테이블 구조 변경 3 장이 2012.02.06 11534
1184 alter 시 오류 메세지 1 김성일컴퍼니 2013.08.06 8909
1183 alter 시 오류 (화면캡쳐) 1 file 김성일컴퍼니 2013.08.06 7183
1182 alter 문 관련 질문 1 gkdydejr 2015.10.06 5428
1181 alter table add constraint foreign key 문의 1 dasomoh 2020.07.28 1501
1180 alter MODIFY 실행시 오류 1 봉수비어 2017.10.11 419
1179 alias 명 한글 깨짐 2 abc12 2018.08.13 54083
1178 aix에 cubrid 설치 시 오류 1 김개미 2017.11.23 337
1177 ado.net에서 insert query 문 1 바람바람 2012.11.07 8871
1176 ado.net 사용하여 테스트중인데 오류 발생하여 문의 남깁니다 3 file 제무다 2018.06.29 441
Board Pagination Prev 1 ... 136 137 138 139 140 141 142 143 144 145 ... 200 Next
/ 200

Contact Cubrid

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