菜单导航

Flash+ASP+XML+Access开发留言本(图文教程)

作者: 精装之家 来源: 精装之家 发布时间: 2019年10月10日 12:31:02

开发Flash留言本一直都是Flash后台交互的进阶技术,本例通过ASP和XML简单高速地同数据库交互。教程介绍的很详细,思路也很清晰,教程很实用,转发过来,希望对大家有所帮助!

本例思路:
<1> 创建数据库。
<2> 编写ASP程序。
<3> 在Flash中制作留言本皮肤。
<4> 编写AS与ASP程序交互。

实例步骤:
(1)先安装IIS服务器,安装方法请查阅相关资料。
(2)交互流程:

显示:使用ASP读取数据库数据再输出成XML,Flash再去读取这个XML文件。

留言:Flash将用户输入留言内容发送给ASP,ASP接收到数据后再存入数据库。

交互流程如图所示。

Flash+ASP+XML+Access开发留言本(图文教程)

图14-1 流程图

(3)本范例使用到的三个ASP文件为:

“head/conn.asp”打开数据库。

“listXML.asp”读取ACCESS数据库里的数据并转化为XML格式显示出来。

“post.asp”接收Flash里的值存入数据库。

(4)先创建数据库名为“db.mdb”,新建一个表名为“book”,各字段与作用如图14- 2所示.

Flash+ASP+XML+Access开发留言本(图文教程)

图14-2 新建表

(5)先编写打到数据库的conn.asp文件。

ASP/Visual Basic代码


复制代码

代码如下:

<%
Db = "head/db.mdb"
conn = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(db)
%>

(6)编写显示留言列表的ASP文件listXML.asp,先打开表“book”。

ASP/Visual Basic代码


复制代码

代码如下:

<%@LANGUAGE="VBSCRIPT" %>
<!--#include file="head/conn.asp" -->
<%
set rs = Server.CreateObject("ADODB.Recordset")
rs.ActiveConnection = conn
rs.Source = "SELECT * FROM book ORDER BY id DESC"
rs.CursorType = 0
rs.CursorLocation = 3
rs.LockType = 1
rs.Open()
%>

(7)在Flash中读取数据库数据时,还要考虑分页的问题,我们每次默认读取10条数据可以在调用时设置显示条数,使用变量“itemNum”。并判断当前显示的页码,使用变量“pageNum”。

ASP/Visual Basic代码


复制代码

代码如下:

<%
Dim itemNum,pageNum,recordTotal
itemNum = Request.QueryString("itemNum")
If itemNum <> "" Then
itemNum = Int(itemNum)
else
itemNum =10
end if
recordTotal = rs.RecordCount
pageNum = Request.QueryString("pageNum")
If pageNum <> "" Then
pageNum = Int(pageNum)
rs.move(pageNum*itemNum)
end if
%>

(8)将数据打印成XML文件现显出来。

ASP/Visual Basic代码


复制代码

代码如下:

<?xml version='1.0' encoding='gb2312'?>
<XML total='<%=(recordTotal)%>'>
<%
While ((itemNum <> 0) AND (NOT rs.EOF))
%>
<%
id=rs("id")
myname=Trim(rs("name"))
mytitle=Trim(rs("title"))
msg=Trim(rs("msg"))
qq=Trim(rs("qq"))
redate=Trim(rs("date"))
%>
<item title="<%=mytitle%>" msg="<%=msg%>" qq="<%=qq%>" date="<%=redate%>"/>
<%
itemNum=itemNum-1
if NOT rs.EOF then
rs.MoveNext()
end if
Wend
%>
</XML>

技术看板:代码解释

第27行,标识XML版本与语言类型。

第28行,使用属性total记录数据库所有数据。

第40行,输出XML元素,每条记录着一条用户留言。

(9)使用IE浏览“listXML.asp”,这个XML文件的结构比较简单,每条留言记录都是一个XML节点名为“item”,使用节点属性来存放数据,XML结构可以更为简洁,如图14-4所示。

Flash+ASP+XML+Access开发留言本(图文教程)

图14-3 listXML.asp

(10)打开Flash先制作一个用于显示留言列表的“显示条”,画个矩形背景再创建两个文本框名为“title”和“date”用来显示标题和日期,如图14-5所示。

Flash+ASP+XML+Access开发留言本(图文教程)

图14-4 制作“显示条”

(11)将“显示条”转化为影片剪辑名为“item”,类路径为“com.GB4.Item”,如图1- 所示。

Flash+ASP+XML+Access开发留言本(图文教程)

图14-5 转化为影片剪辑

(12)编写显示条的AS类文件“Item.as”。