目前管理信息系统已从传统的客户机/服务器（C/S）模式转向了浏览器/服务器（B/S）模式，特别是微软公司推出它的新产品ASP语言之后，这种转变更加迅猛。管理信息系统的核心是对数据库进行包括添加、修改和查询等等操作，ASP提供的ADO数据库接口控件，使得程序员再也勿需编写复杂的CGI程序了，而只要用几句简单的语句即可实现以上操作。目前有很多介绍用ASP开发网络数据库的程序例子，但绝大部分是利用ACCESS作底层数据库。相对于ACCESS而言，SQL SERVER数据库系统要复杂得多，因此在程序开发中需要多做一些工作。笔者结合自己开发管理信息系统的经验，在此试举一例，与感兴趣的朋友共同交流。
---- 1、系统环境
---- PII 350，Ram 64M，WINNT Server 4.0,
Service Pack4, IIS 4.0, SQL Server7.0。
---- 2、系统功能
---- 通过使用IE浏览器，在网上实现对《办公文件》数据表记录的添加和查询。
---- 3、功能实现
---- (1)数据表的设置
---- ①启动SQL Server7.0的Enterprise Manager,
在Databases 目录下增加一个新子目录test；
---- ②在test下增加一个new table，名为办公文件，字段设置：文件名，char,100,允许空；文件内容，char,4000，允许空。
---- ③在SQL Server中增加一个用户，名为hxl, 密码为123，登录模式为SQL 登录，将其默认登录数据库设为test；
---- ④在test数据库下增加一个新用户，名为hxl,其角色设为Dbowner。
---- (2)ODBC 链接
---- ①在控制面板中，打开ODBC数据源，选择系统DSN项，单击添加；
---- ②选择SQL Server数据源，命名为test；
---- ③选择登录模式为SQL Server验证，登录标志为hxl，密码为123；
---- ④将默认数据库高为test,再测试数据库链接，接通即可。
---- (3)程序文件
---- 为了实现系统功能，在这里编辑了3个程序文件，分别为index.html、add.asp和query.asp，具体内容如下：
---- ①index.html:系统首页，包括两个选项，一是追加记录，二是查询，用户可单击两者之一，即可进入相应的操作过程。以下是源程序：
< html >
< head >
< meta http-equiv=Content-Language
content=zh-cn >
< meta http-equiv=Content-Type
content=text/html; charset=gb2312 >
< meta name=GENERATOR content=Microsoft
FrontPage 4.0 >
< meta name=ProgId content=FrontPage
.Editor.Document >
< title >示例程序< /title >
< /head >
< body >
< p align=center >
< font size=5 color=#008000 >
欢迎使用用ASP语言对SQL
SERVER数据库操作示例< /font >< /P >
< p align=center > < /P >
< p align=center >< a href=add.asp >
追加记录< /a >< /p >
< p align=center >< a href=query.asp >
查询< /a >< /p >
< /body >
< /html >
---- ②add.asp:实现对《办公文件》数据表记录的添加。页面中含有一个单行文本框
（Txtbiaoti）和一个滚动文本框(Txtneirong)，分别用来输入文件标题和文件内容。此外，页面中还应有两个按钮，确定（Cmdok）和重写（Cmdcancel）,单击确定完成记录追加，单击重写重新输入内容。以下是源程序：
< html >
< head >
< meta http-equiv=Content-Type
content=text/html; charset=gb2312 >
< meta name=GENERATOR content=
Microsoft FrontPage 4.0 >
< meta name=ProgId content=
FrontPage.Editor.Document >
< title >追加一条新记录< /title >
< /head >
< body >
< % if request.form(cmdok)=确定 then % >
< %
set dbconnection=server.createobject
(adodb.connection) dbconnection.opentest,hxl,123
sqlquery=insert 办公文件
(文件名,文件内容)
values ('request.form(Txtbiaoti)','
request.form(Txtneirong)')
set recadd=dbconnection.execute(sqlquery) % >
< % else % >
< p align=center >追加记录< /p >
< form method=POST action= >
< p >文件名：< input type=text
name=Txtbiaoti size=20 >< /p >
< p >文件内容：< /p >
< p >
< textarea rows=3
name=Txtneirong cols=60 >< /textarea >
< /p >
< p align=center >< input type=submit
value=确定 name=Cmdok >
< input type=reset value=重写
name=Cmdcancel >
< /p >< /form >
< % end if% >
< /body >
< /html >
---- ③query.asp:实现对《办公文件》数据表记录的查询。程序仅实现对《办公文件》中文件名的查询，查询结果用一个表单（Table）列出。以下是源程序：
< html >
< head >
< meta http-equiv=Content-Type
content=text/html;charset=gb2312 >
< meta name=GENERATOR content=Microsoft
FrontPage 4.0 >
< meta name=ProgId content=
FrontPage.Editor.Document >
< title >检索文件< /title >
< /head >
< body bgcolor=#ffffdd >
< %
set dbconnection=server.createobject
(adodb.connection)
dbconnection.open test,hxl,123
sqlquery=SELECT 文件名 FROM 办公文件
set resultlist=dbconnection.execute(sqlquery)
% >
< center >
< font color=red >< %=request(selectsource)% >
< /font >< font color=#008000 size=5 >< b >
有以下文件可供阅览< /b >< /font >
< hr size=5 >
< table border=1 >
< tr >
< td width=200 align=center > < b >
文件名 < /b > < /td >
< /tr >
< % do while not resultlist.eof % >
< tr >
< td valign=center width=200 >< %=resultlist
(文件名)% >< /a >< /td >
< /tr >
< %
resultlist.movenext
loop
resultlist.close
% >
< /center >
< /TABLE >
< /body >
< /html >
---- 4、总结
---- 用IE打开index.html或将文件发布到站点，进行相应的操作，即可实现对SQL Server数据库系统中《办公文件》数据表记录的追加和查询，至此系统目标已经达到。