ASP快速入门教程
ASP快速入门教程
ASP快速入门教程能让你一个小时就学会ASP. 如果想看懂更多的ASP代码，希望大家在网上找找ASP教程，相信看完后大家对ASP更有个感性的认识。
请熟记下面的ASP语句是你快速入门的不二法则。
<1>

<%
语句
……
%>

<2>定义变量dim语句

<%
dim a,b
a=10
b=”ok!”
%>

注意：定义的变量可以是数值型，也可以是字符或者其他类型的


<3>简单的控制流程语句


1. If 条件1 then
语句1
elseif 条件2 then
语句2
else
语句3
endif
2.while 条件
语句 
wend
3.for count=1 to n step m
语句1
exit for
语句2
next 


二.ASP数据库简单*作教程


<1>.数据库连接(用来单独编制连接文件conn.asp)

<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &
Server.MapPath("bbsdb1\user.mdb") 
%>

(用来连接bbsdb1目录下的user.mdb数据库)


<2>显示数据库记录


原理：将数据库中的记录一一显示到客户端浏览器，依次读出数据库中的每一条记录如果是从头到尾:用循环并判断指针是否到末 使用: not rs.eof如果是从尾到头：用循环并判断指针是否到开始 使用：not rs.bof

<!--#include file=conn.asp--> 
(包含conn.asp用来打开bbsdb1目录下的user.mdb数据库)
<%
set rs=server.CreateObject("adodb.recordset") (建立recordset对象)
sqlstr="select * from message" ---->(message为数据库中的一个数据表，即你
要显示的数据所存放的数据表)
rs.open sqlstr,conn,1,3 ---->(表示打开数据库的方式)
rs.movefirst ---->(将指针移到第一条记录)
while not rs.eof ---->(判断指针是否到末尾)
response.write(rs("name")) ---->(显示数据表message中的name字段)
rs.movenext ---->(将指针移动到下一条记录)
wend ---->(循环结束)


------------------------------------------------------ 
rs.close
conn.close 这几句是用来关闭数据库
set rs=nothing
set conn=nothing
-------------------------------------------------------


%>

其中response对象是服务器向客户端浏览器发送的信息


<3>增加数据库记录


增加数据库记录用到rs.addnew,rs.update两个函数

<!--#include file=conn.asp--> 
(包含conn.asp用来打开bbsdb1目录下的user.mdb数据库)
<%
set rs=server.CreateObject("adodb.recordset") (建立recordset对象)
sqlstr="select * from message" ---->(message为数据库中的一个数据表，即你
要显示的数据所存放的数据表)
rs.open sqlstr,conn,1,3 ---->(表示打开数据库的方式)
rs.addnew 新增加一条记录
rs("name")="xx" 将xx的值传给name字段
rs.update 刷新数据库 


------------------------------------------------------ 
rs.close
conn.close 这几句是用来关闭数据库
set rs=nothing
set conn=nothing
------------------------------------------------------- 


%>

<4>删除一条记录
删除数据库记录主要用到rs.delete,rs.update

<!--#include file=conn.asp--> (包含conn.asp用来打开bbsdb1目录下的user.mdb数据库)
<%
dim name
name="xx"
set rs=server.CreateObject("adodb.recordset") (建立recordset对象)
sqlstr="select * from message" ---->(message为数据库中的一个数据表，即你
要显示的数据所存放的数据表)
rs.open sqlstr,conn,1,3 ---->(表示打开数据库的方式)
------------------------------------------------------- 
while not rs.eof
if rs.("name")=name then
rs.delete
rs.update 
查询数据表中的name字段的值是否等于变量name的值"xx"，如果符合就执行删除，
else 否则继续查询,直到指针到末尾为止
rs.movenext
emd if
wend
------------------------------------------------------
------------------------------------------------------ 
rs.close
conn.close 这几句是用来关闭数据库
set rs=nothing
set conn=nothing
------------------------------------------------------- 
%>

<5>关于数据库的查询
(a) 查询字段为字符型

<%
dim user,pass,qq,mail,message
user=request.Form("user")
pass