如何打印出错误的sql 语句！

zjs_sql 2006-04-08 03:33:06

我想看看update的语句和参数对不对！用cmd.CommandText 看不到参数！

＝＝＝＝＝＝＝错误＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
该字符串未被识别为有效的日期时间。有一个从索引 0 处开始的未知字。
说明: 执行当前 Web 请求期间，出现未处理的异常。请检查堆栈跟踪信息，以了解有关该错误以及代码中导致错误的出处的详细信息。

异常详细信息: System.FormatException: 该字符串未被识别为有效的日期时间。有一个从索引 0 处开始的未知字。

源错误:

行 144： Cmd.Parameters("zzsj").Value = "审核"
行 145： Response.Write(Cmd.CommandText + "<br>")
行 146： Cmd.ExecuteNonQuery()
行 147：
行 148： Response.Write(Session("czlx") + "=<br>")

源文件: D:\公司应用程序\华劲员工库\zt_shpass.aspx.vb 行: 146

堆栈跟踪:

[FormatException: 该字符串未被识别为有效的日期时间。有一个从索引 0 处开始的未知字。]
System.DateTimeParse.Lex(Int32 dps, __DTString str, DateTimeToken dtok, DateTimeRawInfo raw, DateTimeResult result, DateTimeFormatInfo& dtfi) +1658
System.DateTimeParse.Parse(String s, DateTimeFormatInfo dtfi, DateTimeStyles styles) +334
System.DateTime.Parse(String s, IFormatProvider provider, DateTimeStyles styles) +30
System.DateTime.Parse(String s, IFormatProvider provider) +11
System.Convert.ToDateTime(String value, IFormatProvider provider) +61
System.String.System.IConvertible.ToDateTime(IFormatProvider provider) +11
System.Convert.ChangeType(Object value, Type conversionType, IFormatProvider provider) +1014
System.Convert.ChangeType(Object value, Type conversionType) +57
System.Data.OleDb.OleDbParameter.GetParameterValue()
System.Data.OleDb.OleDbParameter.GetParameterScale()
System.Data.OleDb.OleDbParameter.BindParameter(Int32 i, DBBindings bindings, tagDBPARAMBINDINFO[] bindInfo)
System.Data.OleDb.OleDbCommand.CreateAccessor()
System.Data.OleDb.OleDbCommand.InitializeCommand(CommandBehavior behavior, Boolean throwifnotsupported)
System.Data.OleDb.OleDbCommand.ExecuteCommand(CommandBehavior behavior, Object& executeResult)
System.Data.OleDb.OleDbCommand.ExecuteReaderInternal(CommandBehavior behavior, String method)
System.Data.OleDb.OleDbCommand.ExecuteNonQuery()
hjusers.zt_shpass.Button1_Click(Object sender, EventArgs e) in D:\公司应用程序\华劲员工库\zt_shpass.aspx.vb:146
System.Web.UI.WebControls.Button.OnClick(EventArgs e)
System.Web.UI.WebControls.Button.System.Web.UI.IPostBackEventHandler.RaisePostBackEvent(String eventArgument)
System.Web.UI.Page.RaisePostBackEvent(IPostBackEventHandler sourceControl, String eventArgument)
System.Web.UI.Page.RaisePostBackEvent(NameValueCollection postData)
System.Web.UI.Page.ProcessRequestMain()

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
Dim Conn As OleDbConnection
Dim Cmd As OleDbCommand
Dim SQL As String
Conn = New OleDbConnection(ConfigurationSettings.AppSettings("connstring"))
Conn.Open()
SQL = "UPDATE 员工资料表 SET 姓名=?,身份证号=?, 性别=?, 出生日期=?, 注册时间=?,操作类型=? where 编号=" & ids
Cmd = New OleDbCommand(SQL, Conn)
Cmd.Parameters.Add(New OleDbParameter("xm", OleDbType.VarChar, 20))
Cmd.Parameters.Add(New OleDbParameter("xb", OleDbType.VarChar, 2))
Cmd.Parameters.Add(New OleDbParameter("zsrq", OleDbType.Date))
Cmd.Parameters.Add(New OleDbParameter("zzsj", OleDbType.Date))
Cmd.Parameters.Add(New OleDbParameter("sfzh", OleDbType.VarChar, 20))
Cmd.Parameters.Add(New OleDbParameter("czlx", OleDbType.VarChar, 20))

Cmd.Parameters("xm").Value = xm.Text
Cmd.Parameters("sfzh").Value = sfzh.Text
Cmd.Parameters("xb").Value = xb.SelectedItem.Text
Cmd.Parameters("zsrq").Value = "'" + zsrq.Text + "'"
Cmd.Parameters("zzsj").Value = "'" + zzsj.Text + "'"
Cmd.Parameters("zzsj").Value = "审核"
Response.Write(Cmd.CommandText + "<br>")
Cmd.ExecuteNonQuery()

...全文