要向Access数据库添加记录,首先要确保已经连接到数据库。使用ADO.NET库提供的OleDbConnection对象创建连接,并打开连接。
然后,创建一个INSERT INTO语句,用于向表中插入新记录。指定表名和要插入的字段,以及对应的值。
最后,使用OleDbCommand对象执行INSERT语句,并关闭连接。
下面是一个示例代码:
Imports System.Data.OleDb
Public Sub AddRecordToAccessDatabase()
' 连接字符串
Dim connectionString As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\path\to\database.accdb"
' 创建连接对象
Using connection As New OleDbConnection(connectionString)
' 打开连接
connection.Open()
' 创建INSERT语句
Dim insertQuery As String = "INSERT INTO TableName (Field1, Field2) VALUES (@Value1, @Value2)"
' 创建命令对象
Using command As New OleDbCommand(insertQuery, connection)
' 设置参数值
command.Parameters.AddWithValue("@Value1", "Value1")
command.Parameters.AddWithValue("@Value2", "Value2")
' 执行INSERT语句
command.ExecuteNonQuery()
End Using
' 关闭连接
connection.Close()
End Using
End Sub
在这个示例中,将"TableName"替换为要插入记录的表名,“Field1"和"Field2"替换为表中对应的字段,”@Value1"和"@Value2"是参数名,可以根据需要自定义参数名和值。
将代码中的连接字符串替换为实际的数据库路径和名称。
确保在代码中引用了System.Data.OleDb命名空间,以便使用OleDbConnection和OleDbCommand类。