就可以了。
你的INC文件怎么是一整个页面的ASP代码呢?我猜你是要在页面需要的地方插入显示日期的服务器脚本吧,应该把html、head、body等都去掉:
<%
dim db
db="article.mdb"
dim conn
dim connstr
connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};pwd=123;"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
dim sql
dim rs
sql="select bait,yiej,fengs,fengl,wend,sid,laoc,cengx,cengn,pingj from tianq"
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1 %>
白天:<%=trim(rs("bait"))%>
夜间:<%=trim(rs("yiej"))%>
风向:<%=trim(rs("fengs"))%>
风力:<%=trim(rs("fengl"))%>
温度:<%=trim(rs("wend"))%>
湿度:<%=trim(rs("sid"))%>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
然后在需要的地方包含近来就可以了。