asp编程 笔记

vbscript书册:

Option Explicit  强制要求显式声明脚本中的所有变量。



conn.asp  连接:

打开:
<%
on error resume next  '发生错误继续下一步
dim startime
startime=timer()*1000
    dim conn
    dim dbpath
       set conn=server.createobject("adodb.connection")
    DBPath = Server.MapPath("data/6a33s20.asp")
    conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
%>

关闭消除

conn.close
set conn=noting
<!--#include file="conn.asp"-->

 

数据集的定义:

sql="select * from djcat"
set Rs=Server.CreateObject("ADODB.RecordSet")  '也可以使用set Rs=conn.Execute(sql)
Rs.Open sql,Conn,1,1 

while not rs.eof
%>

<%=rs("djcat_name")%>
<% rs.movenext  '游标一定移动

%> 

<% wend%>


RS对象的方法属性 :

rs.EOF
rs.MoveNext

rs.fields.count
rs.RecordCount

 

 

SQL_inj = split(SQL_Injdata,"|")  'split返回一个已|为分界的数组。
If Request.Form<>"" Then
For Each Sql_Post In Request.Form      
For SQL_Data=0 To Ubound(SQL_inj)  'Ubound 返回数组的最大下标