2 svar · 226 visningar · startad av nill
Om jag t.ex. ska loopa ut min text bokstav för bokstav så här:
antal = len(text)
for i=0 to antal
uttext = left(text, i)
next
hur gör jag då så att detta "syns".. alltså med några millisekunders fördröjning ?
I Visual Basic är det ju inte så svårt med med ASP förstår jag inte hur det ska gå till.
I asp blir det svårt eftersom allt processas på servern och sedan skickas till klienten.
Vill du få "skrivmaskins effekt" blir du tvungen att kika på någon javascript-funktion som körs på klienten.
cya,
PatrikB
------------------
*ordning och reda!, pengar på fredag.*
Om du däremot vill pausa så fungerar detta:
Sub Pause(Sec)
Dim Start
Start = Timer() ' Ange starttid.
Do While Timer < (Start + Sec)
Loop
End Sub
Men som sagt, den visar ingenting på klienten - tills sidan är klar, utan det är servern som pausas.
Men det kan ändå vara användbart ibland.
------------------
Mvh
Patrik aka Brimba
<A HREF="http://www.brimba.nu/default.asp?oPID=poll&PollID=20" TARGET=_blank>Har du husdjur hemma?
</A>Varför får man inte dricka saltvatten?