20CN网络安全小组论坛 - 网站建设 - 在家里测试OK，传上网就出错了，

论坛: 网站建设标题: 在家里测试OK，传上网就出错了，

作者: ranchuan [ranchuan]

版主

在家里测试OK，传上网就出错了，

Microsoft JET Database Engine error '80004005'

System resource exceeded.

/ranchuan/bbs_title.asp, line 78

用ASP做的个小论坛，在家可以，但一传到空间就出错了，空间是国外的

地主发表时间: 05-08-13 07:36

回复: ranchuan [ranchuan]

版主

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>back_send_date</title>
<style type="text/css">

</style>
<%

dim bbs_area
dim record_id
dim page_id
record_id=1

bbs_area=request.QueryString("area")'要显示的版块名字
page_id=request.QueryString("page")'显示该版块的第几页
response.Cookies("bbs_area")=bbs_area
if bbs_area="" then
response.Redirect("bbs_list.asp")
end if

set bbs = server.createobject("ADODB.connection")
provider ="provider=microsoft.jet.OLEDB.4.0;"
path=server.MapPath("RC.mdb")
DBpath ="Data source ="& path
bbs.open provider & DBpath
set bbs_rs=server.CreateObject("ADODB.recordset")
MYSQL="select * from bbs_text_"&bbs_area&" order by back_time desc"
bbs_rs.pagesize=12’分页提取记录
bbs_rs.open MYSQL,bbs,3,3

set user_rs =server.createobject("ADODB.recordset")
MYSQL="select * from userdate where level='"&bbs_area&"' or level='admin'"
user_rs.open MYSQL,bbs,3,3

%>
</head>
<body>

<table width="550" border="1" bordercolor="#E1E1E1">
<tr>
<td width="550" align="center" bordercolor="#FFFFFF" bgcolor="#CECEB7"><font face="Arial Black" size="3"><font color="#993300"><%=bbs_area%></font></font></td>
</tr>
</table>

<table width="550" border="1" bordercolor="#CCCCCC" >

<tr>
<% if not user_rs.eof then
user_rs.movelast
user_count=user_rs.recordcount

for i=0 to user_count-1
%>
<td width="540" align="left"><span class="style7">版主：
<% response.Write(user_rs("name"))
user_rs.movenext
next
else
%>
<td width="540" align="left"><span class="style7">版主:（欠缺）</td>
</span>
<%end if%>

<td width="30" align="center"><span class="style7"><a href="bbs_send.asp?edit=newmain">发表</a></span></td>
</tr>
</table>

<table width="550" border="1" bordercolor="#CCCCCC">

<tr>

<th width="125" align="center" scope="col"><span class="style3 style2 style12"><span class="style13">ID</span></span></th>
<th width="60" align="center" scope="col"><span class="style3 style2 style8"><span class="style9">作者</span></span></th>
<th width="200" align="center" scope="col"><span class="style3 style2 style14"><span class="style3">标题</span></span></th>
<th width="137" align="center" class="style3 style11" scope="col">发表时间</th>

</tr>

<%
if not bbs_rs.eof then

title_count=bbs_rs.recordcount
page_count=title_count/12‘每页12个主题

'end if
response.Cookies("bbs_id")=bbs_rs("id")
bbs_rs.movefirst
bbs_rs.absolutepage=page_id

for x=1 to 12%>
<tr>

<%
dim msg_c

for i= 0 to bbs_rs.fields.count-8 %>
<td height="20" bgcolor="#CCCCCC"> <span class="style3 style2">
<% select case bbs_rs(i).name
case "title"
msg_c=bbs_rs(i)
%>
<a href="bbs_text.asp?id=<%=bbs_rs("id")%>"><% =msg_c%></a>

<%
case "time"
msg_c=bbs_rs(i)
msg_c=mid(msg_c,6,10)
%>

<%response.Write(msg_c)
case else
response.Write(bbs_rs(i))%>

<%end select%>
</span> </td>
<%next
msg_c="" %>
</tr>
<% bbs_rs.movenext
'record_id=record_id+1
if bbs_rs.eof then
exit for
end if
next

end if

bbs_rs.close
user_rs.close
bbs.close
set bbs_command=nothing
set bbs_rs=nothing
set user_rs=nothing
set bbs=nothing
%>
</table>

<span class="style17">page:</span>
<%
for i=1 to page_count+1 %>
<span class="style2"><a href="bbs_title.asp?area=<%=bbs_area%>&page=<%=i%>"><%=i%></a></span>

<%next%>

<center class="style17 style18">
< copyright R.C msuicRoom >
</center>

</body>
</html>

[此贴被忽风(ranchuan) 在 08月13日07时52分编辑过]

B1层发表时间: 05-08-13 07:36

回复: ranchuan [ranchuan]

版主

显示某一版块的主程序，不知咋搞的，，，，面包帮俺看下啊，俺刚开始做这东西，新手，代码很乱，抱歉了

[此贴被忽风(ranchuan) 在 08月13日07时52分编辑过]

B2层发表时间: 05-08-13 07:37

回复: q70213526 [q70213526]

版主

把出错的那行附近的代码贴出来就是了。

[此贴被眼镜蛇(q70213526) 在 08月16日17时23分编辑过]

B3层发表时间: 05-08-15 12:22

回复: Idof [idof]

论坛用户

楼上的好久不见

B4层发表时间: 05-08-15 21:42

回复: q70213526 [q70213526]

版主

Idof
你也好久不见咯。
有QQ没？交流一下。。

在搞ASP，天天泡ASP方面的论坛，在这里也只是偶尔以游客身体看一下。看到值得回贴的才登录一下。

B5层发表时间: 05-08-16 16:55

回复: amr [amr]

论坛用户

楼上的好久不见

B6层发表时间: 05-08-16 20:50

回复: ranchuan [ranchuan]

版主

搞定了，不是我的错，是那免费空间的问题
现在换成猪头给的空间，好用多了，快得爽了
" TARGET=_blank>http://www.eruu.com/index.htm

[此贴被忽风(ranchuan) 在 08月18日10时58分编辑过]

B7层发表时间: 05-08-18 10:57

回复: q70213526 [q70213526]

版主

猪头送空间给你？呵呵，恭喜啊。可惜没俺的份。

B8层发表时间: 05-08-18 16:58

回复: ranchuan [ranchuan]

版主

http://www.eruu.com/index.htm

上去看看，，，

B9层发表时间: 05-08-18 20:12

回复: q70213526 [q70213526]

版主

楼上的没过滤特殊字符吧。“处理 URL 时服务器出错。请与系统管理员联系。”这种错误提示应该是服务器的提示吧。呵呵

最好还是过滤一下特殊字符。

B10层发表时间: 05-08-19 08:53

回复: ranchuan [ranchuan]

版主

我有做过滤，是服务器的错了。我也碰到过。

B11层发表时间: 05-08-20 04:44

回复: mum [mum]

论坛用户

去网站看了，不错嘛。

B12层发表时间: 05-08-20 09:11

论坛: 网站建设