如何前后翻阅聊友们的发言？
来源：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
投稿猜你喜欢
- 如果要在python2的py文件里面写中文，则必须要添加一行声明文件编码的注释，否则python2会默认使用ASCII编码。(python3
- python jenkins 打包构建代码# pip install python-jenkinsimport jenkinsimport
前言在字典中查找某一个值的时候，若key不存在就会返回一个keyerror错误而不是一个默认值，如果想要返回一个默认值可以使用default- 1. 从键盘输入一个整数,求 100 除以它的商,并显示输出。要求对从键盘输入的数值进行异常处理。try: n=i
- webconfig配置:<connectionStrings> <add name="MS
- 本文实例讲述了Python3.6日志Logging模块简单用法。分享给大家供大家参考，具体如下：Logging是一个很方便的模块，用来打印日
- 文件目录层级一、文件读取的绝对路径和相对路径用相对路径和绝对路径读取上一层目录的文件、下一层目录的文件及读取同层级的文件。# @File :
- import导入包搜索路径import用于导入包：import ( "fmt"
- 1、mysql的limit关键字 （DAO）select * from tablename limit startPoint, number
- 1. 时间与时区1.1 时间标准UTC，世界标准时间，是现在的时间标准，以原子时计时。GMT，格林威治时间，是以前的时间标准，规定太阳每天经
- 一道Python面试题的几种解答: 两个元祖T1=('a', 'b'), T2=('c',
- 大致功能：$() 取得所有元素$("div") 取得所有DIV$("#a1") 取得ID为a1的元素
- 我们在开发过程中，经常遇到这样问题，就是要求定期进行数据库的检查，如果发现特定数据，那么就要进行某项操作，这个需求呢，有两种做法，一是利用W
- 保存时代码如下：figure_corp = figure.crop( (32*rate/2, 32*rate/2, 32-32*rate/2
- 今天在工作中写项目的时候，遇到了一个让我感到几乎无解的问题，在转换了思路后，想出了一个折中的解决方案，记录如下。其实，问题的场景，非常简单：
- 本文实例讲述了Python使用try except处理程序异常的三种常用方法。分享给大家供大家参考，具体如下：如果你在写python程序时遇
- 互联网上不计其数的信息本质上都是一个一个的HTML文档组成的，通过链接将它们串联起整个互联网。这就犹如骨肉之于人体一样，只有通过经脉才能将它
- Python中对sqlite3数据库进行操作时，经常需要用到字段名，然而对于sqlite使用select语句并不能象MySql等数据库一样返
- 本文实例讲述了Python简单实现两个任意字符串乘积的方法。分享给大家供大家参考，具体如下：题目：给定两个任意数字组成的字符串，求乘积，字符
- 大致介绍TypeScript是由C#语言之父Anders Hejlsberg主导开发的一门编程语言，TypeScript本质上是向JavaS
