主页中链涟接都要用到数据库里的信息,必须和数据库进行连接,所以这里首先介绍连接数据库的方法,本系统中和数据库的连接使用代码实现都是通过调用文件:odbc_connection.asp来实现的该文件的代码如下:
<%
Dim db,connstr
connstr="Dbq="&Server.Mappath("shuji.mdb")&";Driver={Microsoft Access Driver (*.mdb)}"
Set db=Server.CreateObject("ADODB.Connection")
db.Open connstr
%>
该代码是使用ADO技术来存取符合ODBC标准数据库的内容,在这里有好多种连接数据库的方法在这里我们运用的是不用数据源的连接方法,另外,我们采用了SERVER对象的MAPPATH方法,它的作用是通过MAPPATH方法可以将虚拟路径转化为上面的物理路径。增强整个文件的可移植性。用到的页面只需用<!--#include file="odbc_connection.asp"-->把这个文件包含进来就可以了。
(2)默认页的实现
默认页包括进入主页和管理员登陆,可以链接到具体的页面。进入主页后可查看图书管理,
图书管理的页面具体的实现:
<% option explicit%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>
<body background="image/4B26169335.9.gif">
<%
dim db
set db=server.createobject("ADODB.connection")
db.open "driver={microsoft access driver (*.mdb)};dbq=" &server.MapPath("books.mdb")
dim strsql,rs
strsql="select * from books order by id"
set rs=db.execute(strsql)
%>