0

can u give me a module code for connection
i am using mysql
table: list1
database: database1
username: root
password: N/A

Edited by Shodow: n/a

3
Contributors
2
Replies
3
Views
6 Years
Discussion Span
Last Post by AndreRet
0

As per your previous post -

Public Sub ServerConnect()
 
Dim conn As ADODB.Connection
Dim strIPAddress As String
 
Set conn = New ADODB.Connection
strIPAddress = '###Add the ip address here!!!
 
conn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" _
            & "SERVER=" & strIPAddress & ";" _
            & "DATABASE=ADMS;" _ 'The database name here to connect to!!!
            & "UID=root;" _ 'In 99% it is the root as UID, unless you have specified a different name when you installed MySql!!!
            & "PWD=;" _ 'Here the password is empty, add password if you have set it when you have installed MySql. It is always good to have a password set!!!!
            & "OPTION=" & 1 + 2 + 8 + 32 + 2048 + 16384 'Is all options enabled, add, delete, edit, photo blobs etc.!!!
 
conn.CursorLocation = adUseClient
conn.Open
End Sub

Please mark this as solved, we will be concentrating on the other post. For other members reading this, the other post can be found HERE.:)

This topic has been dead for over six months. Start a new discussion instead.
Have something to contribute to this discussion? Please be thoughtful, detailed and courteous, and be sure to adhere to our posting rules.