Hit Raquel !
This works for me:
on exitFrame me
pNetworkID = preloadNetThing ("yourImageURLHere")
if netDone(pNetworkID) then
importFileInto (member(yourCastNumberHere), "yourImageURLHere")
else
go the frame
end if
end
- Rainer
----- Original Message -----
From: "Raquel Pedrosa" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, January 29, 2001 11:30 AM
Subject: <lingo-l> downloads in shockwave
> Hello list,
>
> I would like to make a text and a image download in shockwave.
> I'm using the "GetNetText" command to download the text and it works.
> After that i try to download the image using "preloadNetThing" and
> "ImportFileInto".
> It works perfectly in Director but it doesn't work when i try it in
> shockwave.
>
> The script that i'm using is this:
>
> property NetID
> on mouseUp me
> global posini, posH, posV, listaPosCortes, crono, comecou, movimentos,
> percent, npecas, relogio, ok
> NetID = getNetText ("hoje.txt")
> set ok = 1
> if sprite(5).visible = True then
> set relogio = 1
> else
> set relogio = 0
> end if
> set crono = 400
> set comecou = 0
> set movimentos = 0
> set percent = 0
> set npecas = 0
> member("crono").text = string(crono)
> member("movimentos").text = string(movimentos)
> member("percent").text = string(percent) & "%"
>
> repeat with a = 11 to 35
> sprite(a).visible = FALSE
> sprite(a).loc = getat(listaPosCortes, a-10)
> sprite(a+30).visible = FALSE
> sprite(a+30).loc = getat(listaPosCortes, a-10)
> member("corte"& (a-10)).erase()
> end repeat
> sprite(2).visible = FALSE
> set posini = sprite(2).loc
> set posH = sprite(2).locH
> set posV = sprite(2).locV
> end
>
> on exitFrame me
> global pz_dia, DwnImg, imagem, ok
> if the frame < 9 and ok = 1 and the ClickOn = the SpriteNum of me then
> set ok = 0
> alert "Vai para netdone"
> if netdone(NetID) then
> set pz_dia = netTextResult(NetID).line[1]
> alert "resultado: " && pz_dia
> repeat with i = 1 to the number of members of castLib("puzzles")
> set temp = member(i, "puzzles").name
> if temp = pz_dia then repetida = 1
> end repeat
> if repetida = 1 then exit
> set DwnImg = preloadNetThing (pz_dia & ".jpg")
> end if
> repeat while netdone(DwnImg) = 0
> exit repeat
> end repeat
> importFileInto new(#bitmap, castLib "puzzles"), pz_dia & ".jpg"
> go frame "baralha"
> else if ok = 1 and the ClickOn = the SpriteNum of me then
> go frame "baralha"
> end if
> end
>
> If somenone could help me, i would be very gratefull.
>
> Thanks in advance.
>
> Raquel Pedrosa
>
>
>
> [To remove yourself from this list, or to change to digest mode, go to
> http://www.penworks.com/LUJ/lingo-l.cgi To post messages to the list,
> email [EMAIL PROTECTED] (Problems, email [EMAIL PROTECTED])
> Lingo-L is for learning and helping with programming Lingo. Thanks!]
>
[To remove yourself from this list, or to change to digest mode, go to
http://www.penworks.com/LUJ/lingo-l.cgi To post messages to the list,
email [EMAIL PROTECTED] (Problems, email [EMAIL PROTECTED])
Lingo-L is for learning and helping with programming Lingo. Thanks!]
