ASP+flash下拉列表(显示图片)
在上一次我介绍了数据库与flash 连接方式.在这里,这一方面的我就不多说了....
还有ASP中的代码.我也略过不说.就只是贴出来...
<%
dim rsBiClass,outBigClass,outBigClassID
sql="select * from bigclass"
set rsBigClass=server.CreateObject("adodb.recordset") rsBigClass.open sql,conn,1,1
do while not rsBigClass.eof
outBigClass=outBigClass&rsBigClass("bigClass")&"/" outBigClassID=outBigClassID&rsBigClass("id")&"/" rsBigClass.movenext
loop
response.write ("outBigClass="&outBigClass&"&") response.write ("outBigClassID="&outBigClassID) rsBigClass.close
set BigClass=nothing
conn.close
set conn=nothing
%>
保存为readBigClass.asp
<%
dim bigid,outSmallClass
bigid=request.Form("bigid")
sql="select * from smallclass where bigid="&bigid set rsSmallClass=server.CreateObject("adodb.recordset") rsSmallClass.open sql,conn,3,3
do while not rsSmallClass.eof
outSmallClass=outSmallClass&rsSmallClass("smallclass")&"/" outSmallClassPic=outSmallClassPic&rsSmallClass("pic")&"/" rsSmallClass.movenext
loop
response.write ("outSmallClass="&outSmallClass&"&") response.write ("outSmallClassID="&outSmallClassPic)
rsSmallClass.close
set rsSmallClass=nothing
conn.close
set conn=nothing
%>
保存为readSmallClass.asp, 相信大家都看得懂这段ASP代码.如果不懂的话.跟帧后.我再注说明了.
--------------------------------------------------------------------------------
现在就进入到flash里面去编程了.
从组件中找现个下拉列表,拉入两个到场景中.将其分别命名为myBigCmb,mySmaCmb 在第一帧中写上:
System.useCodepage = true;
var readBigL = new LoadVars();//定义一个LoaVars类对像. readBigL.load("readBigClass.asp");//加载readBigClass.asp页面. readBigL.onLoad = function(su) {
if (su) {
//加载readBigClass.asp成功
_root.gotoAndPlay(2);
}
};
stop();
//这第二帧的大部分内容在上个帧子中都用到过.无非就是从数据库取出数据,把数据分别放进定义好的数组里面去.
第二帧:
var bigClassA = new Array();
var bigClassIDA = new Array();
for (i=0; i