計(jì)算機(jī)畢業(yè)論文:FLASH與ASP的組合

時(shí)間：2022-10-08 03:53:00

導(dǎo)語：計(jì)算機(jī)畢業(yè)論文:FLASH與ASP的組合一文來源于網(wǎng)友上傳，不代表本站觀點(diǎn)，若需要原創(chuàng)文章可咨詢客服老師，歡迎參考。

摘要：本文介紹了flash與asp組合實(shí)現(xiàn)動(dòng)態(tài)留言板的方法與技巧、前后臺(tái)信息傳遞，以及

SQLSERVER與ASP相關(guān)的知識(shí)。

關(guān)鍵詞：loadVariableFILEDSN動(dòng)態(tài)鏈接庫

一、FLASH+ASP的概念

FLASH電影與在ASP的交互上有點(diǎn)類似于傳統(tǒng)HTML頁與ASP腳本的關(guān)系。FLASH主要是接收用戶輸入的信息并將腳本處理完的信息傳遞給用戶，而幕后所有的工作都由ASP腳本來處理。

ASP作為服務(wù)器端的腳本可以訪問數(shù)據(jù)庫，并可以處理從FLASH中傳遞來的信息，然后再傳遞回FLASH電影，這樣FLASH的功能得到極大的擴(kuò)展。這們做使FLASH更人性化，可以保存用戶的信息，從而諸如留言板、論壇、購物車等也可以使用FLASH來實(shí)現(xiàn)了。這對(duì)喜歡FLASH編程的網(wǎng)頁設(shè)計(jì)人來說真是個(gè)激動(dòng)人心的消息。

二、在FLASH和ASP中傳遞信息：動(dòng)態(tài)留言板

在FLASH中可以使用很多種方法來和ASP傳遞信息。每種方法和動(dòng)作都使用特別的協(xié)議通過URL編碼的格式來傳遞信息：getURL、loadVaviables、loadMovie；三種方法使用HTTP或者HTTPS協(xié)議以XML的形式來傳遞信息：XML.send、XML.load、XML.sendAndLoad；還有兩種方法通過建立TCP/IP的連接來以XML的形式傳遞信息：XMLSocket.connect、XMLSocket.send。

而我們將著重介紹loadVariable方法，使用loadvariable方法基本可以實(shí)現(xiàn)大多數(shù)的功能了。

成熟的網(wǎng)站都有自己獨(dú)具風(fēng)格的留言板來接受用戶的意見和建議，更好地和用戶交流。為了不抑止大家的更好的創(chuàng)意，下面筆者所介紹的FLASH只是一個(gè)普通的留言板，而把更好的想象和創(chuàng)意留給讀者，而筆者重點(diǎn)介紹的是方法與腳本的實(shí)現(xiàn)。

FLASH留言板在后臺(tái)使用SQLServer作為保存用戶輸入的信息和意見的數(shù)據(jù)庫服務(wù)器,使用FLASH制作客戶端留言板的頁面。

1、數(shù)據(jù)庫結(jié)構(gòu)設(shè)計(jì)

為本內(nèi)容的實(shí)例新增一個(gè)數(shù)據(jù)庫FLASH，制作FILEDSN。在數(shù)據(jù)庫中插入表message，用以保存用戶輸入的信息和意見建議，表中其定義三個(gè)字段（如下），分別為：

列名數(shù)據(jù)類型長度精度小數(shù)位

namechar1500

emailchar3000

messagetext1600

?Name：留言者的姓名。

?Email：留言者的Email地址。

?Message：留言。

2、簡單的FLASH動(dòng)態(tài)電影如下：

圖1-1

說明：○1在“您的姓名：”的文本后用文字工具創(chuàng)建一個(gè)輸入框，在文本框?qū)傩悦姘逯羞x擇“InputText（輸入文本）”。在“Variable（變量）”框輸入“name”選中“Border/Bg”選項(xiàng)，如圖1-2所示。

圖1-2設(shè)置文本框?qū)傩?/p>

○2同樣在“您的Email：”文本后插入輸文框，在“Variable(變量)”中分別輸入“Email”。在“您的意見：”文本后插入輸框，在“Variable（變量）”輸入“advice”，將“Singleline（單行）”下拉框改為“Multiline（多行）”。

○3制作一個(gè)“提交”字樣的FLASH按鈕，如下圖書1-3，其所在位置如圖1-1所示。

圖1-3

3、給FLASH中“提交”按鈕加代碼。

○1在FLASH場景中選中“提交”按鈕。

○2用鼠標(biāo)右鍵單擊場景中的“提交”按鈕，在彈出的菜單中選擇“Actions”，在彈出的“ObjectAction(對(duì)象面板)”單擊右上方的三角，選擇“ExpertModel(專家模式)”。選擇“On”動(dòng)作，“Event(事件)”是“release（釋放）”。在“Actions(動(dòng)作)”中選擇“LoadVariable(導(dǎo)入變量)”，括號(hào)中應(yīng)該是（“insert.htm”，“”，“post”），意思是使用post方法向insert.htm傳遞信息，再傳回到電影中來。全部Script腳本的如圖1-4所示。

圖1-4

4、ASP腳本

留言板共有兩個(gè)腳本，一個(gè)是來接受用戶輸入的服務(wù)器端腳本insert.htm，一個(gè)是網(wǎng)站的管理人員察看的腳本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=操作失敗，請(qǐng)留下芳名”)

else

Response.Write(“flag=操作失敗，內(nèi)部錯(cuò)誤”)

endif

con.close

%>

說明：本腳本開始定義了一個(gè)函數(shù)CheckStr用于檢查字段中是否有單引號(hào)（單引號(hào)會(huì)使插入記錄的SQL語句發(fā)生錯(cuò)誤），然后得到從FLASH中傳來的幾個(gè)參數(shù)。如果所有參數(shù)都符合要求則插入記錄，flag用以記錄插入的結(jié)果。使用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>內(nèi)容</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

參考文獻(xiàn)：

1．網(wǎng)易FLASH站（）

2．極限FLASH站（）

3．李博、于騫譯[美]GreyBuczek,MCSD.MCT編著“ASP應(yīng)用開發(fā)指南”科學(xué)出版社，2000年9月。

4．榮欽科技主筆室編著“ASP入門與應(yīng)用”中國鐵道出版社，2001年1月。