代码为:
Dim conn2_numRows,conn2,ddate,s_keyword,radio
s_keyword=Request("keyword")
dda1=trim(request.QueryString("ddate1"))
dda2=trim(request.QueryString("ddate2"))
sddate=dda1&dda2
radio=trim(request.QueryString("radio"))
Set conn2 = Server.CreateObject("ADODB.Recordset")
if radio<>"" then
sql= "SELECT * FROM zhongdiao WHERE ddate='#"&sddate&"#' and lieyong like '%"&s_keyword&"%' ORDER BY ID ASC"
else
sql= "SELECT shijian, lieyong, fankui, ID, ddate FROM zhongdiao where ddate like '%"&ddate&"%' ORDER BY ID ASC"
end if
conn2.open sql,conn,1,1
老是出错为Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
ODBC 驱动程序不支持所需的属性。
/gaojilist2.asp, 第 54 行(conn2.open sql,conn,1,1)