---- 本文着重介绍通过IIS4.0服务管理中ASP脚本语言实现访问Access数据库，至于如何创建系统DSN这里一带而过，有兴趣的读者自己可以去试一试。 

----首先，创建一个Access数据库,其中含有姓名、部门名称、部门费用的字段名。 

----其次,在安装IIS4.0的WWW服务器上，打开ODBC，创建系统DSN，数据源名ABC，选取对应的Access数据库，建立好后就可以开始写ASP程序了。 

----根据需要我们想对Access数据库中的部门名称按照不同的部门进行查询，按照费用金额的大小进行查询。 

----按照部门名称查询创建shujuku5.asp,ASP的程序源代码如下： 

< html > 
　　< body > 
　　< ％ 
　　Set Connect=Server.CreateObject(“ADODB.Connection") 
　　Connect.Open “abc" 
　　s=Request(“menu1") 
sql=“select ＊ from sheet1 where 
部门名称=”＆“‘"＆s＆“'" 
　　Set rs=Connect.Execute(sql) 
　　％> 
　　< table border=1 cellspacing=1 > 
　　< tr bgcolor=“＃00ffff" > 
　　< ％For i=0 TO 7％ > 
　　< td size=1 > < b >< ％=rs(i).Name％ >< /b > 
　　< td >< ％Next％ > 
　　< tr > 
　　< ％Do While Not rs.EOF％ > 
　　< tr > 
　　< ％For i=0 TO 7％ > 
　　< td size=1 >< ％=rs(i)％ >< td > 
　　< ％Next％ > 
　　< /tr > 
　　< ％rs.MoveNext 
　　Loop 
　　％ > 
　　< ％ 
　　rs.Close 
　　Connect.Close 
　　％ > 
　　< /table > 
　　< /body > 
　　< /html > 

----按照费用金额创建shujuku4.asp，ASP源代码程序如下： 

　　< html > 
　　< body > 
　　< ％ 
　　Set Connect=Server.CreateObject(“ADODB.Connection") 
　　Connect.Open “ABC" 
　　r=Request(“textfield") 
　　s=Request(“menu2") 
　　if s=“大于" then 
　　sql=“select ＊ from sheet1 where 费用金额 >"＆r＆“" 
　　elseif s=“小于" then 
　　sql=“select ＊ from sheet1 where 费用金额< "＆r＆“" 
　　elseif s=“等于" then 
　　sql=“select ＊ from sheet1 where 费用金额="＆r＆“" 
　　elseif s=“大于等于" then 
　　sql=“select ＊ from sheet1 where 费用金额 >="＆r＆“" 
　　elseif s=“小于等于" then 
　　sql=“select ＊ from sheet1 where 费用金额< ="＆r＆“" 
　　end if 
　　Set rs=Connect.Execute(sql) 
　　％ > 
　　< table border=1 cellspacing=5 > 
　　< tr bgcolor=“＃00ffff" > 
　　< ％For i=0 TO 7％ > 
< td >< b >< font size=“2" >< ％=rs(i).Name％ > 
< /font >< /b > 
　　< td >< ％Next％ > 
　　< tr > 
　　< ％Do While Not rs.EOF％ > 
　　< tr > 
　　< ％For i=0 TO 7％ > 
　　< td size=8 >< ％=rs(i)％ >< td > 
　　< ％Next％ > 
　　< /tr > 
　　< ％rs.MoveNext 
　　Loop 
　　％ > 
　　< ％ 
　　rs.Close 
　　Connect.Close 
　　％ > 
　　< /table > 
　　< /body > 
　　< /html > 

----创建好这两个ASP文件拷贝到IIS4.0的虚拟目录 WWWROOT下，然后再用FRONTPAGE、DREAMWEAVER编写一个Html程序 bumenfeiyong.html，其源代码程序如下： 

　　< html > 
　　< head > 
　　< title >Untitled Document< /title > 
< meta http－equiv=“Content－ 
Type" content=“text/html; charset=gb2312" > 
　　< /head > 
　　< body bgcolor=“＃FFFFFF" > 
　　< div align=“center" > 
< p >< b >< font color=“＃CC3333" size=“5" > 
部门费用查询< /font >< /b >< /p > 
< p >< img src=“trees.gif" width=“600" height=“17" > 
< /p > 
< table width=“100％" border=“1" cellspacing=“10" 
bordercolor=“＃FFFFFF" > 
　　< tr bordercolor=“＃FFCCCC" > 
　　< td height=“9" > 
< form method=“post" action= 
“http://192.1.168.100/shujuku5.asp" > 
　　< select name=“menu1" > 
　　< option selected >按部门查询< /option > 
　　< option >总经理室< /option > 
　　< option >财务部< /option > 
　　< option >市场部< /option > 
　　< option >物配部< /option > 
　　< option >销售部< /option > 
　　< option >办公室< /option > 
　　< /select > 
　　< input type=“submit" name=“Submit" value=“提交" > 
　　< /form > 
　　< /td > 
　　< /tr > 
　　< tr bordercolor=“＃FFCCCC" > 
　　< td height=“15" > 
< form method=“post" action= 
“http://192.1.168.100/shujuku4.asp" > 
　　< select name=“menu2" > 
　　< option selected >费用金额< /option > 
　　< option >大于< /option > 
　　< option >大于等于< /option > 
　　< option >等于< /option > 
　　< option >小于等于< /option > 
　　< option >小于< /option > 
　　< /select > 
　　< input type=“text" name=“textfield" size=“12" > 
　　< input type=“submit" name=“Submit2" value=“提交" > 
　　< /form > 
　　< /td > 
　　< /tr > 
　　< tr bordercolor=“＃FFCCCC" > 
　　 < td >＆nbsp;< /td > 
　　< /tr > 
　　< tr bordercolor=“＃FFCCCC" > 
　　< td >＆nbsp;< /td > 
　　< /tr > 
　　< tr bordercolor=“＃FFCCCC" > 
　　< td >＆nbsp;< /td > 
　　< /tr > 
　　< tr bordercolor=“＃FFCCCC" > 
　　< td >＆nbsp;< /td > 
　　< /tr > 
　　< tr bordercolor=“＃FFCCCC" > 
　　< td >＆nbsp;< /td > 
　　< /tr > 
　　< /table > 
　　< p >＆nbsp;< /p > 
　　< /div > 
　　< /body > 
　　< /html > 

----通过以上程序的编写，再用IE5.0打开bumenfeiyong.htm 后，根据画面输入您想要得到的查询，每个部门得到不同的查询结果。在费用金额选取大于、小于、等于等选择条件，后面选取金额，就能得到大于、小于、等于某一数值的查询结果。读者还可以根据自己的需要添加更多的字段，完成不同字段的查询，其ASP源代码与以上程序大同小异。