请教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()
...全文
67 点赞 收藏 6
写回复
6 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
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表没数据吧?
回复
相关推荐
发帖
VB
创建于2007-09-28

1.6w+

社区成员

VB技术相关讨论,主要为经典vb,即VB6.0
申请成为版主
帖子事件
创建了帖子
2007-10-08 03:56
社区公告
暂无公告