dim thedate
thedate=request("thedate")
'如果数据库中的intime是yyyy-m-n 00:00:00格式就用下面的
thedate=thedate&"-12 00:00:00"
'如果数据库中的intime是yyyy-m-n格式就用下面的
thedate=thedate&"-12"
sql="select * from main where datediff('m',intime,'"&thedate&"')=0 and datediff('yyyy',intime,'"&thedate&"')=0"

dim thedate
thedate=request("thedate")
thedate=thedate&"-12 00:00:00"
sql="select * from main where datediff('m',intime,'"&thedate&"')=0
sql=sql&" order by shiyongren asc"
Set rs=Server.CreateObject("adodb.recordset")
rs.Open sql,conn,1,1
报错
说rs.Open sql,conn,1,1
这行不支持
Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
ODBC 驱动程序不支持所需的属性。

dim thedate
thedate="2005-12"
thedate=thedate&"-12 00:00:00"
sql="select * from main where datediff('m',intime,'"&thedate&"')=0
sql=sql&" order by shiyongren asc"
Set rs=Server.CreateObject("adodb.recordset")
rs.Open sql,conn,1,1
这样就没有问题
谁能告诉我啊

thedate=cint(request("thedate"))
这样试试