update无法找到tablemapping['table']或datatable"table"

我做的一个vb程序,想实现添加一条数据,datagrid里面就显示出这条新加的数据代码如下DimaccstrAsStringolecmd.Connection=conno... 我做的一个vb程序,想实现添加一条数据,datagrid里面就显示出这条新加的数据
代码如下
Dim accstr As String
olecmd.Connection = conn
olecmd.CommandText = "select * from chengji "
adocmd.SelectCommand = olecmd
adocmd.Fill(ds, "chengji")
Try
conn.Open()
If (datacheck(TextBox2.Text)) = True Then
MsgBox("该学号已被使用!!!")
Exit Sub
End If
accstr = "insert into chengji values('" & TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text & "','" & TextBox4.Text & "','" & TextBox5.Text & "','" & TextBox6.Text & "')"

olecmd.CommandText = accstr
olecmd.Connection = conn
olecmd.ExecuteNonQuery()
MsgBox("添加成功!!!!")
adocmd.Update(ds)
Catch ex As Exception
MsgBox(ex.Message)
Finally
conn.Close()

End Try
Try

Dim changeds As DataSet = ds.GetChanges
adocmd.Update(changeds, "chengji")
ds.AcceptChanges()
Catch ex As Exception
MsgBox(ex.Message)

End Try
请指点。
展开
 我来答
可爱芙蓉小小
2008-12-06
知道答主
回答量:21
采纳率:0%
帮助的人:0
展开全部
mdvosmk;hhijnajnxalm ,zx mlzk:;lungnxjknka
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式