从vb程序插入查询不会在access数据库中添加任何记录。
database connection class-->
Imports System.Data.OleDb
Public Class Data
Shared dbconnection As OleDbConnection
Shared dbcommand As OleDbCommand
Shared dbadapter As OleDbDataAdapter
Shared connectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\DELL\Documents\Visual Studio 2013\Projects\Chakana saving and credit\Chakana saving and credit\Chakana.mdb"
Shared dbtable As DataTable
Public Shared Function loadData(query As String, Optional ReturnValue As Boolean = False)
dbconnection = New OleDbConnection(connectionString)
dbadapter = New OleDbDataAdapter
dbtable = New DataTable()
dbcommand = New OleDbCommand(query)
dbcommand.CommandType = CommandType.TableDirect
dbadapter.SelectCommand = dbcommand
dbadapter.SelectCommand.Connection = dbconnection
dbconnection.Open()
'MsgBox("query lexecute")
If ReturnValue = True Then
dbadapter.Fill(dbtable)
Return dbtable
Else
Return 0
End If
End Function
下课
函数调用传递参数查询
query = "INSERT INTO CustomerInfo (ClientId,FirstName) VALUES ('23','abce')"
Data.loadData(query)
对传递 SELECT 查询的函数的其他调用工作正常,但是当我尝试插入查询并随后从访问中打开数据库时,它没有结果
最佳答案
查看 OleDbTransaction.Commit Method ()和 DbDataAdapter.Update Method它展示了如何在连接中打开和提交事务。
关于mysql - SQL插入没有结果,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/34655564/