Question

如何使用VB连接MySQL数据库?

在VB上建立个text1和texe2（text1为帐号 Texe2为密码)和个按钮

在Text1和Text2里输入帐号密码并点击按钮。VB开始连接Mysql数据库
(Mysql数据库IP为127.0.0.1 端口3306 数据库名 abc 表名为 USER
值为User 和PASS) 验证Texe1与User，Text2与PASS的数值是否一样，一样则允许打开Form2,不一样则不允许，在打开Form2时Form1自动隐藏.
跪求

Answer 1

最简单的办法是：在VB里添加一个ADO部件，将其放到窗体中，然后右键选择属性，在其属性页的下面有个生成连接字符串的项，点击其后的按钮，然后一步步的来做（很简单的），然后连接字符串就会在那里生成，只要拷贝这个字符串，就可以用ADODB来连接了。。。

Answer 2

strCNN = "provider=sqloledb.1;integrated security=sspi;persist security info=false;initial catalog= abc ;data source=(local)" 'SQL Server

添加adodc 控件

Dim Op As New ADODB.Recordset

If (Text1.Text = "" Or Text2.Text = "") Then
MsgBox ("请将信息输入完整！"), vbOKOnly + vbExclamation + vbDefaultButton1, "警告信息"
Else
strCNN = "select * from abc where USER ='" & Text1.Text & "'and PASS='" & Text2.Text & "'"
Op.Open strCNN, MyCNN
If Op.EOF = True Then
MsgBox "您输入的用户名或密码错误！", vbOKOnly + vbCritical + vbDefaultButton1, "重新填写！"
Text2.Text = ""
Text2.SetFocus
Else
Load form2 '或者 form2.show
Me.Hide
End If
End If
End Sub