如何前后翻阅聊友们的发言？
来源：asp之家 发布时间：2010-01-18 20:49:00
依次前移，实现聊友们的发言的更迭：
function form1_onsubmit()
if document.form1.tt.value="" then
document.form1.tt.focus()
form1_onsubmit= false else
select case len(trim(tt6))
case 0 tt1=document.form1.tt.value
tt6="1"
p=tt6
case 1 tt2=document.form1.tt.value
tt6="11"
p=tt6
case 2 tt3=document.form1.tt.value
tt6="111"
p=tt6
case 3 tt4=document.form1.tt.value
tt6="1111"
p=tt6
case 4 tt5=document.form1.tt.value
tt6="11111"
p=tt6
case 5 tt1=tt2
tt2=tt3
tt3=tt4
tt4=tt5
tt5=document.form1.tt.value
p=tt6
end select
document.form1.t1.value=document.form1.tt.value
document.form1.tt.value=""
document.form1.tt.focus()
form1_onsubmit= true
end if
end function
当需向前向后翻时，就要判断目前所处的变量的位置。向前则只要判断所处位置是第二个变量到第五个变量时，向后则判断所处位置是第一个变量到第四个变量时，每向前向后翻一次，即翻页指针（p）向前向后一次。向后翻页方法（向前翻页相同）代码如下：
Sub cmdNext_onclick
'if p<len(trim(tt6)) then
select case len(trim(p))
case 0 p="1"
document.form1.tt.value =tt2
document.form1.tt.focus ()
case 1 p="11"
document.form1.tt.value=tt3
document.form1.tt.focus()
case 2 p="111"
document.form1.tt.value=tt4
document.form1.tt.focus ()
case 3 p="1111"
document.form1.tt.value=tt5
document.form1.tt.focus ()
end select
'end if
End Sub
Sub window_onload
document.form1.tt.focus ()
End Sub
0
投稿猜你喜欢
- 第一招、mysql服务的启动和停止net stop mysqlnet start mysql第二招、登陆mysql语法如下： mysql -
- 我想大家在用Sql2005一般都是.NET2005自带的SQL Server 2005是SQL Server2005 Express版本的，
- 测试sql： 代码如下:SET STATISTICS IO ON SET STATISTICS TIME ON SELECT COUNT(1
- CSS样式和JavaScript脚本是应该放在外部文件中呢？还是把它们放在页面本身之内呢？如何处理是关于一些性能规则的思维，就这些问题，我们
- 使用 NetBox 可以方便的将 asp 应用编译成为独立运行的执行程序，完全摆脱 iis 的束缚，在几乎所有的 Windows
- 这样的问题是因为 数据库字符集,表字符集,字段字符集都设为：gbk_chinese_ci 注意数据库连接串里面的 Stmt=Set Name
- //********************************************************************
- 1.安装时选择的自动安装，忘了用户名和密码导致现在试了几个Oracle默认用户名密码後（表格中附带默认用户名及密码），都提示无效的用户名、密
- 1.建表代码如下:-- Create table create table test ( dm1 char(3), dm2 char(3),
- 第一招、mysql服务的启动和停止net stop mysqlnet start mysql第二招、登陆mysql语法如下： mysql -
这个是JS控制图片滚动的效果，当鼠标结果新闻标题时开始滚动到对应的图片，可以作为图片新闻。效果图：<!DOCTYPE HTML PUB- 内容摘要：图片随机显示是一个应用非常广泛的技巧。比如随机banner的显示，当你进入一个网站时它的banner总是不同的，或者总有内容不同的
- 为了提高Asp程序的性能,人们常常将经常使用的数据缓存在 Application,但是你修改了数据库后怎么让application更新呢,本
- 当你提交一个查询的时候，MySQL会分析它，看是否可以做一些优化使处理该查询的速度更快。这一部分将介绍查询优化器是如何工作的。如果你想知道M
- 如果你的PHP网站换了空间，必定要对Mysql数据库进行转移，一般的转移的方法，是备份再还原，有点繁琐，而且由于数据库版本的不一样会导致数据
- 在SQL Server 2005中，它的另外一个强大的新特点是数据库快照。数据库快照是一个数据库的只读副本，它是数据库所有数据的映射，由快照
- 在使用Ajax过程中，有时候总会遇到一些难题，浏览器兼容、编码、IE下的特殊处理等等，偶尔会搞的人头昏脑胀哭笑不得，这里列一些小贴士，或许有
- 聚集索引，数据实际上是按顺序存储的，数据页就在索引页上。就好像参考手册将所有主题按顺序编排一样。一旦找到了所要搜索的数据，就完成了这次搜索，
- 这几天做了一个专题，放到服务器后发现从首页链接到专题页面正常，但是从专题页面跳转到首页就会出现乱码。很是蹊跷，专题页面和首页没有共同的文件，
- 首次安装、运行MySQL时，你可能会遇到一些错误，使MySQL服务器不能启动。本节的目的是帮助你诊断并纠正这些错误。解决服务器问题时你的第一
