计算机毕业论文:FLASH与ASP的组合

时间：2022-10-08 03:53:00

导语：计算机毕业论文:FLASH与ASP的组合一文来源于网友上传，不代表本站观点，若需要原创文章可咨询客服老师，欢迎参考。

计算机毕业论文:FLASH与ASP的组合

摘要：本文介绍了flash与asp组合实现动态留言板的方法与技巧、前后台信息传递，以及

SQLSERVER与ASP相关的知识。

关键词：loadVariableFILEDSN动态链接库

一、FLASH+ASP的概念

FLASH电影与在ASP的交互上有点类似于传统HTML页与ASP脚本的关系。FLASH主要是接收用户输入的信息并将脚本处理完的信息传递给用户，而幕后所有的工作都由ASP脚本来处理。

ASP作为服务器端的脚本可以访问数据库，并可以处理从FLASH中传递来的信息，然后再传递回FLASH电影，这样FLASH的功能得到极大的扩展。这们做使FLASH更人性化，可以保存用户的信息，从而诸如留言板、论坛、购物车等也可以使用FLASH来实现了。这对喜欢FLASH编程的网页设计人来说真是个激动人心的消息。

二、在FLASH和ASP中传递信息：动态留言板

在FLASH中可以使用很多种方法来和ASP传递信息。每种方法和动作都使用特别的协议通过URL编码的格式来传递信息：getURL、loadVaviables、loadMovie；三种方法使用HTTP或者HTTPS协议以XML的形式来传递信息：XML.send、XML.load、XML.sendAndLoad；还有两种方法通过建立TCP/IP的连接来以XML的形式传递信息：XMLSocket.connect、XMLSocket.send。

而我们将着重介绍loadVariable方法，使用loadvariable方法基本可以实现大多数的功能了。

成熟的网站都有自己独具风格的留言板来接受用户的意见和建议，更好地和用户交流。为了不抑止大家的更好的创意，下面笔者所介绍的FLASH只是一个普通的留言板，而把更好的想象和创意留给读者，而笔者重点介绍的是方法与脚本的实现。

FLASH留言板在后台使用SQLServer作为保存用户输入的信息和意见的数据库服务器,使用FLASH制作客户端留言板的页面。

1、数据库结构设计

为本内容的实例新增一个数据库FLASH，制作FILEDSN。在数据库中插入表message，用以保存用户输入的信息和意见建议，表中其定义三个字段（如下），分别为：

列名数据类型长度精度小数位

namechar1500

emailchar3000

messagetext1600

?Name：留言者的姓名。

?Email：留言者的Email地址。

?Message：留言。

2、简单的FLASH动态电影如下：

图1-1

说明：○1在“您的姓名：”的文本后用文字工具创建一个输入框，在文本框属性面板中选择“InputText（输入文本）”。在“Variable（变量）”框输入“name”选中“Border/Bg”选项，如图1-2所示。

图1-2设置文本框属性

○2同样在“您的Email：”文本后插入输文框，在“Variable(变量)”中分别输入“Email”。在“您的意见：”文本后插入输框，在“Variable（变量）”输入“advice”，将“Singleline（单行）”下拉框改为“Multiline（多行）”。

○3制作一个“提交”字样的FLASH按钮，如下图书1-3，其所在位置如图1-1所示。

图1-3

3、给FLASH中“提交”按钮加代码。

○1在FLASH场景中选中“提交”按钮。

○2用鼠标右键单击场景中的“提交”按钮，在弹出的菜单中选择“Actions”，在弹出的“ObjectAction(对象面板)”单击右上方的三角，选择“ExpertModel(专家模式)”。选择“On”动作，“Event(事件)”是“release（释放）”。在“Actions(动作)”中选择“LoadVariable(导入变量)”，括号中应该是（“insert.htm”，“”，“post”），意思是使用post方法向insert.htm传递信息，再传回到电影中来。全部Script脚本的如图1-4所示。

图1-4

4、ASP脚本

留言板共有两个脚本，一个是来接受用户输入的服务器端脚本insert.htm，一个是网站的管理人员察看的脚本view.htm,可以使用一般的文本编辑器来编定这两文件，如Notepad等。

Oinset.htm脚本：

<%@Lanuage=VBscript%>

<%

functionCheckStr(str)

dimtstr,c,j,i,ch

j=len(str)

fori=1toj

ch=mid(str,i,j)

ifch=”“then

tstr=tstr+””

endif

tstr=tstr+ch

next

CheckStr=tstr

endfunction

%>

<%

name=CheckStr(Request.Form(“name”))

email=CheckStr(Reques.Form(“email”))

message=CheckStr(Request.Form(“advice”))

ifemail=”“then

email=”none”

endif

ifmessage<>“”andname<>“”then

setcon=Server.CreateObject(“ADODB.Connection”)

con.Open“FILEDSN=c:\inetpub\wwwroot\aspbook\flash\flash.dsn;UID=adm;PWD=fulei”

setcmd=Server.CreateObject(“mand”)

setcmd.ActiveConnection=con

mandText=“insertintomessage(name,email,message)

Values(‘“&name&”’,‘“&email&”’,‘“&message&”’)”

cmd.Execue

Response.Write(“flag=操作成功”)

elseifmessage=””then

Response.Write(“flag=操作失败，留言为空”)

elseifname=”“then

Response.Write(“flag=操作失败，请留下芳名”)

else

Response.Write(“flag=操作失败，内部错误”)

endif

con.close

%>

说明：本脚本开始定义了一个函数CheckStr用于检查字段中是否有单引号（单引号会使插入记录的SQL语句发生错误），然后得到从FLASH中传来的几个参数。如果所有参数都符合要求则插入记录，flag用以记录插入的结果。使用Response.write将flag变量传回FLASH电影中。

view.htm脚本：

<%@Lanuage=VBScript”%>

<html>

<head>

<%

setcon=Server.CreateObject(“ADODB.Connection”)

con.Open“FILEDSN=c:\inetpub\wwwroot\aspbook\flash\flash.dsn;

UID=adm;PWD=fulei”

setcmd=Server.CreateObject(“mand”)

setcmd.ActiveConnection=con

setrec=Server.CreateObject(“ADODB.Recordset”)

mandText=”select*frommessage”

setrec=cmd.Execute

%>

</head>

<body>

<%

Response.Write(“<tablewidth=’75%’border=’1’“)

Response.Write(“<tr><td>留言者</td><td>Email</td><td>内容</td></tr>”)

dowhilenotrec.EOF

Response.Write(“<tr><td>”&rec(“name”)&“</td.></tr>”&rec(“email”)&“</td><td>”

&rec(“message”)&“</td></tr>”)

red.MoveNext

loop

Response.Write(“</table>”)]

%>

</body>

</html>

最终的页面效果如图1-5所示。

图1-5

参考文献：

1．网易FLASH站（）

2．极限FLASH站（）

3．李博、于骞译[美]GreyBuczek,MCSD.MCT编著“ASP应用开发指南”科学出版社，2000年9月。

4．荣钦科技主笔室编著“ASP入门与应用”中国铁道出版社，2001年1月。