부탁드립니다. ^^
FORUM
2009.08.10 20:21
큐브리드DB와 비주얼베이직6.0을 연동하는 방법좀 부탁드려요
조회 수 12920 추천 수 0 댓글 2
-
?
소스를 작성하여 알려드리겠습니다. 조금만 기다려주세요.
-
?
간단하게 아래와 같이 사용 가능합니다.
OLE DB를 이용한 방법이구요.
Dim Conn As ADODB.Connection 'DB Connection 변수
Dim rs As ADODB.Recordset '결과 Recordset 변수
Dim connStr As String 'OLE DB Provider 변수
Set Conn = New ADODB.Connection
'Location에는 DB IP주소, Source는 DB명(기본 demodb), ID는 DB user명(기본 dba, public), Port는 브로커 포트(기본 30000 또는 33000)를 적어줍니다.
connStr = "Provider=CUBRID OLE DB Provider;Location=localhost;Data Source=demodb;User ID=dba; Port=33000;Fetch Size=100"
Conn.ConnectionString = connStr
'DB 연결
Conn.Open
Dim selectSQL As String
selectSQL = "SELECT * FROM code"
'sql 쿼리 수행
Set rs = Conn.Execute(selectSQL)
'DB 연결 해제
Conn.Close
간단한 입출력 및 수정, 삭제는 인터넷에 잘 나와있으니 참고 바랍니다^^
