文本框右对齐可通过CSS来实现:
style="text-align:right"
示例效果:

HTML代码

<br /> <input name="ycsznet" type="text" value="右对齐"style="text-align:right">

[Ctrl+A 全部选择 提示：你可先修改部分代码，再按运行]

asp网站多数据录入时.可用回车键代替<tab>键实现快速输入:
脚本程序如下:

显示被隐藏内容

<script>
document.onkeydown=function(){
var fx="";
var qx=true; //移到文本框中后是否自动全选
try{
  switch(event.keyCode){  //判断按键
  case 13:
   if(event.srcElement.tagName!="SUBMIT"){     //非TEXTAREA对象中按回车键
    fx="down";
   }
   break;
  case 40:
   if(event.srcElement.tagName=="INPUT"||event.ctrlKey){  //INPUT对象中按光标下键或在所有对象中按[ctrl]+光标下键
    fx="down";
   }
   break;
    case 39:
   if(event.srcElement.tagName=="INPUT"||event.ctrlKey){  //INPUT对象中按光标右键或在所有对象中按[ctrl]+光标下键
    fx="down";
   }
   break;
    case 37:
   if(event.srcElement.tagName=="INPUT"||event.ctrlKey){  //INPUT对象中按光标左键或在所有对象中按[ctrl]+光标下键
    fx="up";
   }
   break;
  
  case 38:
   if(event.srcElement.tagName=="INPUT"||event.ctrlKey){  //INPUT对象中按光标上键或在所有对象中按[ctrl]+光标上键
    fx="up";
   }
   break;
  default:
  }
  switch(fx){  //根据判断按键所得的fx值来执行向下或向上操作
  case "down":
   for(i=event.srcElement.sourceIndex+1;i<document.all.length;i++){
    if(((document.all(i).tagName=="INPUT")&&("text,password,checkbox,radio".indexOf(document.all(i).type)!=-1))||("Select,TEXTAREA".indexOf(document.all(i).tagName)!=-1)){
     if(!document.all(i).disabled){
      document.all(i).focus();
      if (document.all(i).tagName=="INPUT"&&qx)document.all(i).select();
      break;
     }
    }
   }
  if((i==document.all.length)&&(event.keyCode==13)){
  document.getElementsByName(document.all(event.srcElement.sourceIndex).name)[i].form.submit();
   }
   event.keyCode = 0;
   event.returnValue = false;
   break;
  case "up":
   for(i=event.srcElement.sourceIndex-1;i>-1;i–){
    if(((document.all(i).tagName=="INPUT")&&("text,password,checkbox,radio".indexOf(document.all(i).type)!=-1))||("Select,TEXTAREA".indexOf(document.all(i).tagName)!=-1)){
     if(!document.all(i).disabled){
      document.all(i).focus();
      if (document.all(i).tagName=="INPUT"&&qx)document.all(i).select();
      break;
     }
    }
   }
   event.keyCode = 0;
   event.returnValue = false;
   break;
  default:
  }
}catch(e){}
}
</script>

隐藏内容

该内容已经被作者隐藏,只有会员才允许查阅 登录 | 注册

使用方法：<br>
1、回车键跳到下一个非按钮区，但在文本区中按回车键不跳；
2、光标下键↓右键→跳到下一个非按钮区，但在下拉框和文本区中按光标下键不跳；
3、光标上键↑左键←跳到上一个非按钮区，但在下拉框和文本区中按光标上键不跳；
4、会自动跳过被<b>disabled</b>的文本区。
5、在最后一个可获得焦点的对象上按回车键后可提交该对象所在的FORM表单。

在ASP编程中使用数组

数组的定义
Dim MyArray
MyArray = Array(1‚5‚123‚12‚98)

可扩展数组
Dim MyArray()
for i = 0 to 10
ReDim Preserve MyArray(i)
MyArray(i)=i
next

将一个字符串分割并返回分割结果的数组
Dim MyArray
MyArray = Split(tempcnt‚chr(13)&chr(10))
For I = Lbound(MyArray) to Ubound(MyArray)
Response.Write MyArray(I) & "<br>"
Next

数组排序函数
function..Sort(ary)
KeepChecking = TRUE
Do Until KeepChecking = FALSE
KeepChecking = FALSE
For I = 0 to UBound(ary)
If I = UBound(ary) Then Exit For
If ary(I) > ary(I+1) Then
FirstValue = ary(I)
SecondValue = ary(I+1)
ary(I) = SecondValue
ary(I+1) = FirstValue
KeepChecking = TRUE
End If
Next
Loop
Sort = ary
End function..

数组排序函数应用例子
Dim MyArray
MyArray = Array(1‚5‚123‚12‚98)
MyArray = Sort(MyArray)
For I = Lbound(MyArray) to Ubound(MyArray)
Response.Write MyArray(I) & "<br>"
Next

在Application和Session中使用数组
Application.Lock
Application("StoredArray") = MyArray
Application.Unlock

LocalArray = Application("StoredArray")

覆盖Application中的数组
Application.Lock
Application("StoredArray") = LocalArray
Application.Unlock

Session使用方法与Application相同

从数据库中把数据导入数组中
Dim MyArray
取出全部记录
MyArray = RS.GetRows
取出前10项记录
MyArray = RS.GetRows(10)

For row = 0 To UBound(MyArray‚ 2)
For col = 0 To UBound(MyArray‚ 1)
Response.Write (col‚ row) & "<br>"
Next
Next

asp 数组小结说明:
1. dim不能用作不确定长度 不定长数组可用redim定义
   redim可以，可以设一个变量[但是使用前必须传给改变量一个整数]  
   例:Cnt=12   [传值可用CInt转换CInt(request.form("num"))]
      redim   MyArray(Cnt)  
2.preserve 保留原值
   例:redim   a(10)  
      1—->   redim   a(20)     '这样的话原来a(10)中的所有内容清空  
    2—->   redim   preserve   a(20)   '这样的话原来的a(10)中的内容保留
3.数组个数    
  在以DIM或REDIM定义数组时指定的下标，表示的是访问该数组时所容许的最大下标，却不是该数组的个数。实际上，一维数组个数总是等于（最大下标+1），访问时是通过下标从0开始逐个访问的。  
   例：Dim   myarray(5)   定义的数组元素有6个，分别是：myarray(0)、myarray(1)、myarray(2)、myarray(3)、myarray(4)、myarray(5)。  
4.关于UBOUND函数    
  UBOUND返回的是一维数组的最大下标，而不是元素个数。   比如：Dim   Myarray(5)，那么UBOUND(Myarray)返回的值是5，而不是6。   ubound也可以应用于二维数组。应用于二维数组时，它返回的是第一个下标的最大值。  
    
  例：Dim   Myarray(6,3)
  
  那么UBOUND(Myarray)返回的值是6，而不是7，更不是18（6*3=18）。

sql server 2000 数据库中快速删除记录，清空表的常用命令有:
TRUNCATE TABLE
Delete * FROM TABLE

TRUNCATE TABLE 在功能上与不带 Where 子句的 Delete 语句相同：
二者均删除表中的全部行。
但 TRUNCATE TABLE 比 Delete 速度快，且使用的系统和事务日志资源少。

Delete 语句每次删除一行，并在事务日志中为所删除的每行记录一项。
TRUNCATE TABLE 通过释放存储表数据所用的数据页来删除数据，
并且只在事务日志中记录页的释放。

TRUNCATE TABLE 删除表中的所有行，但表结构及其列、约束、索引等保持不变。
如果想保留标识计数值，请改用 Delete。

如果要删除表定义及其数据，请使用 Drop TABLE 语句。

对于由 FOREIGN KEY 约束引用的表，不能使用 TRUNCATE TABLE，而应使用不带 Where 子句的 Delete 语句。由于 TRUNCATE TABLE 不记录在日志中，所以它不能激活触发器。

TRUNCATE TABLE 不能用于参与了索引视图的表。

特别注意：TRUNCATE TABLE 删除表中的所有行，新行标识所用的计数值重置为该列的种子。
自动增长ID

在ASP中的参考代码如下:
<%

   sql="TRUNCATE TABLE  表名"
   conn.execute sql

%>