从Excel文件查询更新

我有一个Excel文件的数据列表，我必须导入到我创build的Access数据库。 在db里面我有一个名为'Description'的列。 这可能会发生，当描述比单元格更长时，我必须更新我的字段，但我不知道如何正确写入查询。

在我的Excel文件中，描述从C列开始，所以当我想提取string时，我写了一行代码如下：

cap.Description = grid(r, 3).Text 

我试图写一个更新查询，但它不起作用，因为VS显示我这个消息：“附加信息没有给出一个或多个所需的参数值”。

 Public Sub updateDB(ByVal PathDB As String) Dim db As New cDB Dim v As New cVoice Dim rs As ADODB.Recordset = db.RecordSet db.connect_DB(PathDB) db.get_rs("UPDATE Voice SET Description = @v.Description") db.close_DB() End Sub Public Function get_rs(ByVal query As String) As ADODB.Recordset If db Is Nothing Then rs = Nothing : Return rs rs = New ADODB.Recordset rs.CursorType = ADODB.CursorTypeEnum.adOpenStatic rs.LockType = ADODB.LockTypeEnum.adLockOptimistic rs.Open(query, db) Return rs End Function Public Function connect_DB() As ADODB.Connection If Not My.Computer.FileSystem.FileExists(pPathDB) Then db = Nothing : Return db db = New ADODB.Connection db.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & pPathDB & ";Persist Security Info=False" db.Open() If db.State = ConnectionState.Closed Then db = Nothing Return db End Function 

然后，我试图切换，愚蠢地Description = @v.Description与Description = grid(r, 3).Text ，但显然这种方式是行不通的。 那么，我怎样才能expression，我必须更新我的数据库列在Excel中的C单元格？

Answer 1

尝试使查询如下所示：

  db.get_rs("UPDATE Voice SET Description = '" + v.Description +"'") 

由于这个错误意味着这里提到的值或错过值的拼写错误： 没有给出一个或多个所需参数的值