请高手进来,qq64607646

Rubi 2004-01-18 11:29:29


高手请看

本页无法显示
试图访问的网页出现问题,无法显示。

--------------------------------------------------------------------------------
请尝试以下方法:


单击 刷新按钮或者梢候再试。

打开 localhost 主页,然后查找与所需信息相关的链接。
HTTP 500.100 - 内部服务器错误 - ASP 错误
Internet 信息服务
--------------------------------------------------------------------------------
技术信息(适用于支持人员)


错误类型:
Microsoft JET Database Engine (0x80040E10)
/inc/function.asp, 第 808 行



浏览器类型:
Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0)


页:
GET /index.asp


时间:
2004年1月17日, 23:40:55




详细信息:
Microsoft 支持



源代码是:sub ShowTopUser(UserNum)
if UserNum<=0 or UserNum>100 then UserNum=10
dim sqlTopUser,rsTopUser,i
sqlTopUser="select top " & UserNum & " * from " & db_User_Table & " order by " & db_User_ArticleChecked & " desc," & db_User_ID & " asc"
set rsTopUser=server.createobject("adodb.recordset")
rsTopUser.open sqlTopUser,Conn_User,1,1------这是第808行
if rsTopUser.bof and rsTopUser.eof then
response.write "没有任何用户"
else
response.write "<table width='100%' border='0' cellspacing='0' cellpadding='0'><tr><td align='left'>名次</td><td align='left'>用户名</td><td align='right'>文章数</td></tr>"
for i=1 to rsTopUser.recordcount
response.write "<tr><td align='center'>" & cstr(i) & "</td><td align='left'><a href='UserInfo.asp?UserID=" & rsTopUser(db_User_ID) & "'>" & rsTopUser(db_User_Name) & "</a></td><td align='right'>" & rsTopUser(db_User_ArticleChecked) & "</td></tr>"
rsTopUser.movenext
next
response.write "</table><div align='right'><a href='UserList.asp'>more...</a></div>"
end if
set rsTopUser=nothing

...全文
42 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
Rubi 2004-01-18
  • 打赏
  • 举报
回复
呵呵,可以了,不知道放在网上可以吗,我试试阿,谢谢你们的帮助阿!
Rubi 2004-01-18
  • 打赏
  • 举报
回复
我看看,
luojx 2004-01-18
  • 打赏
  • 举报
回复
order by " & db_User_ArticleChecked & " desc," & db_User_ID & " asc"
好像有错误
nffly 2004-01-18
  • 打赏
  • 举报
回复
应该是选择语句有问题。
winson79 2004-01-18
  • 打赏
  • 举报
回复
db_User_Table 没有值
nffly 2004-01-18
  • 打赏
  • 举报
回复
你的选择语句:sqlTopUser="select top " & UserNum & " * from " & db_User_Table & " order by " & db_User_ArticleChecked & " desc," & db_User_ID & " asc"
后面什么意思: & db_User_ID & " asc"
ttt2 2004-01-18
  • 打赏
  • 举报
回复
数据库没有连接数据库

rsTopUser.open sqlTopUser,Conn_User,1,1
~~~~~~~~~~1,3
xieyj 2004-01-18
  • 打赏
  • 举报
回复
rstopuser.open sqltopuser,conn_user,1,1

改成:
on error resume next
rstopuser.open sqltopuser,conn_user,1,3
If Err.Number <> 0 Then '发现错误
Response.Write "发现错误,错误信息是:" & Err.Description '写出错误信息
Response.End '结束运行
End If
DaragonShop系统源码 DaragonShop系统(vs2008+SQL2005)是在课余时间随手制作的,主要是对一些基础的巩固和三层架构体系的运用,包含反射的应用等。 主要涉及:主流三层架构+工厂反射模式+ sql自带函数分页(曾经写过一个网站分别用了四种不同的分页模块,但因网络硬盘文件丢失,笔记本也在搬行李时失踪不能共享,遗憾) 有兴趣的朋友或者一些正在学习的C#的同学可以看一看。 在DaragonShopData文件夹中是系统的数据库(sqlserver 2005版) ,加载即可。然后修改Web.Config连接字符串即可,当然如果你是刚刚学习的,不知道连接字符串怎么修改,那么好吧,我就给你说一个非常非常简单的方法,但在说这个之前我要说一下,个人是非常讨厌用数据库连接控件的,但是在连接字符串的时候挺方便的,直接新建一个页面拖一个数据连接控件,选择要连的数据库一直点下一步,完成之后在web.config的 节点下就会出现了,把名为DragonShopConnection 的值替换掉即可。 后台因为没有模板,也没多少时间,在做的时候就直接就用GridView实现了大概修改删除的功能,有点简陋凑合着看吧。(如果有模板的朋友可以给我传一套,我可以更新 QQ:715501675) 今天上QQ发现自己不知道什么时候居然建过一个群,如果有兴趣的朋友可以进来提问:80012346。 这个系统我会在以后不断更新,也欢迎各位朋友多给点意见,当然高手要是要是看不起咱这小程序也不勉强(嘎嘎,鄙人只希望能够相互学习,这样大家才能一块进步.....). 简单介绍下我用过的四种分页模式,因为刚做网站的时候这块是比较烦人的。这样有兴趣的朋友可以有个大致的方向 1.当然是这个系统里面的,用存储过程,用SQL里面的一个排序函数,建立虚拟表,调用需要的表段。 2.在写sql语句的时候采用select top n where .... not in (select top n*page where ....) 的方法直接到数据库里找 3.在.net里面自带的有个pagedatasource的东东,用这个分页,然后把它当做数据源传给控件,怎么弄自己上网找。 4.这个是很蠢得了,直接用控件分页,不想说太多,最简单的。

28,406

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧