計算機畢業論文:FLASH與ASP的組合
時間：2022-10-08 03:53:00
導語：計算機畢業論文: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月。