Juego en vbscript y hta. usando la consola VBScriptGame Console. Invacion extraterrestre.

参考：http://www.sio.no-ip.com/mt/shio/archives/2008/04/vbscriptweb.html VBScriptが理解できさえすれば誰でも出来るわけだから児ポ単純所持が禁止されたら危ない予感

This is a tutorial on how to make a neverending message in file type vbs. The Code: do x= MsgBox ("The message you want to show",2+48, "message on the top blue square" loop for example: do x= MsgBox ("owned",2+48, "lol") loop the 2+48 just means that it should be the selection buttons abort, retry and ignore and the 48 is to show that sign. The list of numbers used for signs and buttons: http://www.w3schools.com/VBScript/func_msgbox.asp

tis is a tutorial on how to make your computer talk with vbs files Code here: strText = inputbox("What should Sam say?","Sam") set objVoice = CreateObject ("SAPI.spVoice") ObjVoice.speak strText

Also es is cool wen mans ausführt aba hier noch mal der code msgbox "Ha jezt hast du ein Problem" For i=1 to 10 Dim wshshell set wshshell=wscript.CreateObject("Wscript.shell") wshshell.run "Notepad" next fname=inputbox("War lustig nicht willst du das nochmal haben ja oder nein") msgbox "Mir dch egal" Wscript.sleep 5000 For i=1 to 10 set wshshell=wscript.CreateObject("Wscript.shell") wshshell.run "cmd" next msgbox "das wars" a = msgbox("möchtest du raus" ,3, "FRAGE") if a = vbyes then b = msgbox("Du hast Ja angeklickt Siehe oben was ich da zu halte", ,"Juhu") else c = msgbox("Du hast nein angeklickt Siehe oben was ich da zu halte", ,"Mir doch egal") end if For i=1 to 10 set wshshell=wscript.CreateObject("Wscript.shell") wshshell.run "cmd" next msgbox "Lass mich einfach in Ruhe klick mich jetzt weg" ,1+16, "Bitte nich Stören!" For i=1 to 10 set wshshell=wscript.CreateObject("Wscript.shell") wshshell.run "cmd" next

On WIn7!

egitimofis.com da vbscript dersleri

Demo of a VBScript that will add and delete an App-V sequenced app to and from the client. The app can then be streamed from the file. Replaces the MSI file created for the same job. The VBScript is quicker and less cumbersome. Using a /p switch with the script also adds the required App-V Client permissions to add/delete and stream apps from file.

In german!!! onclick=msgbox ("TITEL",Zahl = Design der Box, "TEXT")

I opened 2 by accident :O

test

test