作者inkyy (阿亮都不爱我啦)
看板Visual_Basic
标题[.NET] 资料库问题
时间Fri May 19 18:08:51 2006
我的程式
Dim connStr, insertCmd As String
connStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=asset_maintenance.mdb"
insertCmd = "Insert Into records(Staff_ID, Inspection_Date,
Description_reasons, Complete_Date) Values(@Staff_ID, @Inspection_Date,
@Description(Reasons), @Complete_Date)"
Dim conn As OleDbConnection, cmd As OleDbCommand
conn = New OleDbConnection(connStr)
conn.Open()
cmd = New OleDbCommand(insertCmd, conn)
cmd.Parameters.Add(New OleDbParameter("@Staff_ID", OleDbType.VarChar))
cmd.Parameters.Add(New OleDbParameter("@Inspection_Date",
OleDbType.DBDate))
cmd.Parameters.Add(New OleDbParameter("@Description(Reasons)",
OleDbType.VarChar))
cmd.Parameters.Add(New OleDbParameter("@Complete_Date",
OleDbType.DBDate))
TextBox4.Text = Now
cmd.Parameters("@Staff_ID").Value = TextBox1.Text
cmd.Parameters("@Inspection_Date").Value = TextBox2.Text
cmd.Parameters("@Description(Reasons)").Value = TextBox3.Text
cmd.Parameters("@Complete_Date").Value = TextBox4.Text
cmd.ExecuteNonQuery()
conn.Close()
请问一下就是我要新增资料, 可是却一直发生问题, 可以邦我找到错误吗??
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.138.142.212
1F：推 fumizuki:错误讯息呢@@ 05/19 19:44
2F：推 inkyy:类型 'System.Data.OleDb.OleDbException' 的未处理例外状况 05/20 11:54
3F：→ inkyy: cmd.ExecuteNonQuery()到此行会出现上述讯息 05/20 11:55
4F：推 cawQQ:会不会是你资料库的问题??执行这段SQL指令出错了 05/20 20:36
5F：→ lolota:Access档案权限不够，你要加入asp.net的权限 05/21 16:54