vb 操作mysql添加记录和查询记录
如何用VB6.0添加一个记录到MYSQL数据库,我数据库名称是account2表是account,添加text1.text到name里面,添加text2.text到pas...
如何用VB6.0添加一个记录到MYSQL数据库,我数据库名称是account2 表是account,添加text1.text到name里面,添加text2.text到password里面,最好带上注解啊,我菜啊。
展开
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
可以了
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
可以了
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询