elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.


 


Tema destacado: Introducción a la Factorización De Semiprimos (RSA)


  Mostrar Mensajes
Páginas: 1 2 3 4 5 6 7 8 9 10 11 [12] 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 ... 133
111  Programación / Programación Visual Basic / Re: VB6, acceso a fichero en: 1 Abril 2014, 20:18
HOLA!!!

Yo leeria todo con un:
Código
  1. Dim sDatos As String
  2. Dim Arr () As String
  3. Open "ruta_del_archivo" For Input As #1
  4. sDatos = Input(LOF(1), #1)
  5. Close #1
  6. Split(sDatos,vbNewLine)
  7. For x = 0 To Ubound(Arr)
  8.    Arr(x) = LTrim(Arr(x))
  9. Next

Asi en cada punto del array tenes una instruccion sin espacios

GRACIAS POR LEER!!!
112  Programación / Scripting / Re: [IMPRESIONANTE] Crear Formularios en VBS! en: 25 Marzo 2014, 12:23
HOLA!!!

Esto sirve para crear Formularios en VBS, cosa que no se puede hacer sin estas librerias que eran casi imposibles de encontrar.

GRACIAS POR LEER!!!
113  Programación / Scripting / Re: [VBS]Perfect Melt en: 21 Marzo 2014, 01:58
HOLA!!!

Esta bien lo que planteas, pero planteate para que declaras sFunction, si se usa una sola vez, osea, perdes 2 lineas de codigo y reservas un espacio en memoria que no sera necesario nunca mas.

Esta bien que quieras declararla pero quiero que entiendas que no es practico, no mejora la lectura del codigo, no mejora la longitud del codigo y tampoco el rendimiento.

Es mas, no quise cambiarte la parte que dice sFile por que tampoco es necesaria, ya que siempre sera WScript.ScriptFullName... sino no seria Melt seria una funcion para eliminado con retraso desde otro script.

Por ende tu codigo si se quiere Funcionalizar (ser llamado de una funcion) si lo reducimos al maximo seria asi:
Voy a usar un sub para no entregar retorno (que tampoco entrega tu funcion).
Código
  1. sMelt()
  2.  
  3.       Sub sMelt()
  4.          On Error Resume Next
  5.          Execute("WScript.Sleep 3000: Set Melt = CreateObject(" & Chr(34) & "Scripting.FileSystemObject" & Chr(34) & "): Melt.DeleteFile " & Chr(34) & WScript.ScriptFullName & Chr(34))
  6.       End Sub

Se podria seguir reduciendo quitando las llamadas a Chr(34) ahi si convendria usar una variable para no llamar tantas veces a una funcion con el mismo parametro, aunque tambien podrias poner las comillas dentro del string sin usar ni un Chr usando "" supongo, no lo testee aun esto ultimo de la doble comilla doble.

GRACIAS POR LEER!!!
114  Programación / Scripting / Re: [VBS]Perfect Melt en: 20 Marzo 2014, 17:28
HOLA!!!

Por que no optimizamos el codigo un poco:

Código
  1.    sMelt(WScript.ScriptFullName)
  2.  
  3.    Function sMelt(sFile)
  4.       On Error Resume Next
  5.       Execute("WScript.Sleep 3000: Set Melt = CreateObject(" & Chr(34) & "Scripting.FileSystemObject" & Chr(34) & "): Melt.DeleteFile " & Chr(34) & sFile & Chr(34))
  6.    End Function

GRACIAS POR LEER!!!
115  Programación / Scripting / [IMPRESIONANTE] Crear Formularios en VBS! en: 20 Marzo 2014, 14:49
HOLA!!!

Esta herramienta la tengo hace tiempo, gracias a Jim Warrington el creador de los siguientes OCX que permiten a VBS crear y utilizar Formularios!

Empiezo con el "Tutorial" o "Demostracion":


1ro. Descargamos los OCX:

VBS_OCX_FORMS.rar
La contraseña del Rar es "by79137913"

2do. Colocamos los 3 archivos en System32:
Las rutas completas en mi caso serian:
Citar
C:\WINDOWS\system32\wshLWF_FormDesigner.ocx
C:\WINDOWS\system32\wshLWForm.ocx
C:\WINDOWS\system32\wshLtWtForm.ocx


3ro. Registramos los OCX:


Lo hacen con Inicio->Ejecutar-> Y escriben "RegSvr32 " La ruta de los OCX.

4to. Creamos el siquiente .VBS :
Nombre del Archivo: FormDesigner.VBS
Código
  1. Dim oLWFD 'as  object
  2. Dim bCloseClick 'as boolean
  3.  Set oLWFD = WScript.CreateObject("wshLWF_FormDesigner.ucLWFD", "oLWFD_")
  4.  oLWFD.DesignForm()
  5.  bCloseClick = False
  6.  Do
  7.    WScript.Sleep 200
  8.  Loop Until bCloseClick
  9. Set oLWFD = nothing  ' clean up
  10. WScript.Quit
  11. Sub oLWFD_frmCloseClick()
  12.  MsgBox ("Saliendo del Programa, gracias por testear." & CHR(10) & CHR(13) & "By 79137913")
  13.  bCloseClick = True
  14. End Sub


5to. Guardamos y ejecutamos el Script:

Listo, ya tienen funcionando su Editor de Formularios para VBS!



6to. Datos Extra:

Ahora diseñan el Form que quieran y luego solo tienen que apretar ShowCode para que les genere el codigo del formulario!. Si quieren pueden apretar Test para ver como quedaria (yo recomiendo que no lo presionen por que a veces Crashea)


7mo. Ejemplos:


Si, tambien tengo ejemplos...
Pero no son ejemplos cualquiera... son los Originales que Jim Warrington dejo cuando creo esta herramienta, una obra de arte.
VBSFORMGEN_DemoScripts.rar
La contraseña del Rar es "by79137913"

GRACIAS POR LEER!!!
116  Programación / Programación Visual Basic / Re: tutorial de visual?? en: 20 Marzo 2014, 12:17
HOLA!!!

www.elguille.info

GRACIAS POR LEER!!!
117  Programación / Programación Visual Basic / Re: Redireccionar? en: 19 Marzo 2014, 15:50
HOLA!!!

Hahah...

Eso es juego de niños!

En una pc instalas un Proxy y en tu pc redireccionas la conexión a 127.0.0.1

Osea


Archivo de host en tu pc:

193.49.123.4 -> 127.0.0.1

Diagrama:

Juego -> conecta con tu programa -> tu programa manda los paquetes al proxy en la otra maquina -> La otra maquina los manda al servidor.

Diras... "pero no tengo 2 pcs"
Diré... "Usa Maquinas virtuales"

GRACIAS POR LEER!!!
118  Programación / Programación Visual Basic / Re: Redireccionar? en: 19 Marzo 2014, 12:33
HOLA!!!

Osea, queres editar el valor en memoria de la ip con la que se conecta un exe...

Si, es posible, pero automatizarlo es muy dificil, un humano puede encontrar la direccion de memoria en la que se encuentra un ip (puede estar cifrada lo que te dificultaria mas las cosas pero siempre se "podria llegar a encontrar")  pero una pc, es muy dificil que tenga la IA suficiente para disernir que es ip y que no...

Por ejemplo suponete que armas un programa que cambie todos los strings que quepan en este patron: "000.000.000.000" Si el programa en algun sitio dice " conectando a... " diria 127.0.0.1 lo cual te delataria, aparte de poder romper algoritmos internos del programa o comprobaciones de validez que realice para ver si es el ip correcto o no. Imagina que tiene 2 strings el primero  : "1.2.3.4" y el segundo "4.3.2.1" luego los comprueba con StrRev. tu codigo cambiaria ambos por 127.0.0.1 y la comprobacion no seria correcta.

El metodo mas prolijo siempre es Archivo de Hosts por que el programa siempre cree que se conecta con el IP que el quiere.

GRACIAS POR LEER!!!
119  Programación / Programación Visual Basic / Re: Redireccionar? en: 18 Marzo 2014, 17:28
HOLA!!!

Si, podes, Archivos de hosts.

GRACIAS POR LEER!!!
120  Seguridad Informática / Análisis y Diseño de Malware / Re: [VBS] [SOURCE] Facebook y Twitter Spread en: 14 Marzo 2014, 19:23
HOLA!!!

Ahhh las apis de Facebook, pense que hablaban de WINAPI

GRACIAS POR LEER!!!
Páginas: 1 2 3 4 5 6 7 8 9 10 11 [12] 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 ... 133
Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines