n案 'testcookies.asp' 被呼唤和回 'true' 或 'false' (承受 Cookies 或不承受 Cookies).
//Frame10 If (cookies eq "true") Set Variable: "cookietest" = "Cookies can be set"Stop Else Set Variable: "cookietest" = "Cookies not allowed. Please enable." Go to and Stop ("nocookies")End If
复制代码
在 Frame 10 ByY果展F出分歧息。
假如不承受 cookies,Flash 就嘶` 'nocookies',停在那e,并且除别的的 cookies y外不承受任何的入。在 if l件 cookies eq "true" 用引O定,因 serverK部嬲骰夭剂种 true 或 false,然而字串就其自己s能R上y。同r注重字串的比^必是利用 'eq' 而不是 '='。
'stop' 号令使得 Flash 必守候 'SEND DATA' 按o click 事务。 cookie Y料送到 server 端襁@ :
假如在 frame 10 不允S任何的 cookies,Flash rgS秩氲竭@ frame,而利用者就有C绦辛硗獾y。 ASP n案的 Scripts
@三n案 testcookies.asp,setcookies.asp 和 getcookies.asp Flash 呼唤绦幸韵幼鳎 z查g[器是不是承受 cookies (testcookies.asp),O定 cookies (setcookies.asp),x取 cookies(getcookies.asp)。 z查g[器是不是承受 cookies
<%strTest = Request.QueryString("CookieTest")If UCase(strTest) <> Ucase("true") Then ' First call ' Set session variable Session("__FlashCookieTest") = True ' Redirect with QueryString strURL = Request.ServerVariables("SCRIPT_NAME") strQueryString = "?CookieTest=true" Response.Redirect(strURL & strQueryString) Response.EndElse ' Redirect already happened ' Check whether the session variable contains the value If Session("__FlashCookieTest") = True Then ' Session variable contains value ' Thus browser accepts cookies strOut = "Cookies=true" Else ' Session variable is empty ' Thus browser does not accept cookies strOut = "Cookies=false" End IfEnd If' Output to Flash:Response.Write(strOut)%>
复制代码
蔚末路f,@ script O定一 session 担绦修D跳 (redirect) 到它本人自己,然後z查值是不是O定在 session 抵小榱俗值依然保留,g[器必已承受 Internet Information Server (IIS) 的 session cookie,然後再由 ASP 送到g[器。@意味著,g[器承受 cookies ,@ session 档闹翟谵D跳 (redirect) 之後依然存在著。
假如g[器承受 cookies,n案骰匚淖 'Cookies=true' 或是不承受的,t骰 'Cookies=false'。
Flash 藉由号令 Load Variables 砗艚n案 testcookies.asp,ASP n案骰刈执 "Cookies=true" 或 "Cookies=false" 到 Flash n案,然後在 Flash 中O定 Cookies "true" 或 "false" 。 O定 Cookies