作者iversonjimmy ()
看板Visual_Basic
标题[.NET] 请问有关VB2005连MySQL的问题
时间Mon May 11 21:31:44 2009
请输入专案类型(网站专案或者应用程式专案): 关於书籍管理系统
因为系上的资料是用MySQL的方式,
所以开发这套书籍管理系统,必须和MySQL相容。
现在遇到一个麻烦
如果要去做比对资料是否有没有存在的话,执行没有问题。
程式码如下
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
'Dim dbconn1 As System.Data.SqlClient.SqlConnection
'Dim dbcmd1 As SqlClient.SqlCommand
dbcmd = New MySqlCommand("select * from user_info where stdID='" &
TextBox3.Text & "'", dbconn)
dbadapter = New MySqlDataAdapter(dbcmd)
User_infoDataSet.Clear()
dbadapter.Fill(User_infoDataSet, "user_info")
If User_infoDataSet.Tables.Item(0).Rows.Count = 1 Then '登入成功
Label4.Text = "有这个使用者"
Else
Label4.Text = "没有这个使用者"
End If
End Sub
但若要做新增 更新 删除的动作,就会有bug出现
例如新增的程式码下
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button2.Click
'资料库资料的新增
dbcmd = New MySqlCommand("insert into user_info(name, year, stdID)
values ('" & TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text &
"', dbconn")
dbadapter = New MySqlDataAdapter(dbcmd)
User_infoDataSet1.Clear()
dbadapter.Fill(User_infoDataSet1, "user_info")
End Sub
错误都会发生在dbadapter.Fill(User_infoDataSet1, "user_info")这行
不好意思,文章有点长,
请问大家,我哪个步骤就有问题了呢???
--
http://www.wretch.cc/album/iversonjimmy
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.130.189.30
1F:推 dichia:你如果要执行新增修改删除 应该要用的是 05/14 00:56
2F:→ dichia:dbcmd.ExecuteNonQuery() 05/14 00:57