elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.
 
Inicio Ayuda Buscar Ingresar Registrarse
24 Mayo 2012, 23:52  


Tema destacado: Recuerda que debes registrarte en el foro para poder participar (preguntar y responder)

+  Foro de elhacker.net
|-+  Seguridad Informática
| |-+  Análisis y Diseño de Malware (Moderadores: Karcrack, [Zero])
| | |-+  vbscript		 0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: vbscript  (Leído 1,593 veces)
-:SafD3nial:-

Desconectado Desconectado

Mensajes: 153


ya viene la hermandad


Ver Perfil
vbscript
« en: 24 Marzo 2004, 00:29 »
bueno la verdad tengo un pequeño problema con esto

Set k = CreateObject("scripting.filesystemobject")

for zeta = 1 to 3
if zeta =1 then x = ".com"
if zeta =2 then x = ".exe"
if zeta =3 then x = ".pif"

for beta = 1 to 3
if beta = 1 then name = "destruye"
if beta = 1 then name = "propaga"
if beta = 1 then name = "maldito"

k.Copyfile ".\" & name & x, "C:\prueba"
Next
        Next
       
        End If


este es el codigo con el que tengo priblemas para que se propague el archivo¿?


saludos
En línea
Visita http://
ESTA EMPRESA NO ES MALA ; PERO EL UNICO QUE ES UN PERRO MALDITO ES EL CONTRATISTA JUAN CARLOS LEZANA ..PELAO GAY ERES UN EXPLOTADOR
byebye


Desconectado Desconectado

Mensajes: 5.093



Ver Perfil
Re:vbscript
« Respuesta #1 en: 24 Marzo 2004, 01:37 »
bueno yo el problema que veo es que abres 6 if`s y cierras 1.
En línea
-:SafD3nial:-

Desconectado Desconectado

Mensajes: 153


ya viene la hermandad


Ver Perfil
Re:vbscript
« Respuesta #2 en: 24 Marzo 2004, 21:08 »
La verdad no quede muy conforme con la respuesta pero todavia sigo sin poder entender ...por que no me copia los archivos a la ruta especificada .

saludos
En línea
Visita http://
ESTA EMPRESA NO ES MALA ; PERO EL UNICO QUE ES UN PERRO MALDITO ES EL CONTRATISTA JUAN CARLOS LEZANA ..PELAO GAY ERES UN EXPLOTADOR
Zorrohack


Desconectado Desconectado

Mensajes: 851

Quisiera burlar la enfermedad asi como a los AVs


Ver Perfil
Re:vbscript
« Respuesta #3 en: 25 Marzo 2004, 01:29 »
 8)

Para copiar podrias utilizar la Api de Windows;

Private Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long

este seria el codigo


Randomize
zeta = Int(Rnd * 3)
If zeta = 1 Then x = ".com"
If zeta = 2 Then x = ".exe"
If zeta = 3 Then x = ".pif"
Randomize
beta = Int(Rnd * 3)
If beta = 1 Then name = "destruye"
If beta = 2 Then name = "propaga"
If beta = 3 Then name = "maldito"

CopyFile App.EXEName & ".exe", "C:\prueba\" & name & x, False

es mejor que utilizes las Apis de Windows

suerte
« Última modificación: 25 Marzo 2004, 01:31 por Zorrohack » En línea
Progresamos porque hay Millones de imbeciles, maldicion jodi a McAfee,Panda,Kav,Norton, perdonen solo practicaba.
Belem

Desconectado Desconectado

Mensajes: 203



Ver Perfil
Re:vbscript
« Respuesta #4 en: 25 Marzo 2004, 20:33 »
No, no, no y no
cuando usas copyfile debes de poner una ruta completa.
Te apuesto a que ese code te arroja en c:\ un archivo llamado Prueba.
bueno prueba con esto
Código:
dim fs
set fs = createObject("Scripting.FileSystemObject")
dim nombres(3)
nombres(1) ="Destruye"
nombres(2) = "Propaga"
nombres(3) = "Maldito"
dim e(3)
e(1) = ".com"
e(2) = ".exe"
e(3) = ".pif"
dim nombre
for n = 1 to 3
for m= 1 to 3
nombre = nombres(n) & e(m)
fs.copyfile <Archivo Origren>,"c:\" & nombre
next
next
Supongo que es eso lo que quieres hacer no??
En línea
[ *BELEM * ]
-:SafD3nial:-

Desconectado Desconectado

Mensajes: 153


ya viene la hermandad


Ver Perfil
Re:vbscript
« Respuesta #5 en: 25 Marzo 2004, 20:36 »
muchas gracias ´por tu respuesta Zorrohack
ahora entiendo un poco mas,
y otra cosila tu sdabes de algun buen manual sobre esto 'tengo el de gedzac pero quisiera tener otro un poco mas avanzado en español gracias

saludos
En línea
Visita http://
ESTA EMPRESA NO ES MALA ; PERO EL UNICO QUE ES UN PERRO MALDITO ES EL CONTRATISTA JUAN CARLOS LEZANA ..PELAO GAY ERES UN EXPLOTADOR
Dex-TR

Desconectado Desconectado

Mensajes: 20


¡Amo YaBB SE!


Ver Perfil
Re:vbscript
« Respuesta #6 en: 27 Marzo 2004, 22:42 »
Cita de: -:SafD3nial:- en 25 Marzo 2004, 20:36
muchas gracias ´por tu respuesta Zorrohack
ahora entiendo un poco mas,

Creo que los agradecimientos deberían ser para Belem ....
realmente el código que haber puesto + el nombre del tema que posteais es VBSCRIPT!
y completamente Belem respondió con un codigo en VBS  muy bien estructurado donde muestra el uso de una matrix de valores y utiliza el objeto FSO, por otra parte Zorrohack muestra un code pobre y sencillo con una randomización de números y uso de variables...
alegando uso de una API <- Api?
por qué una Api? si el tema dice "VBscript" o es que es un nuevo descubrimiento y podemos declarar APis en un lenguaje script....

en fin
ZorroHack: no te lo tomes a mal compadre ;) (..) y como ta eso de un saludo para los avers y´arriba pa los haxors? ia usais Vb y te os sientes haxor? xD es broma brother no te tomes a nada  a mal jeje, interesante tu code bro, pero veo mucho code de MDM.
Belem: ;) cada vez que te veo.. cada vez que te hablo, jeje cada vez que veo un code tuyo mejoras ;-) jeje felicidades jeje

por otra parte pero GeDzAc, disculpenme pero es un fracaso... :P
(ia oieron y publicamente jeje)
saludos!
En línea
-:SafD3nial:-

Desconectado Desconectado

Mensajes: 153


ya viene la hermandad


Ver Perfil
Re:vbscript
« Respuesta #7 en: 27 Marzo 2004, 22:49 »
bueno bueno  mis disculpas correspondientes pero la verdad no habia revisado los post ...
muchas gracias por tu respuesta belem.

la verdad es que se trata de vbs y declaracion de apis,
estoy aprendiendo y conociendo el tema, muchas gracias por las respuestas

saludos.
En línea
Visita http://
ESTA EMPRESA NO ES MALA ; PERO EL UNICO QUE ES UN PERRO MALDITO ES EL CONTRATISTA JUAN CARLOS LEZANA ..PELAO GAY ERES UN EXPLOTADOR
Dex-TR

Desconectado Desconectado

Mensajes: 20


¡Amo YaBB SE!


Ver Perfil
Re:vbscript
« Respuesta #8 en: 27 Marzo 2004, 23:31 »
Cita de: -:SafD3nial:- en 27 Marzo 2004, 22:49
bueno bueno  mis disculpas correspondientes pero la verdad no habia revisado los post ...
muchas gracias por tu respuesta belem.

la verdad es que se trata de vbs y declaracion de apis,
estoy aprendiendo y conociendo el tema, muchas gracias por las respuestas

saludos.

se trata de vbs y declaracion de apis?
What?
bueno creo que si alegas ceguera...
temporal?
mira comprate unos anteojos los necesitas jaja.
hay...
Querras decir que andais aprendiendo Visual Basic 6...
En línea
Zorrohack


Desconectado Desconectado

Mensajes: 851

Quisiera burlar la enfermedad asi como a los AVs


Ver Perfil
Re:vbscript
« Respuesta #9 en: 28 Marzo 2004, 03:42 »
 ;D


No importa si VBScripting es la misma churra no importa si usas Apis o no en fin hara lo mismo.

Para evitar que se creara un archivo llamado:

C:\Prueba

arreglarlo por:

CopyFile App.Path & "\" & App.EXEName & ".exe", "C:\prueba\" & name & x, False

en fin es la misma cosa

Suerte
En línea
Progresamos porque hay Millones de imbeciles, maldicion jodi a McAfee,Panda,Kav,Norton, perdonen solo practicaba.
Dex-TR

Desconectado Desconectado

Mensajes: 20


¡Amo YaBB SE!


Ver Perfil
Re:vbscript
« Respuesta #10 en: 28 Marzo 2004, 05:38 »
Cita de: Zorrohack en 28 Marzo 2004, 03:42
No importa si VBScripting es la misma churra no importa si usas Apis o no en fin hara lo mismo.
Haber compadre gracias por los saludos ;) a estas alturas ya sabes quien soy, bueno
como que no importa?
es la misma churrada?
Escribir unas lineas  de VBScript en notepad no es lo mismo que programar en VB6 y compilar un ejecutable...
creo que para eso hay una clasificacion de los lenguajes
en alto nivel y bajo nivel además de los interpretes de script en este caso VBS ;)
tu sabrás :)
saludos!
En línea
Zorrohack


Desconectado Desconectado

Mensajes: 851

Quisiera burlar la enfermedad asi como a los AVs


Ver Perfil
Re:vbscript
« Respuesta #11 en: 29 Marzo 2004, 11:56 »
 ;D

Jeje claro que se quien eres Compadre, me imagine que eras tu jeje, pero para asegurarme por eso escribi asi
Citar
No importa si VBScripting es la misma churra no importa si usas Apis o no en fin hara lo mismo.
.

Para averiguar si eras tu jejej (ya te conozco) jeje

Un SALUDOTE

(Reencarnaste en otro Nombre)
En línea
Progresamos porque hay Millones de imbeciles, maldicion jodi a McAfee,Panda,Kav,Norton, perdonen solo practicaba.
Dex-TR

Desconectado Desconectado

Mensajes: 20


¡Amo YaBB SE!


Ver Perfil
Re:vbscript
« Respuesta #12 en: 30 Marzo 2004, 00:43 »
Ps ia ve compadre ;) si reencarné con otro nick
pero ia ve uso varios...
ese naie lo conoce xD
y este que tengo
salió del nick:" DeXter" es que así me puso mi maestro de computación ;)
y pues se me ocurrió sacar Dex-TR

jeje
saludos también :)
En línea
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
TUTORIAL vbscript « 1 2 3 »
Scripting 		Novlucker 41 56,421 Último mensaje 6 Mayo 2012, 00:19
por Stakewinner00
vbscript funciones movefile y copyfile
Scripting 		vilo36 2 1,831 Último mensaje 19 Febrero 2011, 12:35
por vilo36
Powered by SMF 1.1.16 | SMF © 2006-2008, Simple Machines