AS P课程设计--阅读网
来源:高二 发布时间:2020-09-22 点击:
13
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
<%
searchinfo = Request.Form("searchinfo")
Set conn = Server.CreateObject("ADODB.Connection")
Driver = "Driver={Microsoft Access Driver (*.mdb)};"
DBPath = "DBQ=" & Server.MapPath("./novel.mdb")
conn.Open Driver & DBPath
strSQL = "select id from novel where name= ‘" & searchinfo & "’"
set rs = conn.Execute(strSQL)
if not rs.eof then
select case rs.fields(0).value
case "123"
response.write "<script language=‘JavaScript’> location.href=‘目录.html’;</script>"
end select
else
response.write "<script language=‘JavaScript’> alert(‘没有找到书籍’); location.href=‘小说阅读网.asp’;</script>"
end if
Set Conn = Nothing
%>
</head>
<body>
</body>
</html>
这样就实现了搜索的功能,利用了数据库
4. 实验收获
通过本周的课程设计,在老师和同学的帮助下顺利的完成了所选的小说阅读网课题,对于HTML网页设计、VBScript脚本语言,以及数据库的创建有了更深一步的认识,将上学期所学的ASP知识与实践相结合,能够更加熟悉掌握所学的知识,充分的认知到理论与实践相结合的重要性。一个课题的完成需要充分的准备,例如需求分析,提出解决方案,绘制功能模块,寻找有用素材等等工作。在进行小说阅读网的创建过程中,遇到了如何将网页与数据库连接,如何准确的使用VBScript语言等问题,经过不懈的努力,终于将这些问题解决,成功的小说阅读网。这一周让我受益匪浅。
14
推荐访问:英语美文阅读网 阅读网 课程设计