postgresql 用户管理:include 调用一个页面时出错

来源:百度文库 编辑:神马品牌网 时间:2024/04/26 01:32:53
include 调用一个页面时出错
页面本面正常

调用后出现
Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp,行242

Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'

[Microsoft][ODBC Microsoft Access Driver]常见错误 不能打开注册表关键字 'Temporary (volatile) Jet DSN for process 0x6f0 Thread 0x78c DBC 0x48f05b4 Jet'。

/myweb/cyxxg/job/conn.asp,行4

调用页内容为
<!--#include file="conn.asp"-->
<style type="text/css">
<!--
body,td,th {
font-size: 12px;
color: #000000;
}
-->
</style><body bgcolor="#FFFFFF" link="#000000" leftmargin="0" topmargin="0">
<table width="200" border="0" align="center" cellpadding="0" cellspacing="0">
<tr bgcolor="#D5EAFB">
<td height="21" width="9" align="center"> </td>
<td height="21" width="107"><b>人才快讯</b></td>
<td height="21" align="center" width="94"><a href="catalog.asp?catalog=1"><img src="images/more.gif" width="47" height="9" border="0" alt="更多内容……"></a></td>
</tr>
<tr>
<td height="190" align="center" colspan="3"><table width="205" height="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="190" width="290"><table width="96%" border="0" cellspacing="0" cellpadding="0">
<%
sql="SELECT top 8 * from alldata where catelog=1 ORDER BY ID DESC"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "<p align='center'>没有信息</p>"
else
while not rs.eof
'计算标题大小,如果超过20个字符就用...代替20个字符以后的字符。
title=rs("title")
id=rs("id")
sdate=rs("time")
'格式化时间,用做文件夹名。
if len(month(sdate))<2 then
folder=year(sdate)&"0"&month(sdate)
else
folder=year(sdate)&month(sdate)
end if
'设置文件名。
'dd=DateDiff("s","2002-10-01 0:00",sdate)
'filename=dd&id
'filename="article_"&year(sdate)&month(sdate)&day(sdate)&id
filename=year(sdate)&id
if len (title)>24 then
title=left(title,22)&"..."
%>
<tr>
<td height=20 width=12><img src="images/2.gif" width="4" height="6"></td>
<td><a href="content/<%=folder%>/<%=filename%>.html" target=_blank title="<%=rs("title")%>"><%=title%></a></td>
</tr>
<%
else
title=rs("title")
%>
<tr>
<td height=20 width=12><img src="images/2.gif" width="4" height="6"></td>
<td><a href="content/<%=folder%>/<%=filename%>.html" target=_blank><%=title%></a></td>
</tr>
<%end if%>
<%
rs.movenext
wend
end if
rs.close
set rs=nothing
%>
</table></td>
</tr>
</table></td>
</tr>
</table>

是/myweb/cyxxg/job/conn.asp,行4
出错,请把conn.asp贴出来看一下