Question

vb 操作mysql添加记录和查询记录

如何用VB6.0添加一个记录到MYSQL数据库，我数据库名称是account2 表是account,添加text1.text到name里面，添加text2.text到password里面，最好带上注解啊，我菜啊。

Answer 1

首先你要在工程部件里引用一个ADO Data Control 2.0控件，拖到窗体上
Private Sub Command1_Click()
Adodc1.ConnectionString = "Driver={SQL Server};Server=MYSQL;DataBase=account2"
Adodc1.RecordSource = "SELECT *FROM account"
Adodc1.Refresh
Adodc1.Recordset.AddNew
'---------------------------添加新记录
Adodc1.Recordset.Fields("name") = Me.Text1
Adodc1.Recordset.Fields("password") = Me.Text2
Adodc1.Recordset.Update
'-------------------------恢复初始设置
Me.Text1 = ""
Me.text2 = ""
me.text1.SETFOCUS
End Sub
可以了