ActiveConnection 设置或返回Command对象的连接信息，该属性可以是一个Connection对象或连接字符串。
CommandText 设置或返回对数据源的命令串，这个串可以是SQL语句、表、储存过程或数据提供者支持的任 何特殊有效的命令文本。
Prepared 提出在调用Command对象的Execute方法时，是否将查询的编译结果储存下来。如果将该属性设 为True，则会把查询结果编译并保存下来，这样针影响第一次的查询速度，但一但数据提供者编译了Command对 象，数据提供者在以后的查询中将使用编译后的版本，从而极大的提高了速度
CommandTimeout 设置执行一个Command对象时的等待时间，默认值是30秒。如果在这个时间内Command对象没 有执行完，则终止命令并产生一个错误
CommandType
指向Command对象的类型，取值如下：
1 或 adCmdText:CommandText 是一个SQL语句；
2 或 adCmdTable:CommandText 是一个表名，ADO会产生一个对该表的查询，以返回该表的全部行和列。
4 或 adCmdStoredProc:CommandText 是一个储存过程名
8 或 adCmdUnknown:默认值。 CommandText内容是未知的
128 或 adExecuteNoRecords:CommandText 是一个不返回记录集的命令或存储过程。如果可以取记录，这些记 ......

很多时候,我们采用原始的方法来解决一行内循环3张图片,如果上传者只上传了2张图片,那么2张图片间的距离会很大,因为缺少了一个<td>&nbsp;</td>.
<table border="0" cellpadding="0" cellspacing="0">
<%
dim rs,sqltext
set rs = Server.CreateObject("adodb.recordset")
sqltext="select * from [bigclass]"
rs.Open sqltext,conn,1,1
m=1
colzs=5 '一行显示5列
if rs.RecordCount mod colzs=0 then
rowzs=int(rs.RecordCount/colzs)
else
rowzs=int(rs.RecordCount/colzs)+1
end if
for j = 1 to rowzs%>
<tr>
<%for i = 1 to colzs%>
<%if not rs.EOF then%>
<td><input type="checkbox" name="qxflag<%=m%>" value="1"><%=trim(rs("bigname"))%></td>
<%
rs.MoveNext
m = m + 1
else
%>
<td> </td>
<%end if%>
<%next%>
</tr>
<%
next
rs.Close
set rs = nothing
%>
</table> ......

1、<script>按钮： 
<input type="button" name="btnRead" onClick="readCard()" style="background:url(images/qux1.gif); border:none; width:145px; height:30px;"  />&nbsp;
2、提交按钮：
<input type="submit" name="button" id="button" style="background:url(images/tj.gif); border:none; width:84px; height:30px;"  value=""  onClick="commit();"/>
3、重置按钮：
<input type="reset" name="button" id="button" style="background:url(images/cz.gif); border:none; width:84px; height:30px;"  value=""  /> ......

 set conn=server.createobject("adodb.connection")
 conn.open "driver={microsoft access driver (*.mdb)};dbq=F:\\ajaxpro\\App_Data\\server.mdb"
 
 Dim StrSQL,RS
 StrSQL="SELECT*from Manager WHERE ID='"&username&"'"
 StrSQL=StrSQL&"AND Pin='"&password&"'"
 set rs=server.createobject("adodb.recordset")
 rs.open StrSQL,conn,1,1
 If rs.EOF then
  response.write("<script>alert('用户名或密码错误');history.back();</script>")
  response.End()
 else
  response.Write( "<script>location.href='IP_Address.asp'</script>") 
  response.End()   
 End If  ......

'---------------------------------------------------------------------------------------------------1.asp
<!--#include file="function.asp" -->
<%if Request.Cookies("venshop")("user_name")<>"" then%>'当用户登录时可以执行then
<script>
   function checkAll(){
   for (i=0;i<document.forms[0].length;i++){
    if (document.forms[0][i].tagName=="INPUT"){
    if (document.forms[0][i].type=="radio")
     {document.forms[0][i].checked="checked"}
    }
   }
   }
</script>
<style type="text/css">
<!--
.STYLE1 {
 color: #CC3300;
 font-size: 13px;
 font-family: "宋体";
 font-weight: bold;
}
.STYLE5 {
 font-family: "宋体";
 color: #FF0000;
}
.STYLE7 {
 font-family: "宋体";
 font-size: 13px;
}
-->
</style>
<script language="javascript">
<!--
function checkform1()
......

'-------------------------------------------------------------------------------------------------------1.asp
<!--#include file="function.asp" -->
<%if Request.Cookies("venshop")("user_name")<>"" then%>
<script>
   function checkAll(){
   for (i=0;i<document.forms[0].length;i++){
    if (document.forms[0][i].tagName=="INPUT"){
    if (document.forms[0][i].type=="radio")
     {document.forms[0][i].checked="checked"}
    }
   }
   }
</script>
<style type="text/css">
<!--
.STYLE1 {
 color: #CC3300;
 font-size: 13px;
 font-family: "宋体";
 font-weight: bold;
}
.STYLE5 {
 font-family: "宋体";
 color: #FF0000;
}
.STYLE7 {
 font-family: "宋体";
 font-size: 13px;
}
-->
</style>
<form name="form1" method="post" action="folder-action.asp">
<%
AttPath=Request.Que ......