ASP.NET - MS-ACCESS - VB.NET - ОШИБКА ЗАЯВЛЕНИЯ SQL - PullRequest
Новая
       41

ASP.NET - MS-ACCESS - VB.NET - ОШИБКА ЗАЯВЛЕНИЯ SQL

0 голосов
/ 25 марта 2012

Может кто-нибудь сказать мне, что не так с этим кодом? Это дает мне ошибку в cmd.ExecuteNonQuery()

Protected Sub btnCreateAccount_Click(sender As Object, e As System.EventArgs) Handles btnCreateAccount.Click

    Dim conn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\Brian\Documents\Visual Studio 2010\WebSites\WebSite3\db.mdb;")

    Dim cmd As OleDbCommand = New OleDbCommand("INSERT INTO [User] (CustomerName, CustomerSurname, Address, Country, TelNo, Username, Password, UserTypeID) VALUES (?, ?, ?, ?, ?, ?, ?, ?)", conn)




    If txtPass.Text = txtCPass.Text Then

        conn.Open()


        cmd.Parameters.Add("@CustomerName", OleDbType.VarChar, 255).Value = txtName.Text
        cmd.Parameters.Add("@CustomerSurname", OleDbType.VarChar, 255).Value = txtSurname.Text
        cmd.Parameters.Add("@Address", OleDbType.VarChar, 255).Value = txtAddress.Text
        cmd.Parameters.Add("@Country", OleDbType.VarChar, 255).Value = txtCountry.Text
        cmd.Parameters.Add("@TelNo", OleDbType.Integer).Value = txtTelNo.Text
        cmd.Parameters.Add("@Username", OleDbType.VarChar, 255).Value = txtUsername.Text
        cmd.Parameters.Add("@Password", OleDbType.VarChar, 255).Value = txtPass.Text
        cmd.Parameters.Add("@UserTypeID", OleDbType.Integer, 255).Value = "1"





        cmd.ExecuteNonQuery()

        conn.Close()
        lblAccount.Visible = True



    End If

End Sub

Конечный класс

1 Ответ

1 голос
/ 25 марта 2012

РЕДАКТИРОВАТЬ: Вероятно, username и password являются зарезервированными ключевыми словами в Access .

Попробуйте окружить их скобками: 

 ..., TelNo, [Username], [Password], ...
...