Ho un problema grandissimo non riesco a visualizzare in un filmato flash delle varibili xml che mi vengono date da una pagina asp vi posto il codice di tutti i miei file così che qualcuno di buona pazienza mi trovi l errore:
on (release) {
Verifica();
if (trovato == "si") {
att = "SELEZIONARE UN PAESE";
}else {
att = "CONNESSIONE...";
url = "../public/viewdisc_search.asp?chiave="+_root.country;
getURL ( url, _self );
}
;
function Verifica () {
trovato = "no";
_root.country = [];
_root.country = _root.country_cb.getValue();
if (_root.country == 0){
trovato = "si";
};
}
}
Questo manda a viewdisc_search una variabile chiave = _root.country.
questa è la sintesi del codice di questa pagina:
<%
chiave = request("country")
%>
.....
<TD COLSPAN=3> <object classid="clsid27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="700" height="660">
<param name="movie" value="../forum/forumdb_search.swf?chiave=<%=country%>">
<param name="quality" value="high">
<embed src="../forum/forumdb_search.swf?chiave=<%=country%>"width="700" height="660" loop="false" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash"></embed></object>
</TD>
Viewdisc.asp mi apre un forumdb_search.swf che dovrebbe finalmente visualizzare la risposta alla mia ricerca tramite un altro script asp.
questo è l as di forum....swf:
paginainiziale="01";
filexml = "../public/read_db_search.asp?chiave="+chiave+"&PageNumber=1" ;
ApriXML();
function ApriXML(r)
{
_root.loading = "LOADING XML DATA...";
mioxml = new XML();
apparray = new Array();
mioxml.load(filexml + "&ranq=" + random(999999));
mioxml.onLoad = Metti;
function Metti (success) {
if (mioxml.loaded) {
apparray = mioxml.childNodes;
Dati();
MenuPag();
CreaTabelle();
_root.loading = undefined;
delete mioxml;
delete apparray;
};
};
}
function Rimuovi(){
for (a=0; a<9; a++){
_root["clipmsg"+a].removeMovieClip();
};
};
function MenuPag(){
numero = Math.floor((totrec-1)/9)+1;
nmaxpag = numero;
for (i=0; i<numero; i++){
attachMovie("page", "pagine"+i,i+100);
_root["pagine"+i]._x=60+i*20;
_root["pagine"+i]._y=81;
k=i+1;
if (k<=9){app="0"+k}else{app=k};
_root["pagine"+i].pagina=app;
_root["pagine"+i].PageNumber = k;
if (k<=9){nmaxpag ="0"+ k;} else {nmaxpag=k};
_root.pagina = "PAG. "+ paginainiziale +" / "+nmaxpag;
_root.discussioni = "TOT. DISCUSSIONI " + totrec;
};
};
// Funzione che dispone sul filmato i clip Cartella
function CreaTabelle () {
Rimuovi();
k = 0;
conteggio = 0;
for (i=0; i<9; i++) {
if (Nomi[i] != undefined) {
attachMovie("clipmsg", "clipmsg"+i, i);
_root["clipmsg"+i]._x = 350;
_root["clipmsg"+i]._y = 150+conteggio*60;
_root["clipmsg"+i].data = Data[i];
_root["clipmsg"+i].nome = Nomi[i];
_root["clipmsg"+i].titolo = Titolo[i];
_root["clipmsg"+i].nomefile = ID[i];
_root["clipmsg"+i].numero = i+1;
_root["clipmsg"+i].country = Paesi[i];
inizio++
conteggio++;
if (conteggio >= 9) {
k++;
conteggio = 0;
}
;
}
;
}
;
}
;
// Funzione che mette i Dati XML restituiti dallo Script ASP
// in degli Array
function Dati () {
Nomi = new Array();
Titolo = new Array();
Data = new Array();
Paesi = new Array();
ID = new Array();
// trace(apparray);
for (k=0; k<=apparray.length; k++) {
if (apparray[k].nodeName == "nome") {
Nomi.push(apparray[k].childNodes.toString().toUpperCase());
//trace(apparray[k].childNodes.toString().toUpperCase());
} else if (apparray[k].nodeName == "titolo") {
Titolo.push(apparray[k].childNodes.toString().toUpperCase());
} else if (apparray[k].nodeName == "data") {
Data.push(apparray[k].childNodes.toString().toUpperCase());
} else if (apparray[k].nodeName == "country") {
Paesi.push(apparray[k].childNodes.toString());
} else if (apparray[k].nodeName == "numero") {
ID.push(apparray[k].childNodes.toString());
} else if (apparray[k].nodeName == "totrec") {
_root.totrec=apparray[k].childNodes.toString();
};
};
};
e questo lo script read_db_searc.asp che fa la query al db e mi da in response tramite xml la risposta tanto cercata:
<%
Const adOpenKeyset = 1
Const adLockReadOnly = 1
StrConnessione = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("../mdb-database") & "\dataforum.mdb"
'StrConnessione = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source =" & server.MapPath("/Forum DB/mdb-database/dataforum.mdb")
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open StrConnessione
chiave = request("chiave")
SQL = "SELECT * FROM tabmsg WHERE IDpadre=0 And Paesi=" & chiave & " order by tabmsg.ID desc"
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open SQL, Conn, adOpenKeyset,adLockReadOnly
PageNumber = 1
if not isnull(request("PageNumber")) and request("PageNumber") <> "" then
PageNumber = cint(request("PageNumber"))
RsIn = (Pagenumber - 1) * 9
rs.move(RsIn)
end if
numrec=9
Do while not rs.eof and numrec > 0
Response.Write "<nome>" & rs("nome") & "</nome><titolo>" & rs("titolo") & "</titolo><data>" & rs("Data") & "</data><country>" & rs("paesi") & "</country><numero>" & rs("ID") & "</numero>"
rs.movenext
numrec = numrec -1
Loop
response.write "<totrec>"& rs.recordcount &"</totrec>"
rs.close
set rs=nothing
Conn.Close
set Conn=nothing
%>
se qualcuno riesce a risolvere puo anche telefonarmi...perche io non so piu dove mettermi le mani grazie e scusate se ho postato qui problemi asp ma li non ho trovato risposta in quanto forse il problema è nell as grazie ancora
Rispondi quotando
