|
|||||||
|
|
|
![]() |
|
|
Strumenti |
|
|
#1 |
|
Member
Iscritto dal: May 2008
Messaggi: 273
|
Javascript multiple msgbox con intervallo di tempo??
Nuovo rompicapo anche per oggi...
Codice:
<script type="text/javascript">
function welcome() {
{
var r = confirm("prova1");
if (r==true)
{
Avviso_1.Stop();
Avviso_2.Play();
}
else
{
window.close();
}
{
var r = confirm("prova2");
if (r==true)
{
Avviso_2.Stop();
Extract_1.Play();
}
else
{
window.close();
}
{
var r = confirm("prova3");
if (r==true)
{
Extract_1.Stop();
Extract_2.Play();
}
else
{
window.close();
}
var r = confirm("prova4");
if (r==true)
{
Extract_2.Stop();
PleaseWait.Play();
}
else
{
window.close();
}
var r = confirm("prova5");
if (r==true)
{
PleaseWait.Stop();
}
else
{
var shell = new ActiveXObject("WScript.shell");
shell.run("BKP\\End_Closing.exe");
window.close();
}
}
}
}
}
</script>
Codice:
setTimeout ( "welcome()", 2000 );
window.setTimeout(Welcome, 2000);
var r=setTimeout(function() {
confirm ("WELCOME");
},2000);
setTimeout("document.getElementById('welcome')", 1000)
window.setTimeout(Welcome, 1000);
var
setTimeout = window.setTimeout,
setInterval = window.setInterval
;
CIOE' IN POCHE PAROLE CREARE UNA COSA DEL GENERE IN javascript: Codice:
wscript.sleep 3000
Set Player = createobject("Wmplayer.OCX.7")
Player.url = "Resources\Voices\Welcome.mp3"
Set WSHShell = WScript.CreateObject("WScript.Shell")
intReturn = wshshell.Popup("uno", ,"AVVISO",1+64)
If (intReturn = vbOK) Then
End If
If (intReturn = vbCANCEL) Then
End If
wscript.sleep 3000
Set Player = createobject("Wmplayer.OCX.7")
Player.url = "Resources\Voices\Continua.mp3"
Set WSHShell = WScript.CreateObject("WScript.Shell")
intReturn = wshshell.Popup("due", ,"AVVISO",1+64)
If (intReturn = vbOK) Then
End If
If (intReturn = vbCANCEL) Then
End If
wscript.sleep 3000
Set Player = createobject("Wmplayer.OCX.7")
Player.url = "Resources\Voices\Avviso 1.mp3"
Set WSHShell = WScript.CreateObject("WScript.Shell")
intReturn = wshshell.Popup("tre", ,"AVVISO",1+64)
If (intReturn = vbOK) Then
End If
If (intReturn = vbCANCEL) Then
End If
wscript.sleep 3000
Set Player = createobject("Wmplayer.OCX.7")
Player.url = "Resources\Voices\Avviso 2.mp3"
Set WSHShell = WScript.CreateObject("WScript.Shell")
intReturn = wshshell.Popup("quattro", ,"WARNING!!!",1+64)
If (intReturn = vbOK) Then
End If
If (intReturn = vbCANCEL) Then
End If
wscript.sleep 3000
Set Player = createobject("Wmplayer.OCX.7")
Player.url = "Resources\Voices\Extract 1.mp3"
Set WSHShell = WScript.CreateObject("WScript.Shell")
intReturn = wshshell.Popup("cinque", ,"AVVISO!!!",1+32)
If (intReturn = vbOK) Then
End If
If (intReturn = vbCANCEL) Then
End If
wscript.sleep 3000
Set Player = createobject("Wmplayer.OCX.7")
Player.url = "Resources\Voices\Extract 2.mp3"
Set WSHShell = WScript.CreateObject("WScript.Shell")
intReturn = wshshell.Popup("sei", ,"AVVISO!!!",1+64)
If (intReturn = vbOK) Then
End If
If (intReturn = vbCANCEL) Then
End If
__________________
SCHEDA MADRE* ASROCK EXTREME4GEN3-PROCIO*I7 2600K 4.8GHZ SKVIDEO*GIGABYTE GTX 470 OVERCLOCK 1280MB RAM* 8GB G.SKILL 1866MHZ 10-10-10-27 2N ALIMENTATORE* CORSAIR GS 700 COOLING* NOCTUA D14 HD*SSD Corsair Force Series 3 120GB 2.5" Lettura 550MB/s Scrittura 510MB/s SATA3 CSSD W7X64BITEDIT:LE PAZZIE MI RIESCONO SEMPRE BENE.E' CON LE COSE NORMALI CHE HO QUALCHE DIFFICOLTA' Ultima modifica di brubaker : 04-04-2014 alle 16:58. |
|
|
|
|
| Strumenti | |
|
|
Tutti gli orari sono GMT +1. Ora sono le: 10:58.










W7X64BIT








