sql - VBA SQL Update コマンドへのアクセス

Question

私はACCESSとVBAにかなり慣れていません。しかし、アクセスでボタンを押したときにページから取得したテキストに XML 文字列を解析する関数を取得しました。

そして、この文字列を更新したいので、テーブルに戻ります。しかし、私はそれを機能させることができません。

これはコードの一部です:

Set Elomrade = objDocXML.getElementsByTagName("elomrade").Item(0)
Set Natagare = objDocXML.getElementsByTagName("natagare").Item(0)
Set NatomradeNamn = objDocXML.getElementsByTagName("natomradeNamn").Item(0)
Set NatomradeBeteckning = objDocXML.getElementsByTagName("natomradeBeteckning").Item(0)
Set EdielID = objDocXML.getElementsByTagName("EdielID").Item(0)
Set Latitud = objDocXML.getElementsByTagName("latitud").Item(0)
Set Longitud = objDocXML.getElementsByTagName("longitud").Item(0)


Dim str As String
    str = str + "elomrade: " + Elomrade.Text + vbNewLine
    str = str + "natagare: " + Natagare.Text + vbNewLine
    str = str + "natomradeNamn: " + NatomradeNamn.Text + vbNewLine
    str = str + "natomradeBeteckning: " + NatomradeBeteckning.Text + vbNewLine
    str = str + "EdielID: " + EdielID.Text + vbNewLine
    str = str + "Latitud: " + Latitud.Text + vbNewLine
    str = str + "Longitud: " + Longitud.Text + vbNewLine 
MsgBox str


 Set db = CurrentDb()
 db.OpenRecordset ("Nätdata")

Dim NatBet As String
   NatBet = NatomradeBeteckning.Text


Dim strSQL As String
strSQL = "UPDATE Nätdata SET NatomradeBeteckning = NatBet"
db.Execute strSQL, dbFailOnError

解析は機能しますが、更新機能は機能しません。

エラー メッセージ: パラメータが少なすぎます。予想 1.