一段ASP代码,大家帮帮忙调试以下??

happygeeat 2003-10-17 03:51:27
<%@language="javascript"%>
<!-- #include file="../inc/dataConn.asp" -->
<!-- #include file="../inc/adojavas.inc" -->
<%
function trim(str)
{
var i;
var j;
var str1;
var str2;
for(i=0;i<str.length;i++)
{
if(str.charAt(i)==" ")
{
str=str.substring(i+1,str.length);
}
else
{
break;
}
}
for(j=str.length-1;str<=0;str1--)
{
if(str.charAt(j)==" ")
{
str=str.substring(0,j-1);
}
esle
{
break;
}
}
return str;
}
var MaxPageSize=5
var rs
var sql
var TotalRecord
var TotalPage
var CurrentPage
var CurrentRecord=0
rs=Server.CreateObject("ADODB.Recordset")
rs.CursorLocation=adUseClient
sql="SELECT * FROM cq_xueli"
rs.Open(sql,conn,adOpenStatic,adLockReadOnly,adCmdText)
rs.PageSize=MaxPageSize
rs.CacheSize=MaxPageSize
TotalRecord=rs.RecordCount
TotalPage=rs.PageCount
CurrentPage=trim(Request.QueryString("page"))
if(CurrentPage=="")
CurrentPage=1
CurrentPage=parseInt(CurrentPage)
if(CurrentPage<1 && CurrentPage==0)
CurrentPage=1
if(CurrentPage>TotalPage)
CurrentPage=TotalPage
rs.AbsolutePage=CurrentPage//出错
%>
<%
while(! rs.EOF && CurrentRecord<MaxPageSize)
{
CurrentRecord+=1
%>
<input type="checkbox" name="xueli" value="<%=rs.Fields("xueli").value%>"><span class="font1"><%=rs.Fields("xueli").value%></span><br>

<%
rs.MoveNext
}
%>
<br>
<div align="center" class="font1">
<%
if(CurrentPage<>1)
{
Response.Write('<a href=cq_xueli.asp?page=1>第一页</a> ')
Response.Write('<a href=cq_xueli.asp?page=CurrentPage-1>上一页</a>')
Response.Write("<br>")
}
if(CurrentPage<TotalPage)
{
Response.Write('<a href=cq_xueli.asp?page=CurrentPage+1>下一页</a> ')
Response.Write('<a href=cq_xueli.asp?page=TotalPage>末页</a>')
}
%>
</div>
...全文
27 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
stefli 2003-10-17
  • 打赏
  • 举报
回复
就是了,javascript是不能处理服务器端的数据的。
这可是严重错误哦!
iamsangster 2003-10-17
  • 打赏
  • 举报
回复
楼主真牛,居然用javascript写asp
lxxstarii 2003-10-17
  • 打赏
  • 举报
回复
rs.Open(sql,conn,adOpenStatic,adLockReadOnly,adCmdText)


改为:
rs.open sql,conn,1,1

看看
发布前言:之前所发布的几个版本都是在工作之余,抽空写着玩写出来的,也没在上面花多少功夫,但看到网上下载量一直处于同类软件前列,所以还是一直写下去,但由于工作调动原因,隔了很长时间没有更新,也有很多热心的网友发邮件问我什么时候更新,把本来不想再继续更新的程序又重新拿了起来,必竟还是有那么多的朋友支持我,我觉得这是我最大的动力;之前发布的几个版本都是我完成后连测试都没有就放到网站了,为此给很多朋友带去了很多麻烦和不便,在这里向大家道个歉!所以这次发布4.0正式版之前还是先发布了beta版,希望有更多的朋友帮忙测试功能和稳定性,同时也欢迎热心朋友能提供更多更好的意见,我相信有了大家的支持我才会走的更远,最后要说的就是我已经开通了自己的工作室网站,这也是一位热心的网站给帮的忙,在这里我表示感谢!!!以后都可以在我网站上进行交流和讨论了。 小妖投票系统V4.0 版更新: 1、修整了一些使用上的bug,使用变得更方便 2、增加了投票首页,方便很多朋友在首次使用时在本机调试,不需要时该首页还可以删除,投票不受影响 3、在首页增加了友情链接和公告,可以做成一个基本的投票网站 4、投票增加了前台js验证,操作更人性化 5、后台增加了“首页调用” 6、添加投票中加入了“推荐投票”,可以将投票设为推荐,既可以首页显示 7、投票多选限制中加入了限制条件选择,可以限定必须选够票数后才可投票或小于某一票数后才可投票 注:投票首页样式参考于其他网站,特此声明! 更新日志: 1、增加了风格管理、投票历史记录、评论管理 2、合并了上一版本中的“普通投票”和“综合投票”为统一的可自由添加投票项的投票方式 3、每个投票均为独立设置功能、风格、投票记录、评论管理 4、投票设置中增加了投票开始和结束时间 5、优化了同一IP投票时间间隔 6、新增加了投票访问“用户名和密码”功能 7、新增同一IP评论时间间隔 8、新增风格管理,每个投票可单独设置风格 9、新增投票时间段限制 10、新增投票附加字段功能,可对每个投票设置单独的附加字段,以便于收集投票者更加详细的信息 11、更改投票选项方式,每个投票既可以是单独的调查项目,又可以是综合调查项目 12、新增了投票页面生成静态js文件,大大提高了页面调用速度 13、新增了调用方式,可以用js调用,也可以使用独立投票页面。 14、新增投票项目名称和投票选项链接功能。 更新功能 1、更新了后台管理管理风格及细节之处,更方便直观的进行操作 2、增加了后台帮助导航 3、增加了人物评选投票(图片功能) 4、增加了人物评选图片鼠标悬停大图预览功能 5、"投票列表"增加了"使用中投票"和过期投票"筛选功能 6、投票增加了分类功能,更加方便的对大量投票进行分类管理 7、增加了"是否允许评论"和"是否允许查看结果"并可设置用户名密码访问 8、更新了"投票记录"显示界面,查看记录更直观明了 9、在"投票记录"中新增了投票总数显示和当天投票人次 10、在"投票记录"中新增了"查看每天投票详情"功能,帮助管理员更详细的掌握投票记录 11、增加了"调用代码"中的"票数调用,方便使用! 风格管理: 添加风格的时候,请参照"skin/2"文件夹内的文件名结构进行风格制作,然后将风格文件夹放入skin文件夹内,再到后台管理中添加风格既可。在这里要重点提一下,就是风格的css文件名和图片名称,必须与"skin/2"文件夹内的所有都保持一致。如有不明白之处请到本站论坛提出 http://bbs.izhu.org 安装使用: 将压缩包解压缩出来,然后放到站点里既可使用了。 后台管理员、密码是admin

28,390

社区成员

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

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