以下的程序在编译后提示From语句有错,Insert语句语法有错,我找了半天没找出来,大家帮我看一下!Private Sub btnSubmit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSubmit.Click
        Dim con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:\VB.NET\Test.mdb")
        con.Open()
        Dim cmd As New OleDbCommand("Select count(*) from User where UserName='" & txtUserName.Text & "'", con)
        Dim reader As OleDbDataReader
        Dim logincount As Integer
        logincount = Convert.ToInt32(cmd.ExecuteScalar())
        If logincount <> 0 Then
            Response.Write("<p text=#0000ff Font-size=32 >对不起,您所填入的用户名已经有人使用!</p><br>")
            Response.Write("<p text=#0000ff Font-size=32 >请更换其他名称再进行注册!</p>")
        Else
            Dim sqlstr As String
                sqlstr = "Insert Into User Values( '" & txtUserName.Text + "'," _
                + "'" + txtUserPwd.Text & "'," & "'" & txtEmail.Text + "')"
                cmd.CommandText = sqlstr
                cmd.ExecuteNonQuery()
            Response.Write("您的个人信息已提交!")
        End If
        cmd.Dispose()
        con.Dispose()
    End Sub

解决方案 »

  1.   

    sqlstr = "Insert Into User(字段1,字段2,字段3) Values( '" & txtUserName.Text + "'," _
                    + "'" + txtUserPwd.Text & "'," & "'" & txtEmail.Text + "')"
      

  2.   

    太混乱了,你把执行的SQL语句输出,然后再用查询分析器分析。找不出原因就把执行的SQL贴出来。SQL语句出错,贴代码是浪费时间。
      

  3.   

    最好不要把表名命名为关键字,User是关键字
      

  4.   

    果然是误用了User关键字,太谢谢humin1906了!我查了半天啊!