【www.gdgbn.com--Access】

---- 本文着重介绍通过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&“"

本文来源:http://www.gdgbn.com/shujuku/3472/