请教Dataset数据表向SQL数据库插入数据?实在没有分了?我会下次给?

szyyx 2007-10-08 03:56:05
请朋友们帮助:
主要是由DataSet中的TBR数据表全部插入到SQL数据库中的TBR表中,(SQLTBR表是空表,只有列名)但不知那里出问题了,请
各位高手帮忙看看,或者有更好的方法,小弟很感激!
Dim ds As New DataSet
Dim dt As New DataTable("TBR")
Dim oleadapt As OleDbDataAdapter = New OleDbDataAdapter
sql = "insert TBR(pt,tem,qty,pp,sp)"
oleadapt.InsertCommand = New OleDbCommand(sql, conn)
oleadapt.InsertCommand.ExecuteNonQuery()
...全文
87 6 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
szyyx 2007-10-10
  • 打赏
  • 举报
回复
有没有更好的方法呀,我就是想把DATASET的DataTable的TBR的行各列全部数据全部插入到SQL的对应表里!
JoineChoi 2007-10-10
  • 打赏
  • 举报
回复
sql = "insert TBR(pt,tem,qty,pp,sp)values('" & a "','" & b & "','" & c & "','" & "d'"

如果value是文本类型,就要用' ' 单引号括起来,就像上面那样。如果是数字型的就不用'':

sql = "insert TBR(pt,tem,qty,pp,sp)values(" & a "," & b & "," & c & "," & "d"
JoineChoi 2007-10-10
  • 打赏
  • 举报
回复
1.不使用Dataset:
dim insertString as string = "insert ……"
dim connectionString as string = "provider=……"

dim connection as new OleDbConnection(connectionString)
dim oleCommand as new oleDbCommand(insertString,connection)

connection.open()
oleCommand.ExecuteNonQuery()
connection.close()

2.如果是要把更改数据后的Dataset返回到数据库中:
(如果你只是操作一个表,用DataTable就可以了,不要认为一定要有Dataset才可以用DataTable)
dim dt as new DataTable("forUpdate")=Dataset.Tables[0].getChanges()//如果之前你用的是DataTable,就直接用DataTable.getChanges()
oleAdapter.upDate(dt);//oleAdapter是之前你用来Fill(DS)的那个Adapter
szyyx 2007-10-09
  • 打赏
  • 举报
回复
values(0,0,0,0,0)" 这里怎样才能把所有的行的值变成变量?
tiankj 2007-10-09
  • 打赏
  • 举报
回复
sql = "insert TBR(pt,tem,qty,pp,sp)values(0,0,0,0,0)"
踏平扶桑 2007-10-09
  • 打赏
  • 举报
回复
TBR表没数据吧?

16,722

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧