Hoi tweakers,
ben bezig met een bestelformulier aan het maken (webshop)
Ik wil echter nu dat er na het bestellen een pagina in het scherm komt (heb ik haha
), maar wil dat er dan een timer gaat lopen en die dan na zoveel seconden redirect naar me shoppingbasket.
Ik heb wel iets van een timer gemaakt.
Alleen het probleem is dat hij niet de tekst neerzet die ik wel graag wil tonen.
Hij redirect DIRECT, maar hij moet ook nog tekst neer zetten
Kan iemand me helpen.
Ik wil dus de td_redirect EERST tonen, dan de timer laten werken en dan als er niet gedrukt is op een knop binnen de 5 seconden door laten sturen naar het winkelmandje
Thanks tweakers
Mcmally
ben bezig met een bestelformulier aan het maken (webshop)
Ik wil echter nu dat er na het bestellen een pagina in het scherm komt (heb ik haha
Ik heb wel iets van een timer gemaakt.
Alleen het probleem is dat hij niet de tekst neerzet die ik wel graag wil tonen.
Hij redirect DIRECT, maar hij moet ook nog tekst neer zetten
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
| Function StartTimer()
Dim Start, Finish, TotalTime As Double
Start = Timer ' Set start time (seconds).
Finish = Start + 5.0 ' Set end time for 5-second duration.
Do While Timer < Finish
' Do other processing while waiting for 5 seconds to elapse.
Loop
response.redirect("bla.aspx")
End Function
Sub bestelling(obj as object, e as eventargs)
Dim aantal as string
aantal = tb_bestelaantal.text
Dim gravuretekst as string
gravuretekst = Replace(tb_Gravurtekst.text, vbCrLf, "<br>")
Session("special"& specialid) = aantal &"|"& gravuretekst
td_produktinfo.visible = "false"
td_bestelinfo.visible = "false"
td_redirect.visible = "true"
starttimer()
end sub |
Kan iemand me helpen.
Ik wil dus de td_redirect EERST tonen, dan de timer laten werken en dan als er niet gedrukt is op een knop binnen de 5 seconden door laten sturen naar het winkelmandje
Thanks tweakers
Mcmally