VB를 MySQL에 연결하기

Question

VB6를 MYSQL에 연결하는 방법에 대한 도움을 받고 싶습니다. 참고 문헌도 함께 제공하십시오.

많은 감사

Answer 1

링크 : http://paulbradley.tv/37/

이 코드는 MySQL의 ODBC 드라이버와 Microsoft 원격 데이터를 사용하여 Visual Basic에서 6에서 작성된 윈도우 기반 응용 프로그램에서 MySQL 데이터베이스에 연결하는 방법을 보여줍니다 개체 MySQL 데이터베이스 서버에서 레코드를 연결하고 검색하는 것은 매우 쉽습니다.

■ MySQL ODBC 드라이버를 다운로드하여 설치하십시오.

■ 모든 호스트에서 연결할 수있는 MySQL 사용자 이름과 암호 조합을 설정하십시오. MySQLs grant 명령을 참조하십시오.

■ 새 Visual Basic 프로젝트를 시작하고 Microsoft 원격 데이터 개체 추가 - 메뉴를 사용하여 프로젝트 | 참조를 클릭 한 다음 목록에서 Microsoft 원격 데이터 개체를 선택하십시오.

샘플 코드

Private Sub cmdConnectMySQL_Click() 

Dim cnMySql As New rdoConnection 
Dim rdoQry As New rdoQuery 
Dim rdoRS As rdoResultset 

' set up a remote data connection 
' using the MySQL ODBC driver. 
' change the connect string with your username, 
' password, server name and the database you 
' wish to connect to. 

cnMySql.CursorDriver = rdUseOdbc 
cnMySql.Connect = "uid=YourUserName;pwd=YourPassword; 
    server=YourServerName;" & _ 
    "driver={MySQL ODBC 3.51 Driver}; 
    database=YourDataBase;dsn=;" 
cnMySql.EstablishConnection 

' set up a remote data object query 
' specifying the SQL statement to run. 

With rdoQry 
    .Name = "selectUsers" 
    .SQL = "select * from user" 
    .RowsetSize = 1 
    Set .ActiveConnection = cnMySql 
    Set rdoRS = .OpenResultset(
      rdOpenKeyset, rdConcurRowVer) 
End With 

' loop through the record set 
' processing the records and fields. 

Do Until rdoRS.EOF 
    With rdoRS 

    ' your code to process the fields 
    ' to access a field called username you would 
    ' reference it like !username 

     rdoRS.MoveNext 
    End With 
Loop 

' close record set 
' close connection to the database 

rdoRS.Close 
cnMySql.Close 

End Sub 

Answer 2

Google은 ADO과 MySQL ODBC 드라이버를 사용할 수 있습니다 나타냅니다.

Dim strConnection$, conn As Connection 

'Fill in the placeholders with your server details' 
strConnection = "Driver={MySQL ODBC 3.51 Driver};Server=myServerAddress;" & _ 
    "Database=myDataBase;User=myUsername;Password=myPassword;Option=3" 

Set conn = New Connection 
conn.Open strConnection 

MySQL 용 ODBC 연결 문자열은 here입니다.

경고 : air code. 나는 결코 이것을 한 번도하지 않았다.