[비베] VB + MYSQL 연동하기 [ODBC 3.51]

일딴 기본적으로 odbc 3.51 를 설치 하고 설정 을 해주세요 !

설치및설정법

 

그리고 나서 이제 비베 exe 프로젝트를 만들어서

 

프로젝트->참조->MicroSoft ActiveX Data Objects 2.8 library 를 참조 해줍시다

 

그리고 나서 이제 시작입니다 !

 

소스창을 오픈해서

 

Public db As New ADODB.Connection

Public sql As String

 

맨위에 선언 해줍니다 db는 데이터 연결 변수고 sql 은 쿼리문 작성할때 사용할 변수입니다.

 

 

그리고 바로 밑에다가

 

Private Sub Form_Load()

db.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" & _

                          "SERVER=localhost;DATABASE=SourceDB;" & _

                          "UID=root;PWD=root; OPTION=16427;" & _

                          "STMT= set names euckr"

db.ConnectionTimeout = 30

db.Mode = adModeReadWrite

db.Open

End Sub

 

를 적어줍니다

 

여기서 db.ConnectionString은 mysql 의 연결이고 ConnectionTimeout은 타임아웃 시간을 설정하는겁니다

Mode는 데이터 사용 방식을 설정 하는것이고

Open은 이제 mysql 를 사용한다는 뜻입니다.

 

 

자이렇게 하면 mysql 연결은 완료입니다

 

이제 sql 문을 활용 해볼까요 ?

 

 

데이터 1	데이터 2	데이터 3
A	B	C
1	2	3

 

 

 

이런식으로 sql 의 데이터가 있다면

 

저는 데이터1 의 모든 값을 가져와 보도록 하겟습니다

 

일딴 sql 에다가 쿼리문을 넣어줘야 겟죠 ?

(스키마 이름은 testDB)

sql="select * from testDB where 데이터1"

이렇게 하면 데이터 1에 있는 곳의 데이터1를 뽑아옵니다

 

그리고 나서

Set Rs = New ADODB.Recordset

 

여기서 RecordSet 이무엇인지 궁금하실텐데요

리코더셋은 쿼리의 데이터를 사용 하는것입니다

 

Rs(1) 이렇게 배열형식이며 Rs(0) -> 데이터1 를 가리킵니다

 

다음엔

Rs.Open sql,db

 

리코더셋 을 사용할수 있게해주는 것이죠

 

이제 와일문을 사용할것입니다

do while not rs.eof

 

rs가 끝이 아닐때 까지 계속 실행한다라는 뜻입니다 (eof 파일의끝 )

 

그리고 msgbox rs(0)

을 적은뒤에

rs.MoveNext 를 적어줍니다

 

MoveNext 는 다음 칸으로 간다는 뜻입니다 꼭 적어줘야 합니다 !

MoveNext 말고도 다른 속성도 있습니다 (검색 ! 표로 정리된게 있는데 올리기 귀 ㅋ 찬 ㅋ )

 

마지막에 while문을 장식할 loop 을 적어줍니다

 

그리고 실행을 하게 되면

 

데이터 1에 있는 A 와 1이 출력 될껍니다

 

이것으로 mysql 연동 강좌는 끝 !