把sql="select * from article where shenghe=1 and typeid="+cstr(newstype)+" order by dateandtime desc"改为
sql="select * from article where shenghe=1 and typeid="&cstr(newstype)&"order by dateandtime desc"试试
sql="select * from article where shenghe=1 and typeid="&cstr(newstype)&"order by dateandtime desc"试试
<%
dim conn
dim connstr
on error resume next
connstr="DBQ="+server.mappath("mynews.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
%>