Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
<PARAM NAME=FlashVars VALUE="var1=<%= aspvar1 %>">
//ActionScript v1
onLoad() {
//place a request to an asp script
//relative to the swf path
this.loadVariables("myasppage.asp",'POST');
}
onFrame(2) {
//'listen' for a response
if (done!="1") {
//loop to frame 1 until we get the
//last variable
prevFrameAndPlay();
} else {
//we got it, so now trace the value
//to the flash debug panel
trace(myAspVariable);
}
}
onFrame(3) {
//stop playing the movie when you're done
stop();
}
<%@LANGUAGE="VBSCRIPT"%>
<%
response.write("&myAspVariable=Hello World")
response.write("&done=1")
%>
dim x,y,str
y=3
for x=1 to y
str="&x"&x&"="&x
next
response.write(str)
dim x,y
y=3
for x=1 to y
response.write("&x"&x&"="&x)
next
<%
If Request.Form("sCoinChosen")<>"" Then
'Response.Write "I am getting here!!!"
Dim coinType
coinType=Request.Form("sCoinChosen")
coinType=cStr(coinType)
'--------------------------------------------------------------------
'create recordset object
Dim sqlCoinType
Dim objRSCoinType
Set objRSCoinType = Server.CreateObject("ADODB.Recordset")
sqlCoinType = "SELECT * FROM coins WHERE coin_name = '" & coinType & "';"
'open the recordset
objRSCoinType.Open sqlCoinType, objConn, 2, 3
objRSCoinType.MoveFirst
Response.Write "&sCoinChosen=" & objRSCoinType("coin_desc") & ""
objRSCoinType.Close
Set objRSCoinType = Nothing
'--------------------------------------------------------------
End If
%>