将服务器日期插入数据库 ODBC 错误

Question

我在尝试通过参数调用将服务器日期插入数据库时遇到了一些麻烦，下面列出了我用于此操作的代码：

<%
If (CStr(Request("MM_insert")) = "Modal-Menu-AddNote-Form") Then
  If (Not MM_InsertEdit) Then
    ' execute the insert
    Dim MM_InsertCmd

    Set MM_InsertCmd = Server.CreateObject ("ADODB.Command")
    MM_InsertCmd.ActiveConnection = MM_Logistics_STRING
    MM_InsertCmd.CommandText = "INSERT INTO Notes (Note_Text, Note_Date) VALUES (?, ?)" 
    MM_InsertCmd.Prepared = true
    MM_InsertCmd.Parameters.Append MM_InsertCmd.CreateParameter("param1", 202, 1, 255, Request.Form("Modal-Menu-Paragraph-AddNote")) ' adVarWChar
    MM_InsertCmd.Parameters.Append MM_InsertCmd.CreateParameter("param2", 135, 0, -1, Date) ' adDBTimeStamp
    MM_InsertCmd.Execute
    MM_InsertCmd.ActiveConnection.Close

    ' append the query string to the redirect URL
    Dim MM_InsertRedirectUrl
    MM_InsertRedirectUrl = "edit.asp"
    If (Request.QueryString <> "") Then
      If (InStr(1, MM_InsertRedirectUrl, "?", vbTextCompare) = 0) Then
        MM_InsertRedirectUrl = MM_InsertRedirectUrl & "?" & Request.QueryString
      Else
        MM_InsertRedirectUrl = MM_InsertRedirectUrl & "&" & Request.QueryString
      End If
    End If
    Response.Redirect(MM_InsertRedirectUrl)
  End If
End If
%>

注意 "param2" 行很重要，因为这是我试图将日期插入数据库的区域，我也尝试过 (0-Unknown,1-In,2-Out ,3-In/Out) 对于第 3 个参数，但我仍然最终得到错误，例如参数类型错误、超出可接受范围或相互冲突，或无效字符串或缓冲区长度。关于如何解决此问题的任何想法或想法？

Answer 1

这个问题最终被重新解决，最终成为我收集数据的文本区域的问题。关闭线程，谢谢大家的帮助和建议。

将服务器日期插入数据库 ODBC 错误

Insert Server Date to DB ODBC Error

asp-classic