③添加成功后回到管理员页(gly.asp)。
编程语言:VBScript
⑵模块接口:
调用模块名:gly.asp
被调用模块名:add.asp、gly.asp
输入数据文件名:add.asp
输出数据文件名:add.asp、books.asp
主要的表单对象、内存变量和数据库表的字段:
表单 数据库表字段
语意 addfrom add.asp post 内存变量 books.mdb books
标题 title text 文本框 stitle title 文本
内容 intro textarea 多行文本框 sintro intro 备注
添加 submit submit 按钮
重设 submit1 reset 按钮
⑶处理概要
通过add.asp中的表单输入数据,若其中的图书的标题及内容不为空,建立记录集对象,指定相关属性,打开记录集,通过记录集对象的addbook方法添加记录到数据库(books.asp)表(books)中,然后返回管理员页(gly.asp)。
第四章 详细设计
4.1程序流程图
图4-1 图书、论坛添加流程图
4-2 修改流程图
4-3 删除记录
4.2 主要窗体功能及实现办法
(1)系统首页
它的功能主要是浏览和链接各个子功能模块,用户可以进入不同的界面,可以在主页index.asp浏览,管理员登录可进入 gly.asp。主界面也包含一些重要的浏览等功能,如:特色图书的的、推荐图书、新书推荐的浏览、总体浏览以及进入论坛等。主界面如图4-4所示:
主页中链涟接都要用到数据库里的信息,必须和数据库进行连接,所以这里首先介绍连接数据库的方法,本系统中和数据库的连接使用代码实现都是通过调用文件: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)
%>
<p align="center"><font size="6">图书管理</font></p>
<table width="75%" border="1" align="center">
<tr>
<td><div align="center">图书名</div></td&