【原创】超简单的ASP操作数据库

这几天这个在忙着做个asp程序，但是对我这个程序员来说有点难处，为什么呢，因为我根本就不会什么asp,会也是寥寥无几，本来我就是不是做这个的，解释性程序也是接触不是很多，如果叫我做VC或者Delphi 等等编译性的程序我还能说的过去，哎…，废话少说

当我开始写程序的时候，我遇到了一个问题，那就是连接数据库，也许你会说网上的资料很多，是啊，多很多但是对于我这个盲人来说简直就没有什么用处，根本就不理解，后来在我的努力下，终于搞明白了，下面是具体的说明

其实不管是做解释性的程序还是编译性的程序，都应该模块化得设计，操作数据库最起码是连接数据库，任何一个语言都是这个干的，所以我们也是先连接数据库，我以ACESS来说明，我把这个连接数据库的代码最为一个模块，代码如下

<% //这是一个标志，说明是脚本开始执行

dim conn //声明一个变量(当然了不声明直接用也是可以的，一种语言一个特色)

dim connstr //声明一个变量(当然了不声明直接用也是可以的，一种语言一个特色)

connstr="driver={Microsoft Access Driver (*.mdb)};DBQ="&server.MapPath("e.mdb") //连接字符串，server.MapPath用到了预定义的函数，就像其他语言预定义的函数一样

set conn=server.createobject("ADODB.CONNECTION")//创建一个连接对象

conn.open connstr //打开数据库的连接

上面的代码只是说明打开数据库的连接，我们可以把它保存为conn.inc或者conn. asp文件都是可以的，

下面的代码是操作数据库的数据，

Dim Sql //声明一个变量(当然了不声明直接用也是可以的，一种语言一个特色)

Sql=”select * from 表” //为变量赋值

Set rs=server.createobject(“adodb.recordset”) //创建一个记录集对象

rs.open Sql,conn,3,2 //打开这个记录集

//这里显示数据库的数据

rs.close //关闭记录集

set rs=nothing //设置这个对象为空，

上面的代码说明的就是显示数据的代码，保存为ViewData.asp,但是这么有个问题，如果你不包含刚才我们建立的inc文件的时候，当你执行的时候会出现错误（和其他语言一样，如果你想用其他类中的数据，你也得包含这个类文件，所以这里也是这样的）,所以在这个文件的头部加入，

那么怎么显示数据呢，这里不像我们做编译性程序那样，直接在对话框中写入就可以的，还需要和html一些元素结合，如果想显示数据还的懂html 语言，呵呵好歹我知道html 语言，我已表格的形式来显示数据，

首先我用DW建个html网页，在上面添加一个表格，定义为2行5列，第一行用来添加字段的内容，然后用代码动态生成数据库中的所有行，代码如下

<tr>

<td width="22%" align="center" bgcolor="#E1E1E1"><span class="STYLE17">模板对应的文件名</span></td>

</tr>

dim LeiXing

dim sql

dim num

LeiXing=Request("MoBanLeiXing")

if LeiXing="" then

sql="select * from MoBan"

else

sql="select * from MoBan where MoBanFenLei='"&LeiXing&"'"

end if

set rs=server.createobject("adodb.recordset")

rs.open sql,conn,3,2

num=0

if not rs.eof then %>

<% while not rs.eof //这里开始循环遍历数据库中的数据，下面是循环输出多行

num=num+1

</tr>

rs.movenext

wend

else

</table>

<tr>

<td><div align="center" class="STYLE15">对不起没有你想要的结果</div></td>

</tr>

</table>

end if

rs.close

set rs =nothing

就这样简单一个小小的程序做完了，做软件就是这样，其实都不难，难的是你有没有大脑去想，附界面如下

注：转自vc狗编程网，更多请看…http://yaofande.s36.804.cn

VCdog(狗)编程网

公告