ASP. NET VB插入查询

Question

我有一个access数据库，我正在尝试将记录插入。这似乎很容易做到，而且在大多数情况下，我所有的代码都是有意义的。我可以在VS 15中创建查询，并将它们插入到我的数据库中，但由于某些原因，我插入记录的功能不起作用。有人能看出我做错了什么吗？

Private Function SendData(eData As String)
    Dim connectString As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=|DataDirectory|web407db.mdb"

    Dim cn As OleDbConnection = New OleDbConnection(connectString)

    cn.Open()

    Dim selectString As String = "INSERT INTO users(encryptID, firstName, lastName, userName, password, email) VALUES ('" & GetHash(eData) & "', '" & fName_in.Text & "', '" & lName_in.Text & "', '" & uName_in.Text & "', '" & pWord_in.Text & "', '" & email_in.Text & "')"
    Dim cmd As OleDbCommand = New OleDbCommand(selectString, cn)

    cmd.ExecuteNonQuery()
    cn.Close()
    Return True
End Function

该函数在cmd上给我一个未处理的异常。ExecuteNonQuery

这是堆栈跟踪

[OleDbException（0x80040e14）：INSERT INTO语句中的语法错误。]系统数据OleDb。OLEDB命令。执行命令和文本错误处理（OleDbHResult hr）1130764系统。数据OleDb。OLEDB命令。ExecuteCommandTextForSingleResult（tagDBPARAMS dbParams，Object

'

Answer 1

导入系统。数据SqlClient

部分类默认继承系统。网状物用户界面。页面Dim cn作为新的SqlConnection（“数据源=.\SQLEXPRESS；AttachDbFilename=| DataDirectory | \ Database.mdf；集成安全性=True；用户实例=True”）

Protected Sub btn_sub_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btn_sub.Click
    Dim str As String
    Dim ans As String
    Try
        str = "insert into login values('" & TextBox1.Text & "', '" & TextBox2.Text & "')"
        cn.Open()
        Dim cmd As New SqlCommand(str, cn)
        ans = cmd.ExecuteNonQuery
        MsgBox("Data Insert ")
        cn.Close()
    Catch ex As Exception
        MsgBox(ex.ToString)
    End Try
End Sub

结束类

插入数据

Answer 2

找到问题了。我删除了密码条目。我不完全确定为什么我不能使用密码作为列名，但我删除了它，现在应用程序运行良好。感谢大家的帮助