插入记录 还是出错

Question

Dim con As OleDbConnection
    Dim cmd As OleDbCommand
    Dim sql As String
    Dim constr = "provider=microsoft.jet.oledb.4.0;data source=" + Server.MapPath("db1.mdb")     
    Private Sub btnadd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn.Click        Con = New OleDbConnection(constr)        sql = "Insert Into mdb1(name, email, title, text) Values (@name, @email, @title, @text)"
        cmd = New OleDbCommand(sql, con)        cmd.Parameters.Add(New OleDbParameter("@name", OleDbType.Char, 255))
        cmd.Parameters.Add(New OleDbParameter("@email", OleDbType.Char, 255))
        cmd.Parameters.Add(New OleDbParameter("@title", OleDbType.Char, 255))
        cmd.Parameters.Add(New OleDbParameter("@text", OleDbType.Char, 255))        cmd.Parameters("@name").Value = name.Text
        cmd.Parameters("@email").Value = email.Text
        cmd.Parameters("@text").Value = text1.Text
        cmd.Parameters("@title").Value = title.Text        con.Open()        Cmd.ExecuteNonQuery()
        con.Close()
        open()

Answer 1

显示 Insert Into 语法错误
脑子有点麻木了

Answer 2

try
sql = "Insert Into mdb1([name], email, [title], [text]) Values (@name, @email, @title, @text)"大概是关键字的问题
先加上[]试试看

Answer 3

你用单步调试，取出插入语句，到SQL的查询分析器里面进行测试看是否能够通过，然后你根据通过测试的语句构造你的程序中的语句再进行测试！

Answer 4

cmd=new SqlCommand();
cmd.CommandText="存储过程名称";
cmd.CommandType=CommandType.StoredProcedure;
cmd.Parameters.Add(New OleDbParameter("@name", OleDbType.Char, 255))
cmd.Parameters.Add(New OleDbParameter("@email", OleDbType.Char, 255))
cmd.Parameters.Add(New OleDbParameter("@title", OleDbType.Char, 255))
cmd.Parameters.Add(New OleDbParameter("@text", OleDbType.Char, 255))
try
{
    cmd.ExecuteNonQuery();
}
catch
{
}

Answer 5

还要指定一下cmd的connection：
cmd.Connection=con;

Answer 6

正如brightheroes(闭关|那一剑的风情) 所说,你不能用name这样的关键字,如果一定要用就加上[name],你按他指的方法试试,应是这样的.
我觉得大家回问题的时候好好看看前面回过的帖的说的是什么,不要一上来就回,有时会出错的啊,呵呵......

Answer 7

楼上正解昨天被FILENAME 关键字害我浪费半天时间