VBScript语句是一种基于VB的一种脚本语言,主要用于WEB服务器端的程序开发,我们这里只介绍一些简单的语句，主要是操作数据库的几种常见的语句

　　<1>.vbscript的标识

　<%
　 语句
　 ……
　%>

　　<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("\bbs\db1\user.mdb")
%>

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

　　<2>显示数据库记录

　原理：将数据库中的记录一一显示到客户端浏览器，依次读出数据库中的每一条记录
　　　　如果是从头到尾：用循环并判断指针是否到末　　　使用: not rs.eof
　　　　如果是从尾到头：用循环并判断指针是否到开始　　使用：not rs.bof
　　　　
　　　　<!--#include file=conn.asp-->　　(包含conn.asp用来打开bbs\db1\目录下的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对象是服务器向客户端浏览器发送的信息

[1] [2] [3] 下一页