Background Image
조회 수 26917 추천 수 0 댓글 0
?

단축키

Prev이전 문서

Next다음 문서

크게 작게 위로 아래로 댓글로 가기 인쇄 첨부

적용 환경

Microsoft Visual Studio 6.0

ODBC 설정하기

다음의 FAQ를 참조한다.

http://www.cubrid.com/zbxe/57833

샘플코드

샘플코드 작성

아래와 같이 샘플 코드를 작성한다.

아래 코드는 OLEDB를 이용한 소스이며 ODBC를 이용하기 위해서는 OLE DB 드라이버 연결 부분을 주석처리하고 ODBC 드라이버 연결 부분의 주석을 삭제한다.

Private Sub Command1_Click()

 

    Dim Conn As New ADODB.Connection

    Dim cmd As New ADODB.Command

    Dim rs As New ADODB.Recordset

    Dim strConn As String

   

    'ODBC드라이버 연결

    'strConn = strConn & "driver={CUBRID Driver};"

    'strConn = strConn & "server=localhost;"

    'strConn = strConn & "port=33000;"

    'strConn = strConn & "uid=dba;"

    'strConn = strConn & "pwd=;"

    'strConn = strConn & "db_name=demodb;"

 

    'OLE DB 드라이버 연결

    strConn = strConn & "Provider = CUBRIDProvider;"

    strConn = strConn & "Data Source = demodb;"

    strConn = strConn & "Location = localhost;"

    strConn = strConn & "User ID = dba;"

    strConn = strConn & "Password =;"

    strConn = strConn & "Port = 33000;"

    strConn = strConn & "Fetch Size = 100;"

    strConn = strConn & "Persist Security Info = True;"

 

    Set Conn = New ADODB.Connection

    With Conn

      .ConnectionString = strConn

      .Open

    End With

 

    With cmd

        .ActiveConnection = Conn

        .CommandText = "SELECT * FROM code;"

        .CommandType = adCmdText

    End With

 

    With rs

        .Open cmd

    End With

   

    List1.Clear

    If Not rs.EOF Then rs.MoveFirst

    Do While Not rs.EOF

        List1.AddItem rs.Fields(0) & ", " & rs.Fields(1)

        rs.MoveNext

    Loop

  

    Conn.Close

   

    Set Conn = Nothing

    Set cmd = Nothing

    Set rs = Nothing

End Sub

컨트롤 추가

Form에 아래 그림과 같이 CommandButton ListBox를 추가한다.

1.PNG

컴파일 오류가 발생시 해결 방법

아래와 같은 에러가 발생하면 메뉴 > 프로젝트 > 참조 > Microsoft ActiveX Data Objects 2.0 Library를 추가한다.

2.PNG

3.PNG

샘플 코드 실행 결과

 4.PNG

 


List of Articles
번호 분류 제목 글쓴이 날짜 조회 수
» ODBC/OLEDB VB에서 CUBRID ODBC/OLEDB 사용하는 방법 및 샘플코드. file seongjoon 2012.06.30 26917
3 ODBC/OLEDB Vista_IIS_CUBRID_ASP연동 janus 2010.01.31 24553
2 ODBC/OLEDB QTADO를 이용하여 CUBRID접속하기 file cubebridge 2009.12.10 21489
1 ODBC/OLEDB ODBC드라이버를 이용한 2개 이상의 Statement 사용방법. file seongjoon 2009.07.02 23643
Board Pagination Prev 1 Next
/ 1

Contact Cubrid

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