datetimemysql&;ASP经典

datetimemysql&;ASP经典,datetime,asp-classic,Datetime,Asp Classic,我正在尝试使用asp classic将参数日期传递给函数:我的数据库中的格式为datetime:2012-02-22 00:00:00,但我的参数仅包含“2012-02-22” 所以它不工作,我收到一个空的rs <!--#include file="JSON.asp" --> <!--#include file="JSON_UTIL_0.1.1.asp" --> <% function concours(datedp) Dim sConnection, o

我正在尝试使用asp classic将参数日期传递给函数:我的数据库中的格式为datetime:2012-02-22 00:00:00,但我的参数仅包含“2012-02-22” 所以它不工作,我收到一个空的rs

    <!--#include file="JSON.asp" -->
<!--#include file="JSON_UTIL_0.1.1.asp" -->

<%
function concours(datedp)
Dim sConnection, objConn , objRS 
Const adCmdText = &H0001
Const adOpenForwardOnly = 0
Const adLockReadOnly = 1
    BD_serveur = "localhost"
    BD_utilisateur = "root"
    BD_password = ""
    BD_nom = "emploipublic"
    'datedp= "2012-02-22"

    sConnection ="DRIVER={MySQL ODBC 5.1 Driver}; SERVER=" & BD_serveur & ";UID=" & BD_utilisateur & ";pwd=" & BD_password & ";database=" & BD_nom & ";option=3;"

Set conn = Server.CreateObject("ADODB.Connection")
conn.Open(sConnection)

Set cmd = Server.CreateObject("ADODB.Command")
cmd.CommandType = adCmdText 
Set cmd.ActiveConnection = conn

cmd.CommandText = "SELECT * FROM concours WHERE DATE(dateDepot)='"& datedp & "'"

Set rs = Server.CreateObject("ADODB.Recordset")

rs.Open cmd, ,adOpenForwardOnly,adLockReadOnly 

Dim jsonObject

Set jsonObject = New JSON   'JSON class is in the include file json.asp'
jsonResult =  jsonObject.toJSON(Empty, rs, False) 


Response.ContentType = "application/json" 

Response.Write jsonResult

end function 


concours("2012-02-22")


谢谢你!!它woooks:=但是我如何将参数datedp转换为datetime??请!当我使用datedp=“2012-03-03”进行测试时,它会通过,但当我在参数中传递它并调用函数时,它会返回一个空的rs…表中是否有恰好包含该日期的行?如果你输入日期,它需要午夜时间,而不是一整天。我在mysql上测试了这个功能,但当我将它放入我的代码中时,它不起作用:SELECT*FROM
concours
WHERE date(dateDepot)=“2012-02-22”Ps:Im这样调用我的函数:concours(“2012-02-22”)你是在循环recodset对象以获得行吗?在页面上显示更多代码1)“查看源代码”,并确保其“空白”,json可能在IE或某些浏览器中不可见。2) 将Response.Write(rs(0))放在json创建之前,并查看是否打印出一些内容。3) JSON类中出现了一些问题,请尝试响应。在那里也写一些东西,看看是否打印出了一些东西
SQL = "SELECT * FROM concours WHERE dateDepot='"& datedp & "'"