ASP Framework （二） 数据库操作DB类
网站开发最常用最重要的也是数据库操作，该框架的DB类封装了几乎所有关于数据操作部分，并提供了一些高级功能以便灵活使用。
适合操作的数据库类型：ACCESS，MSSQL
虽然ASP也可以操作其它类型数据库，但那种情况非常少，而且兼容性也不太好，所以本类只支持这两种数据库类型。
属性说明：
[setshowerr]
可选值：0，1，2，默认为1
设置数据库操作中的错误显示类型
0为不显示（适用于网站正式发布后）
1显示该类定义的错误提示（提示出错方法名及常见原因）
2 显示IIS错误提示（适用于高级开发人员）
[setdb_type]（数据库类型，0-ACCESS，1-MSSQL，默认为0）
[setdb_host]
[setdb_user]
[setdb_password]
[setdb_name]
[setdb_path]（以上不再解释了，数据库各项配置信息）
[setpagesize]（翻页－每页显示记录数，默认为10）
[setpageshownum]（翻页－显示翻页链接的个数，默认为10）
[setsql]（设置完整的SQL语句）
[settpl]（设置循环段HTML模板）
[setmsg]（设置当一个查询没有记录的时候提示的信息）
方法：
[return]（1或者0）
返回记录是否为空，相当于rs.eof
[query]
返回查询结果
两种形式：
替换模板后的HTML代码，前提是你设置了settpl
第二种形式二维数据，相当于GetRows
[all]
返回查询结果，与RS类似，区别是all是针对于翻页
[page]
返回翻页string，与ALL配合使用
[TRY(sql)]
返回SQL语句操作状态
如果是select语句，将可以直接使用query返回结果
如果是删除、修改，成功则返回true，否则false
[field(sql)]
执行SQL语句，返回第一条记录第一个字段值，相当于rs(0)
[add(f_name,arr)]
添加一条新记录，用于表单提交，arr为形如a(0) = "title|限制条件或值"，a(1) = "adddate|notnull"，a(2) = "newsid|ID18"
将方法将表单名和字段名绑定，并根据|后面的内容进行判断或赋值，如notnull会检查是否为空，ID18将newsid字段添加为随机18位数字，IP为用户IP，等等，可以根据自己需要设置更多的固定值和判断方法。
[update(f_name,id,arr)]
修改记录，与ADD方法类似，多了一个ID，即想要修改的记录的ID值。
示例：
首先根据自己需要更改一下数据库配置信息，因为是框架，所以这些常用的设置已集中到config文件，方便统一管理。
先介绍一下settpl，功能非常强大。
比如我们现在要做一个显示新闻列表的页面，使用settpl将会使操作变得异常简单！
<%option explicit%>
'其中include.asp包�
相关文档：
<%
Set rs=Server.CreateObject("ADODB.RecordSet")
sql="select * from 0791idc_News where BigClassName='家装课堂' order by ID desc"
rs.Open sql,Conn,1,1
if rs.eof and rs.bof then
response.Write("暂时没有记录")
else
%>
......
学习目的：学会用表单元素向服务器传送变量，然后显示变量在客户端的浏览器。
首先，让我们来看一下DREAMWEAVER的表单元素毛刷。
下面我们来一个一个看表单元素。1、文本域，这个是最基本的，传送的是文本信息，一般用户名，密码都要用这个传送，不过要是密码的话要在类型里面选择密码，这样就会以*代替显示� ......
<%
for i=1 to rs.recordCount '变量i从1循环到数据库中的全部记录数
if (i mod 1 =1) then '每个tr即每行显示1个记录,可根据需要自行修改, 将左边的1修改为2即显示两行。
response.write "<tr align='center'>"
end if
%>
此处为要循环的内容
<%if (i mod 1 = 0) then ......
1.如果您的操作系统为Windows 98，请运行 Windows98的安装光盘。在其Add-ons\pws目录下找到pws的安装程序，运行安装即可
2.如果操作系统为 Windows 2000 以上，可以按图4.1.1的方法安装 IIS：
打开【控制面板】，找到 【添加/删除程序】→【添加/删除WINDOWS组件】，
弹出 【Windows 组件向导】 ，选择 【Internet ......
<%Dim connstrconnstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("Stu.mdb")
Set bb = Server.CreateObject("ADODB.Connection")
bb.Open connstr%>
<html>
<head>
<meta http-equiv="content-Language" content="zh-cn" />
<meta http-equiv="Content-Type ......
