个人动态网站设计 毕业论文
说明： 文章内容仅供预览，部分内容可能不全。下载后的文档，内容与下面显示的完全一致。下载之前请确认下面内容是否您想要的，是否完整无缺。
支持正版，从我做起， 一 切 是 在 为 了 方 便 大 家！知识就是力量！ 绝密文件， 核心资料， 拒绝盗版， 1 河 南 农 业 大 学 本 科 生 毕 业 论 文 （ 设 计 ） 题 目 个人动 态 网 站 设 计 学 院 机电工程学院 专业班级 学生姓名 指导教师 撰写日期： 2 摘 要 现在网络已经成为了我们生活中不可缺少的元素， 简单的 HTML 网页但它已不能 满足人们想互动或者随时更新网站内容的需求，所以应用而生的是一种动态网页技 术。本网站是用 ASP 语言和 Vbscript 脚本语言实现，后台数据选用 office Access 数据库， 可以实行最基本的功能如， 站内留言， 写日志， 音乐播放与下载， 相册浏览， 网站浏览人数统计以及后台管理的功能。其中留言，日志和音乐页面用到了动态 ASP 技术， 实现网站的即时更新， 相册， 个人档案等则是纯粹的静态页面 . 可以这样理解， 动态网页其实是服务器根据用户提交的条件而生成的一个静态页面。 关键词 ： ASP 技术，动态网站，网页 3 Personal dynamic website design Abstract Now the network has become indispensable elements in our life, Past simple HTML page can not satisfy us to do something like interacting or updating website content, So the dynamic web technology comes. This site has been developed by Vbscript and ASP scripting language, And the office Access database has been used, which can implemented some basic functions such as message, log, music playing or down, browsing the photos of myself, counting the visitors of my web, as well as the back-stage management. In other words, the dynamic web actually is a static page generated by the server which is based on the user ’ s condition . Key Words ： ASP technology ； dynamic website ； web page 4 目 录 1 引言 ............................................................. - 1 - 2 开发技术 ............................................................. 2 2.1 IIS ................................................................ 2 2.1.1 IIS 的添加 ....................................................... 3 2.1.2 IIS 的运行 ....................................................... 3 2.2 ASP 简介 ........................................................... 4 2.3 office Access 数据库 ............................................... 4 2.4 Microsoft Dreamweave 8 简介 ....................................... 5 2.5 adode Photoshop CS ................................................. 5 3 网站设计 ............................................................. 5 3.1 数据库的设计 ....................................................... 5 3.2 图片准备 ........................................................... 7 3.3 首页的制作 ......................................................... 8 3.4 音乐页面制作 ....................................................... 9 3.4.1 音乐数据库链接 ................................................... 9 3.4.2 播放与下载页面 .................................................. 11 3.5 留言页面制作 ...................................................... 13 3.5.1 留言模板的建立 .................................................. 13 3.5.2 查看留言 ........................................................ 14 3.5.3 写留言 .......................................................... 15 3.5.4 管理员回复与删除 ................................................ 15 3.6 日志页面制作 ...................................................... 17 3.7 相册页面的制作 .................................................... 18 3.8 友情链接板块 ...................................................... 19 参考文献 .............................................................. 20 致 谢 ................................................................. 21 附录 1 ：写留言模块源代码 .............................................. 22 5 附录 2 ：管理员删除页面源代码 ......................... 2 错误！未定义书签。 6 1 引言 随着科技的进步， 时代的发展， 计算机信息行业的逐步壮大， 加上人们也越来越 离不开各种各样的信息， 对信息的追求更是越来越迫切了， 因此计算机信息的发展也 必须适应这一潮流。 然而现代社会的人们喜欢在网络上张显自己的个性， 写出自己的 心情， 记下身边一些奇怪有趣的事， 在网络上粘贴自己个性的相册， 制作自己个人的 网站，有些用于商业目的，有些用于娱乐，但最终都是满足了自己的爱好，同时又学 到了自己需要的知识。 由于本人的知识水平有限， 实际的经验也不足， 所以所制作出 来的作品有许多的不足和漏洞， 希望大家提出宝贵的意见和批评。 以下是我的设计思 想 第一步：确定网站结构 网站包括那些栏目， 采用怎样的制作结构， 这些都是我们在制作网站前要首先确 定的， 网站结构为以后的设计奠定了基础。 合理的网站栏目结构其实并没有什么特别 之处， 但是能直观正确的表达网站的基本内容及其内容之间的层次关系， 站在用户的 角度考虑，使得用户在网站浏览时可以方便的获取信息，不至于迷失。 图 1-1 是我个人网站的结构图： 图 1-1 网站结构图 第二步：确定网站风格 - 1 - 风格是抽象的， 是指网站饿整体形象给浏览者的综合感受。 这个整体形象包括网 站色彩，字体，版面布局，浏览方式，文字，语气等诸多因素，网站可以是平易近人 的、生动活泼的也可以是专业严肃的。不管是色彩、文字、布局还是交互方式，只要 能由此让浏览者明确分辨出这是你网站独有的， 这就是网站的风格。 我的网站坚持使 用纯色或者颜色比较一致的图片做背景， 这样是读者看起来不至于产生幻觉， 风格的 形成不是一次定位的，我们可以在事件中不断强化、改进、调整。 第三步：给网站申请域名 域名是联接网站和互联网网址的纽带， 它像品牌、 商标一样具有重要的识别作用， 是访问者通达网站的“钥匙”， 是网站在网络上存在的标志， 担负着标示站点和导向 网站站点的双重作用。 在选取域名的时候，首先要遵循两个基本原则。 1 ．域名应该简明易记，便于输入 这是判断域名好坏最重要的因素。 一个好的域名应该短而顺口， 便于记忆， 最好 让人看一眼就能记住，而且读起来发音清晰，不会导致拼写错误。此外，域名选取还 要避免同音异义词。 2 ．域名要有一定的内涵和意义 用有一定意义和内涵的词或词组作域名， 不但可记忆性好， 而且有助于实现企业 的营销目标。 例如个人爱好， 喜欢的词语或者企业网站的话可以选择企业名称、 产品 名称等都是不错的选择， 这样能更加方面记忆以及加强宣传作用。 一个好的域名会大 大增加网站在互联网上的知名度，本站注册 lmonkey 就取之简记 , 因此，如何选取好 的域名就显得十分重要。 对于初学者来说可以申请免费域名来检测，本站在 5944.net 注册了免费空间， 网站为 http://lmonkey.8c8c.info/ ， 因为是免费的所以空间不太稳定并且有一定 的时间限制。 2 开发技术 2.1 IIS IIS 是 Internet Information Server 的缩写， 它是微软公司主推的 Web 服务器， 基于运行 Microsoft Windows 的互联网基本服务。最初是 Windows NT 版本的可选包， 随后内置在 Windows 2000 、 Windows XP Professional 和 Windows Server 2003 一起 - 2 - 发行，但在普遍使用的 Windows XP Home 版本上并没有 IIS 。 IIS 意味着你能发布网 页，并且有 ASP （ Active Server Pages ） 、 JAVA 、 VBscript 产生页面，有着一些扩展 功能。它的一个重要特性是支持 ASP ， IIS3.0 版本以后引入了 ASP ，可以很容易的张 贴动态内容和开发基于 Web 的应用程序。 2.1.1 IIS 的添加 进入“控制面板” ，依次选“添加 / 删除程序→添加 / 删除 Windows 组件” ，将 “ Internet 信息服务（ IIS ） ”前的小钩去掉（如有） ，重新勾选中后按提示操作即可 完成 IIS 组件的添加。用这种方法添加的 IIS 组件中将包括 Web 、 FTP 、 NNTP 和 SMTP 等全部四项服务。 2.1.2 IIS 的运行 当 IIS 添加成功之后，再进入“开始→设置→控制面板→管理工具→ Internet 服务管理器 (Internet 信息服务 ) ”以打开 IIS 管理器，对于有“已停止”字样的服 务，均在其上单击右键，选“启动”来开启 [1] 。 安装成功后的页面如下（ IIS 默认的网站 http://localhost/ ） ： 图 2-1 IIS 安装测试成功页面 - 3 - 2.2 ASP 简介 ASP 是一种服务器端脚本编写环境， 可以用来创建和运行动态网页或 Web 应用程 序。 ASP 网页可以包含 HTML 标记、普通文本、脚本命令以及 COM 组件等。利用 ASP 可以向网页中添加交互式内容 （如在线表单） ， 也可以创建使用 HTML 网页作为用户界 面的 web 应用程序。 与 HTML 相比， ASP 网页具有以下特点： （ 1 ）利用 ASP 可以实现突破静态网页的一些功能限制，实现动态网页技术； （ 2 ） ASP 文件是包含在 HTML 代码所组成的文件中的，易于修改和测试； （ 3 ）服务器上的 ASP 解释程序会在服务器端执行 ASP 程序，并将结果以 HTML 格式传送到客户端浏览器上，因此使用各种浏览器都可以正常浏览 ASP 所产生的网 页； （ 4 ） ASP 提供了一些内置对象，使用这些对象可以使服务器端脚本功能更强。 例如可以从 web 浏览器中获取用户通过 HTML 表单提交的信息，并在脚本中对这些信 息进行处理，然后向 web 浏览器发送信息； （ 5 ） ASP 可以使用服务器端 ActiveX 组件来执行各种各样的任务，例如存取数 据库、发送 Email 或访问文件系统等。 （ 6 ） 由于服务器是将 ASP 程序执行的结果以 HTML 格式传回客户端浏览器， 因此 使用者不会看到 ASP 所编写的原始程序代码，可防止 ASP 程序代码被窃取。 (7) 开发需要有丰富的经验 , 否则会留出漏洞 , 让黑客利用进行注入攻击 . 当在 Web 站点中融入 ASP 功能后，将发生以下事情： 1 、用户向浏览器地址栏输入网址，默认页面的扩展名是 .asp 。 2 、浏览器向服务器发出请求。 3 、服务器引擎开始运行 ASP 程序。 4 、 ASP 文件按照从上到下的顺序开始处理，执行脚本命令，执行 HTML 页面 内容。 5 、页面信息发送到浏览器 。 [2] 2.3 office Access 数据库 Access 是 微 软 公 司 推 出 的 基 于 Windows 的 桌 面 关 系 数 据 库 管 理 系 统 （ RDBMS ，即 Relational Database Management System ） ，是 Office 系列应用 - 4 - 软件之一。它提供了表、查询、窗体、报表、页、宏、模块 7 种用来建立数据 库系统的对象；提供了多种向导、生成器、模板，把数据存储、数据查询、界 面设计、报表生成等操作规范化；为建立功能完善的数据库管理系统提供了方 便，也使得普通用户不必编写代码，就可以完成大部分数据管理的任务。 ASP 访问数据库的方式：在 ASP 脚本中可以通过 ADO （ activex data objects ）方式 访问数据库 [3] 。 2.4 Microsoft Dreamweave 8 简介 Dreamweave 是 Macromedia 公司推出的可视化网页制作工具， 是较受网页设 计人员欢迎的网页制作软件之一， 是网站建设不可缺少的工具之一。 Macromedia Dreamweave 8 是建立 Web 站点和应用程序的专业工具。它将可视布局工具、应 用程序开发功能和代码编辑支持组合在一起，其功能强大，在编辑上可以选择 可视化方式或者源码编辑方式 [4] 。 2.5 adode Photoshop CS Photoshop 是世界顶尖级的图像设计与制作工具软件。 图像处理是对已有的 位图图像进行编辑加工处理以及运用一些特殊效果，其重点在于图像的处理加 工。 在表现图像中的阴影和色彩的细微变化方面或者进行一些特殊效果处理时， 使用位图形式是最佳的选择，他在这方面的优点是矢量图无法比拟的。 3 网站设计 3.1 数据库的设计 本 网 站 中 用 到 四 个 数 据 库 分 别 是 音 乐 数 据 库 Music.mdb 、 留 言 数 据 库 Massage.mdb 、日志数据库 suibi.mdb 、网站计数器数据库 jsp.mdb 。页面如下： - 5 - 图 3-1 Music.mdb 音乐数据库 图 3-2 Massage.mdb 留言数据库 - 6 - 图 3-3 Suibi.mdb 日志数据库 图 3-4 jsp.mdb 网站计数器数据库 3.2 图片准备 在做网站之前首先就是准备素材，包括网站内容，背景图片等，可以在网 上搜到各种各样的图片素材，然后用 Photoshop 处理，最后得到符合网站需要 的图片。 - 7 - 3.3 首页的制作 图 3-5 代码设计窗口 该窗口即是 Dreamweaver 8 的设计窗口，以下的代码均在此窗口中完成，包括图 片，表格等的插入以及网页页面的设计排版等。 图 3-6 首页面 index.asp 首页为 index.asp ，链接到后台数据库 jsp.mdb, 包括网站导航，各个页面 的连接以及后台管理入口和其他友情连接，和网站计数器等。在页面右侧的应 - 8 - 用程序窗口中点击数据库下的“ + ”选择“自定义连接字符串”弹出窗口 3-8 所 示，在连接字符串中输入 "Provider=Microsoft.Jet.OLEDB.4.0;datasource=" &server.mappath("\data\jsp.mdb") 连接到计数器数据库 [5] 。 运行页面如图 3-7 所示： 图 3-7 首页浏览 3.4 音乐页面制作 3.4.1 音乐数据库链接 点击 Dreamweaver 8 界面右侧的应用程序窗口。点击“ + ”在弹出的菜单中选中 “自定义链接字符串” ，弹出自定义链接字符串窗口如图 3-8 所示： 图 3-8 自定义链接字符串 - 9 - 在链接字符串中输入如下字符： "Provider=Microsoft.Jet.OLEDB.4.0;datasource="&server.mappath("\data\ music.mdb") 点击“测试”出现如图 3-9 所示即实现了链接数据库。 图 3-9 链接成功 生成的 Dreamweaver 界面中代码如下： <% ' FileName="Connection_ado_conn_string.htm" ' Type="ADO" ' DesigntimeType="ADO" ' HTTP="true" ' Catalog="" ' Schema="" Dim MM_music_STRING MM_music_STRING="Provider=Microsoft.Jet.OLEDB.4.0;datasource="&server .mappath("\data\music.mdb") %> <% Dim RS1 Dim RS1_numRows Set RS1 = Server.CreateObject("ADODB.Recordset") RS1.ActiveConnection = MM_music_STRING RS1.Source = "SELECT * FROM tMusic" RS1.CursorType = 0 RS1.CursorLocation = 2 RS1.LockType = 1 RS1.Open() RS1_numRows = 0 - 10 - %> [6] 3.4.2 播放与下载页面 播放 图 3-10 音乐页面 点击播放按钮，将弹出 ActiveX 插件，调用 Windows Media Player 播放选中的 歌曲， 他们之间是通过歌曲数据库中歌曲的 MusicPath 即歌曲路径来实现播放， 为了 节省空间，我是从其他网站上找到歌曲 ID ，这样做虽然节省了空间，但有一个缺点 就是如果所链接网站上的歌曲源地址发生改变， 那么这个歌曲在次网站则无法播放或 者找不到文件。 图 3-11 音乐播放页面 其中代码为： classid="CLSID:22d6f312-b0f6-11d0-94ab-0080c74c7e95" align="baseline" border="0" standby="Loading Microsoft Windows Media Player components..." type="application/x-oleobject"> - 11 - value="<%=(RS1.Fields.Item("MusicPath").Value)%>" /> [7] 点击音乐页面的下载按钮则运行如图 3-12 所示： - 12 - 图 3-12 音乐下载页面 同样也是通过传递歌曲 MusicPath 实现 Response.Redirect(RS1.Fields.Item("MusicPath").Value) 3.5 留言页面制作 3.5.1 留言模板的建立 Dreamweaver 模板是一种特殊类型的文档，用于设计“固定的”页面布局；然后 您便可以基于模板创建文档， 创建的文档会继承模板的页面布局。 设计模板时， 可以 指定在基于模板的文档中哪些内容是用户“可编辑的”。 使用模板可以一次更新多 个页面。 从模板创建的文档与该模板保持连接状态。 可以修改模板并立即更新基于该 模板的所有文档中的设计 [8] 。 使用模板可以使网页看起来更美观整齐， 有利于保持网页风格一致， 并且提高工 作效率。 留言模板页如图 3-13 所示： - 13 - 图 3-13 留言模板 模板中用到了动态文本的效果， “有事请留言，我会尽快回复！ ”实现动态效果只 需要为文本添加一个页面标签： 有事请留言 , 我会及时回复 ! [8] 3.5.2 查看留言 点击首页的“给我留言”即可进入查看页面，显示所有留言，且是倒叙显示， 即后留言的显示在最顶端，这样方便浏览和管理员操作。留言显示了用户姓名、 QQ 、 留言主题、留言内容、以及管理员是否回复和留言时间。如图 3-14 所示。 - 14 - 图 3-14 查看留言 3.5.3 写留言 进入查看留言页面即可点击“写留言”进行操作，其中的姓名、 QQ 、主题、内容 都是必须填写的，填写完后点击提交留言即可（代码见附录代码 I ） 。用户留言界面 如图 3-14 所示： 图 3-15 写留言页面 3.5.4 管理员回复与删除 这个页面也即是后台操作的一部分， 只有管理员登陆后才可以进行相应的修改， 其中管理员删除页面的代码见附录代码 II 。 - 15 - 图 3-16 登陆页面 图 3-17 管理员登陆留言页面 - 16 - 图 3-18 管理员回复页面 3.6 日志页面制作 图 3-19 日志浏览页面 日志页面包括浏览页面 sbindex.asp 和管理页面 sbadmin.asp ， 浏览者只可以浏 览日志，管理者可以写日志，日志板块用到模板 suibi1.dwt, 这样可以使日志看起来 更美观。 运行页面如图 3-20 ： - 17 - 图 3-20 日志页面 后台管理页面比浏览页面多了写日志和删除日志功能，日志页面的不足之处在 与浏览者不能参与回复，只能查看。 3.7 相册页面的制作 图 3-21 相册页面 Photo.asp 、 flower.asp 、 beautiful.asp 分别为网站的三个相册，中间应用模 板 myphoto.dwt 。网站相册的不完善之处在于它不能实现在线添加相册或删除，必须 更新页面才可以实现，这是不足之处，以后有待完善。 - 18 - 3.8 友情链接板块 友情链接板块包括招聘网站、 购物网站、 新闻网站， 仅是个人上网比较喜欢浏览 的网址，在此仅供参考如图 3-22 所示： 图 3-22 首页中的友情链接 - 19 - 参考文献 [1] 刘瑞阳，黎卫东，黄炳强 .Dreamweaver 8+ASP 动态网站开发从入门到精通 人民邮电出版社 [2] 倪洪球 .Dreamweaver 8+ASP 动态网站开发实例精讲 人民邮电出版社 [3] 龙马工作室编著 .asp+access 网站开发实例精讲 人民邮电出版社 [4] 戌马工作室编著 Dreamweaver8 与 ASP 动态网站开发自学导航北京：机械工业出版社， 2006.01 [5] 昭君工作室编著 Dreamweaver 8 中文版网站开发自学导航北京：机械工业出版社， 2006.01 [6] 戎马工作室编著 ASP 动态网站开发自学导航 北京：机械工业出版社， 2006.01 [7] 刘瑞新主编 ASP 动态网站开发毕业设计指导及实例 北京：机械工业出版社， 2006.01 [8] 王峰 基于 IIS+ASP+access 模式的网站安全问题研究 《电脑知识与技术》 2008 年 19 期 [9] 潘超 ASP 开发的网站安全浅析 《中国科技博览》 2009 年 6 期 - 20 - 致 谢 将近一个月的毕业设计让我确确实实学到了不少东西， 从对网站的一无所知到现在的简单建 站，我有一种小小的成就感，当然这中间离不了李勉老师的指导，李老师总能在我不知所措的时 候给我帮助，并且不时的提出新的任务让我做得更好，在这里我由衷的感谢李老师。 感谢机电工程学院所有的老师对我的教育和培养，我在这四年的学习中，丰富了知识层面， 学会了做人的道理，受益匪浅。在此我对学院的所有老师表示深深的敬意 ! 四年的时间对于整个人生而言，也许是短暂而微不足道的。但即将过去的这四年对我而言， 却是人生一个重要的里程碑，深刻而难忘。一个人的成长绝不是一件孤立的事，没有别人的支持 与帮助绝不可能办到。 no one can survive without help from others. 我感谢可以有这样一个空间，让 我对所有给予我关心、帮助的人说声 “ 谢谢 ” ！今后，我会继续努力，好好工作！好好学习！好好 生活！ - 21 - 附录 1 ：写留言模块源代码 <%@LANGUAGE="VBSCRIPT"%> <% ' *** Edit Operations: declare variables Dim MM_editAction Dim MM_abortEdit Dim MM_editQuery Dim MM_editCmd Dim MM_editConnection Dim MM_editTable Dim MM_editRedirectUrl Dim MM_editColumn Dim MM_recordId Dim MM_fieldsStr Dim MM_columnsStr Dim MM_fields Dim MM_columns Dim MM_typeArray Dim MM_formVal Dim MM_delim Dim MM_altVal Dim MM_emptyVal Dim MM_i MM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME")) If (Request.QueryString <> "") Then MM_editAction = MM_editAction & "?" & Server.HTMLEncode(Request.QueryString) End If ' boolean to abort record edit MM_abortEdit = false ' query string to execute MM_editQuery = "" %> <% ' *** Insert Record: set variables If (CStr(Request("MM_insert")) = "form1") Then MM_editConnection = MM_conmassage_STRING MM_editTable = "massagedata" MM_editRedirectUrl = "lyindex.asp" MM_fieldsStr = "textfield|value|textfield3|value|textfield4|value|textarea|value" MM_columnsStr = "name|',none,''|QQ|',none,''|title|',none,''|content|',none,''" - 22 - ' create the MM_fields and MM_columns arrays MM_fields = Split(MM_fieldsStr, "|") MM_columns = Split(MM_columnsStr, "|") ' set the form values For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2 MM_fields(MM_i+1) = CStr(Request.Form(MM_fields(MM_i))) Next ' append the query string to the redirect URL If (MM_editRedirectUrl <> "" And Request.QueryString <> "") Then If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0 And Request.QueryString <> "") Then MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString Else MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString End If End If End If %> <% ' *** Insert Record: construct a sql insert statement and execute it Dim MM_tableValues Dim MM_dbValues If (CStr(Request("MM_insert")) <> "") Then ' create the sql insert statement MM_tableValues = "" MM_dbValues = "" For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2 MM_formVal = MM_fields(MM_i+1) MM_typeArray = Split(MM_columns(MM_i+1),",") MM_delim = MM_typeArray(0) If (MM_delim = "none") Then MM_delim = "" MM_altVal = MM_typeArray(1) If (MM_altVal = "none") Then MM_altVal = "" MM_emptyVal = MM_typeArray(2) If (MM_emptyVal = "none") Then MM_emptyVal = "" If (MM_formVal = "") Then MM_formVal = MM_emptyVal Else If (MM_altVal <> "") Then MM_formVal = MM_altVal ElseIf (MM_delim = "'") Then ' escape quotes MM_formVal = "'" & Replace(MM_formVal,"'","''") & "'" Else MM_formVal = MM_delim + MM_formVal + MM_delim End If End If - 23 - If (MM_i <> LBound(MM_fields)) Then MM_tableValues = MM_tableValues & "," MM_dbValues = MM_dbV alues & "," End If MM_tableValues = MM_tableValues & MM_columns(MM_i) MM_dbValues = MM_dbValues & MM_formVal Next MM_editQuery = "insert into " & MM_editTable & " (" & MM_tableValues & ") values (" & MM_dbValues & ")" If (Not MM_abortEdit) Then ' execute the insert Set MM_editCmd = Server.CreateObject("ADODB.Command") MM_editCmd.ActiveConnection = MM_editConnection MM_editCmd.CommandText = MM_editQuery MM_editCmd.Execute MM_editCmd.ActiveConnection.Close If (MM_editRedirectUrl <> "") Then Response.Redirect(MM_editRedirectUrl) End If End If End If %> html PUBLIC "-//W3C//DTD XHTML 1.0 "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> xmlns="http://www.w3.org/1999/xhtml"> </word><word ps='' class=''>用户留言界面</word><word ps='' class=''> width="674" background="../image/eight/down2.gif">align="center"> - 25 - class="STYLE1"> 留言薄
width="66">align="right">src="../image/dong1.gif" alt="fei1" width="65" height="46" border="0" usemap="#Map" />
scrollamount="3" scrolldelay="10" loop="-1"> 有事请留言 , 我会及时回复 !
浏 览 留 言 name="Map" id="Map">shape="circle" coords="32,27,18" href="../index.asp" alt="index.asp" /> - 27 - 附录 2 ：管理员删除页面源代码 <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% if(Request("id") <> "") then Command1__strid = Request("id") %> <% set Command1 = Server.CreateObject("ADODB.Command") Command1.ActiveConnection = MM_conmassage_STRING Command1.CommandText = "DELETE FROM massagedata WHERE id=" + Replace(Command1__strid, "'", "''") + "" Command1.CommandType = 1 Command1.CommandTimeout = 0 Command1.Prepared = true Command1.Execute() %> html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <% if(commdel_strid<>"")then set commdel=server.CreateObject("ADODB.Command") commdel.ActiveConnection=MM_conmassage_STRING commdel.CommandText="DELETE FROM massagedata WHERE id ="+Replace(Commdel_strid,""",""")+"" Commdel.CommandType=4 Commdel.CommandTimeout=0 Commdel.Prepared=true commdel.Execute() end if ' 执行删除操作后，转到其他页面 response.Redirect("lyadmin.asp") %> </word><word ps='' class=''>删除留言</word><word ps='' class=''> - 28 - 本文来源：https://www.wddqw.com/doc/86f446da4593daef5ef7ba0d4a7302768e996fd6.html