Ich habe 3 Textfelder, die ich als Kontaktformular verwende. Ich versuche VB zu verwenden, um diese Daten zu erfassen und in meine Datenbank aufzunehmen. Ich habe das Debuggen ausgeführt und es besagt, dass sich der Fehler in der INSERT INTO-Zeichenfolge befindet. ! [Screen Grab of Debugging] [1]:http://i.stack.imgur.com/ufYPs.png

Irgendwelche Ideen?

Imports System

Imports System.Data Imports System.Data.OleDb Partial Class Contact übernimmt System.Web.UI.Page

Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim Name As String = txtName.Text
    Dim Email As String = tbxEmail.Text
    Dim Comment As String = tbxComment.Text

    Dim objConnection As OleDbConnection = Nothing
    Dim objcmd As OleDbCommand = Nothing

    Dim strSql As String
    Dim dbConn As OleDbConnection = Nothing

    dbConn = New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source = Z:\Documents\Databases\user.accdb")
    dbConn.Open()

    strSql = "INSERT INTO user (username, email, comments) VALUES (?,?,?)"
    objcmd = New OleDbCommand(strSql, dbConn)
    objcmd.Parameters.Add(New System.Data.OleDb.OleDbParameter("@username", Name))
    objcmd.Parameters.Add(New System.Data.OleDb.OleDbParameter("@email", Email))
    objcmd.Parameters.Add(New System.Data.OleDb.OleDbParameter("@comments", Comment))
    objcmd.ExecuteNonQuery()


    dbConn.Close()
    Response.Write("Submitted Successfully")

End Sub