VB.net 中与 access 连接 update 怎么用?

时间:2021-11-07 15:39:16
是这样的,我想用VB.net 做一个小程序。
我用的是access 数据库。
insert 语句可以用,可是我现在想更新,就是改access中某一行的一个记录。
用update,可是运行时它老是报错,说什么什么.dll的什么出错什么的。
是怎么回事呀,谁知道怎么做的呀?

11 个解决方案

#1


如果报Dll错应该不是Sql语句语法的问题了。

#2


那是什么问题呀,
能帮我做下试试看吗?
就一个表,
把里面任何一个记录update了就行。
谁做过把代码发过来,感激体力涕淋

#3


        Dim cmd As OleDbCommand
        Dim selectCmd As String

        selectCmd = " update config set "

        selectCmd = selectCmd & " KNTType=" & TextBoxKNTType.Text

        selectCmd = selectCmd & " where id=22"

        cmd = New OleDbCommand(selectCmd, conn)

        cmd.ExecuteNonQuery()

#4


把代码和错误都贴出来看看

#5


Dim cmd As OleDbCommand 
        Dim selectCmd As String 

        selectCmd = " update config set " 

        selectCmd = selectCmd & " KNTType=" & TextBoxKNTType.Text 

        selectCmd = selectCmd & " where id=22" 

        cmd = New OleDbCommand(selectCmd, conn) 

        cmd.ExecuteNonQuery()

这样是可以的。

#6


这丙个语句差别不大的啊.

#7


Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Me.OleDbConnection1.Open()
        Me.OleDbDataAdapter1.UpdateCommand.Connection = Me.OleDbConnection1
        Me.OleDbDataAdapter1.UpdateCommand.CommandText = String.Format("update cx set (入帐日期,入帐租金) values('{0}','{1}') where ID='{2}'", Me.TextBox5.Text, Me.TextBox2.Text, Me.TextBox9.Text)
        Me.OleDbDataAdapter1.UpdateCommand.ExecuteNonQuery()
        Me.OleDbConnection1.Close()
    End Sub


我是这样写的,不行。
你们上面讲的,我不知道怎么连数据库呀。
我只会这样!
你们看看我这是怎么搞的,。

#8


还有没有人知道呀,我给分的。
就是倾家荡产也行。

#9


搞定了,是这样的,
把update cx set (入帐日期,入帐租金) values('{0}','{1}') where ID='{2}'
改成update cx set 入帐日期='{0}',入帐租金='{1}' where ID='{2}'
就OK了,原来这么简单呀,我没想到,一开始,现在OK了!

#10


update cx set (入帐日期,入帐租金) values('{0}','{1}') where ID='{2}' 
数据库的插入 和更新 都没有对口,如何对呢 汗

#11


数据类型不对称也可能出现这个错误

#1


如果报Dll错应该不是Sql语句语法的问题了。

#2


那是什么问题呀,
能帮我做下试试看吗?
就一个表,
把里面任何一个记录update了就行。
谁做过把代码发过来,感激体力涕淋

#3


        Dim cmd As OleDbCommand
        Dim selectCmd As String

        selectCmd = " update config set "

        selectCmd = selectCmd & " KNTType=" & TextBoxKNTType.Text

        selectCmd = selectCmd & " where id=22"

        cmd = New OleDbCommand(selectCmd, conn)

        cmd.ExecuteNonQuery()

#4


把代码和错误都贴出来看看

#5


Dim cmd As OleDbCommand 
        Dim selectCmd As String 

        selectCmd = " update config set " 

        selectCmd = selectCmd & " KNTType=" & TextBoxKNTType.Text 

        selectCmd = selectCmd & " where id=22" 

        cmd = New OleDbCommand(selectCmd, conn) 

        cmd.ExecuteNonQuery()

这样是可以的。

#6


这丙个语句差别不大的啊.

#7


Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Me.OleDbConnection1.Open()
        Me.OleDbDataAdapter1.UpdateCommand.Connection = Me.OleDbConnection1
        Me.OleDbDataAdapter1.UpdateCommand.CommandText = String.Format("update cx set (入帐日期,入帐租金) values('{0}','{1}') where ID='{2}'", Me.TextBox5.Text, Me.TextBox2.Text, Me.TextBox9.Text)
        Me.OleDbDataAdapter1.UpdateCommand.ExecuteNonQuery()
        Me.OleDbConnection1.Close()
    End Sub


我是这样写的,不行。
你们上面讲的,我不知道怎么连数据库呀。
我只会这样!
你们看看我这是怎么搞的,。

#8


还有没有人知道呀,我给分的。
就是倾家荡产也行。

#9


搞定了,是这样的,
把update cx set (入帐日期,入帐租金) values('{0}','{1}') where ID='{2}'
改成update cx set 入帐日期='{0}',入帐租金='{1}' where ID='{2}'
就OK了,原来这么简单呀,我没想到,一开始,现在OK了!

#10


update cx set (入帐日期,入帐租金) values('{0}','{1}') where ID='{2}' 
数据库的插入 和更新 都没有对口,如何对呢 汗

#11


数据类型不对称也可能出现这个错误