假设我们现在要在FLASH中通过指定ASP的参数来获取ID为1或者ID为2的记录中的USER字段值或者SEX字段值的话,我们可以这样来做:
ASP部分:文件名Test.asp
<%
dim conn,rs,db,connstr
db="数据库文件名"
Set conn = Server.CreateObject("ADODB.Connection")
Server.MapPath(db)
connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db)
conn.Open connstr'建立数据库连接
dim parID,strSQL,AspUser,AspSex
parID=Request.QueryString("ID")'获取ASP参数ID
strSQL="select top 1 * from user where id = " & parID
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.open strSQL,conn,2,3
if rs.eof then
AspUser="无此记录"
AspSex="无此记录"
else
AspUser=rs("user")
AspSex=rs("sex")
end if
rs.close
conn.close
response.write "AspUser=" & AspUser & "&AspSex=" & AspSex
%>
FlashMX部分:
详细代码省略,大家对照上面的FLASH代码改改就行了,把第一帧的代码改为loadVariables("test.asp?id=1",_root,"GET");
然后把所有的aspRect改为AspUser或者AspSex,最后第4帧的代码改为
trace(AspUser);
trace(AspSex);