Export Dynamic TXT Flash to ASP file

programming
1

Hello Everyone. This is my first Post and hope to get a solution to my lack of ASP coding skills…
On one layer. I have several flash files serving up Dynamic Text pulling from external TXT
files. Script as;
on (press) {
loadText = new LoadVars();
loadText.load(“TEXT1.txt”);
loadText.onLoad = function(success) {
if (success) {
// trace(success);
box1.html = true;
box1.htmlText = this.myNews;
}
};
}

On the same layer, the box containers (Vars) are grouped to POST with a;

on (release) {
getURL("addtocart.asp ", “”, “POST”);
}

Flash is serving all text correctly but not sure how to POST/write the ASP script to send the served up Dynamic Text. Do I need to send the contents of each box, either the Dynamic Pull TEXT1.txt, TEXT2.txt etc., Dynamic Text: box1, box2, or Var: item1, item2, etc.?

—ASP Script
<%@language = “VBScript” %>
<%
strItem1 = Request.Form(“box1”)
strItem2 = Request.Form(“box2”)
strItem3 = Request.Form(“box3”)
strItem4 = Request.Form(“box4”)
strItem5 = Request.Form(“box5”)
strItem6 = Request.Form(“box6”)

Response.Write(strItem1) & “<br>”
Response.Write(strItem2) & “<br>”
Response.Write(strItem3) & “<br>”
Response.Write(strItem4) & “<br>”
Response.Write(strItem5) & “<br>”
Response.Write(strItem6) & “<br>”
%>

2

anyone know what I need to add to pull the input box variables;
loadText = new LoadVars();
loadText.load(“TEXT1.txt”);

into the ASP to read below?

<%@LANGUAGE=“VBSCRIPT”%>
<%

dim strbox1
dim strbox2
dim strbox3
dim strbox4
dim strbox5
dim strbox6

'strbox1 = objrec(“item1”)
'strbox2 = objrec(“item2”)
'strbox3 = objrec(“item3”)
'strbox4 = objrec(“item4”)
'strbox5 = objrec(“item5”)
'strbox6 = objrec(“item6”)

Response.Write “&item1=”&strbox1
Response.Write “&item2=”&strbox2
Response.Write “&item3=”&strbox3
Response.Write “&item4=”&strbox4
Response.Write “&item5=”&strbox5
Response.Write “&item6=”&strbox6

%>

3

[url=http://www.top1wowgold.com/]

4

Getting Farther Along Send flash variables via asp _POST
<%@Language=“VBScript”%>
<%
Option Explicit

Dim box1, box2, box3, box4, box5, box6

box1 = Request(“item1”)
box2 = Request(“item2”)
box3 = Request(“item3”)
box4 = Request(“item4”)
box5 = Request(“item5”)
box6 = Request(“item6”)

Response.Write “(item1, item2, item3, item4, item5, item6) values(’” & box1 & “’,’” & box2 & “’,’” & box3 & “’,’” & box4 & “’,’” & box5 & “’,’” & box6 & “’)”
%>