VB 保存数据

来源:百度知道 编辑:UC知道 时间:2024/05/24 13:14:39
请问我在窗体上放三个文本框(text1、text2、text3)、command1,我该怎么做才能把这三个文本框中的数据保存到SQL数据库中或其它数据库中?因本人初学VB时间不长,希望各位兄台能把代码写清,最好有源码,谢谢!
为你们两个的回答都没有通过呢?不可以啊!!!!

'设置个保存按钮:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim aa, bb, cc,strSql As String
aa= textbox1.Text
bb= textbox2.Text
cc= textbox3.Text
strSql = "insert into TableName Values(?,?,?)"
'插入数据
Dim cn As New OleDbConnection("Provider = SQLOLEDB.1;Data Source=localhost;Initial Catalog = 数据库名;User ID = sa;Password=;")
cn.Open()
Dim cmd As New OleDbCommand(strSql, cn)
cmd.Parameters.Add(New OleDbParameter("列名1", OleDbType.VarChar, 50))
cmd.Parameters.Add(New OleDbParameter("列名2", OleDbType.VarChar, 50))
cmd.Parameters.Add(New OleDbParameter("列名3", OleDbType.VarChar, 50))
cmd.Parameters("列名1").Value = aa
cmd.Parameters("列名2").Value = bb
cmd.Parameters(&qu