我到底错在哪？

[trains001]

这是我做的一个提交页面
其中subject为文本型
connect为备注型
可运行以后页面提示说Insert into 语句有错

Dim conn as OledbConnection
Dim connstr as string
Dim objinsertcmd as OledbCommand
Dim objinsert as string

connstr=System.Configuration.ConfigurationSettings.AppSettings("forum_data")
conn=New OledbConnection(connstr)
objinsert="Insert into book_3(subject,connect,f_renid) Values (@subject,@connect,@f_renid)"
objinsertcmd=New OledbCommand(objinsert,conn)
objinsertcmd.parameters.add(New OleDbParameter("@subject", OleDbType.Char))
objinsertcmd.parameters.add(New OleDbParameter ("@connect", OleDbType.Char))
objinsertcmd.parameters.add(New OleDbParameter ("@f_renid", OleDbType.Char))
objinsertcmd.parameters.item("@subject").value=subject.text
objinsertcmd.parameters.item("@connect").value=connect.text
objinsertcmd.parameters.item("@f_renid").value=username.text

conn.open()
objinsertcmd.ExecuteNonQuery()
conn.close()

[ameng_2002]

可能是insert语句中的字段根数据库中对应不上

[bigrongshu]

代码好像没有错误

--------------------
你可以用

try

Catch exp As SqlClient.SqlException
MessageBox.Show(exp.Message, "SQL error!", MessageBoxButtons.OK, MessageBoxIcon.Error)
Catch err As System.Exception
MessageBox.Show(err.Message, "System error!", MessageBoxButtons.OK, MessageBoxIcon.Error)
Finally
myconn.Close()
End Try

--------------------
来捕捉详细的sql错误和系统错误


^^
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ^^
~~~~~~~~~~~~~~~~~
要学的实在太多，
来不及自己摸索，
不如互相帮助! ^^

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
-by BigRongShu
(欢迎您和我探讨)