[비베] 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 연동 강좌는 끝 !
댓글목록 0
등록된 댓글이 없습니다.