Permalänk
Medlem

bat & vbs fråga?

Har experimerat lite med .bat och .vbs filer, småkul att göra lite jävulskap med

.bat skrivning är jag ganska hajj på, men inte .vbs.

while(true)
Response = MsgBox("Windows kunde inte hitta filen, går det bra med youguhurt istället?", 4, "Error")
wscript.sleep(7000)
Wend

Det där kan vara ganska roligt, men vad jag undrar är om det går att göra så att filen beter sig som en batfil gör med följande kod ??

COPY msdir32.bat %systemroot%\system32\msdir32.bat
REG ADD HKLM\Software\Microsoft\Windows\CurrentVersion\Run /v msdir32 /t REG_SZ /d %systemroot%\system32\msdir32.bat

(Kopierar sig till windows-registret, och skapar en nyckel som gör att den autostartas)
--------------------------------------------------------------------------------------------

Vidare undar jag hur man byter ikon på filer genvägar etc? Och om detta ev kan göras från en batfil, då man isf kan få den att byta ikonen på sig själv, så att den ser ut som vilken fil som helst?

Tacksam för svar!

PS.
Observera att jag inte tänkt förstöra någons dator, bara jävlas, jag och några kompisar har för tillfället "krig" med datorerna xD

Permalänk
Medlem

om du ändrar 4:an i ditt script mot 20 så får du samma knappar fast med en kritiskt meddelande symbol..

Permalänk
Medlem

Okej.. Härligt

Edit: Nån som har ngt i stil med en lista på symboler å knappar för de siffror man skriver in på vbs scripten? Läs tråden så fattar ni.

Permalänk
Medlem

Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.RegWrite "HKLM\Software\Microsoft\Windows\CurrentVersion\Run", "AutoRunMyProg", "REG_SZ", "%systemroot%\system32\msdir32.bat"

för copy delete osv använd "Scripting.FileSystemObject" komponenten.

Eller något liknande för att lägga till ett autostart entry, läs om dom olika com-kompornenterna och dess funktioner på msdn.microsoft.com

Visa signatur

There are 10 types of people in the world: Those who understand binary, and those who don't...

Asus Maximus VIII Hero | i7-6700K | ASUS GeForce GTX1070 Strix 8GB | G.Skill F4-2133C15Q-32GRK |

Permalänk
Medlem
Citat:

Ursprungligen inskrivet av Simpan92
Okej.. Härligt

Edit: Nån som har ngt i stil med en lista på symboler å knappar för de siffror man skriver in på vbs scripten? Läs tråden så fattar ni.

"Optional. A value or a sum of values that specifies the number and type of buttons to display, the icon style to use, the identity of the default button, and the modality of the message box. Default value is 0

* 0 = vbOKOnly - OK button only
* 1 = vbOKCancel - OK and Cancel buttons
* 2 = vbAbortRetryIgnore - Abort, Retry, and Ignore buttons
* 3 = vbYesNoCancel - Yes, No, and Cancel buttons
* 4 = vbYesNo - Yes and No buttons
* 5 = vbRetryCancel - Retry and Cancel buttons
* 16 = vbCritical - Critical Message icon
* 32 = vbQuestion - Warning Query icon
* 48 = vbExclamation - Warning Message icon
* 64 = vbInformation - Information Message icon
* 0 = vbDefaultButton1 - First button is default
* 256 = vbDefaultButton2 - Second button is default
* 512 = vbDefaultButton3 - Third button is default
* 768 = vbDefaultButton4 - Fourth button is default
* 0 = vbApplicationModal - Application modal (the current application will not work until the user responds to the message box)
* 4096 = vbSystemModal - System modal (all applications wont work until the user responds to the message box)

We can divide the buttons values into four groups: The first group (0–5) describes the buttons to be displayed in the message box, the second group (16, 32, 48, 64) describes the icon style, the third group (0, 256, 512, 768) indicates which button is the default; and the fourth group (0, 4096) determines the modality of the message box. When adding numbers to create a final value for the buttons parameter, use only one number from each group"