在看這個例子之前,先講講Flash和asp結合的原理,其實懂一點ASP的朋友都知道ASP是基於Html的.
其實Flash和Asp接口的原理和純ASP文件之間交互的原理是一樣的,簡單地說就是頁面之間的數據交換。了解了這一點之後,我們來看看下面這個簡單的例子:
這個例子是把access內的數據讀出來,並在Flash內顯示出來。這個例子一共有三個主要文件,一個是Access的數據庫文件employees.mdb,它有一個employees表,有四個字段:ID,Namelast,Lastname,Position。
現在我們就來看看這個例子的制作過程吧。第一個影幀,ACTION是stop,有一個供用戶輸入查詢字段的文本框:strSearch,一個按鈕:submit,它的ACTION是
於 (放開)
跳至並播放 (2)
退出於
第二個影幀的ACTION是:載入參數 ("employee.ASP", 0, vars=GET)
這個ACTION的作用是通過ASP文件把Access數據庫內符合用戶查詢條件的數據讀出來。
第三個影幀的ACTION是:
如果(NameFirst ne "")
跳至並停止 (9)
退出如果
意思是如果NameFirst不等於空值的話,就跳到第九個影幀;否則將會執行下去(即播放下一個影幀)。
第4-7個影幀都沒有ACTION哦。
第八個影幀的ACTION是:
跳至並播放 (3)
回過頭來再看看第三個影幀看看,呵呵,懂了吧?
如果沒有符合的數據的話,就一直讀到有為止;讀到了就跳到第九個影幀哦。
那麼再來看看第九個影幀:
一共有三個文本框:NameFirst,NameLast,Position
數據庫內符合查詢條件的數據將會顯示在他們之中哦!
還有一個按鈕:Do It Again
它的ACTION是:
於 (放開)
跳至並停止 (1)
退出於
好了,再來看看employee.ASP這個文件吧:
Dim oRS, oConn '定義兩個變量
Set oRS = Server.CreateObject("ADODB.Recordset") '定義oRS為RECORDSET對象
Set oConn = Server.CreateObject("ADODB.Connection") '定義oConn為CONNECTION對象
oConn.ConnectionString = "Driver={Microsoft Access Driver (*.mdb)};
DBQ=" & Server.MapPath("employees.mdb")
oRS.Open "SELECT * FROM Employees", oConn, 2, 3
'嘿嘿,這兩句不用說了吧?打開數據庫哦
oRS.Find "NameLast = '" & UCase(Request.QueryString("strSearch")) & "'"
'找到符合條件的數據
If oRS.EOF Then '如果數據指針已到底
Response.Write "NameLast=Not+Found&NameFirst=Not+Found&Position=Not+Found"
' 呵呵,那麼NameLast就是沒有找到符合條件的數據咯
Else
Response.Write "NameFirst="
& Server.URLEncode(oRS("NameFirst"))
& "&NameLast=" & Server.URLEncode(oRS("NameLast"))
& "&Position=" & Server.URLEncode(oRS("Position"))
'找到的話就是找到咯(廢話嘛。。。)
End If
oRS.Close
Set oRS = Nothing
oConn.Close
Set oConn = Nothing '關閉並清空數據庫對象