Mensajes

Hola y de antemano gracias.

Tengo el siguiente codigo para crear un archivo ".txt"

Código (vb) [Seleccionar] Expandir


Dim fso, tf
Set fso = CreateObject("Scripting.FileSystemObject")
Set tf = fso.CreateTextFile("C:\Prueba1.txt", True)
tf.WriteLine "HOLA"
tf.Close

Pero el problema es que si vuelvo a correr el programa se vuelve a crear el archivo y lo que a mi me gustaria es que lo abra y siga escrbriendo en el. Alguien sabe como.

Gracias

Muchas gracias, no sabes como me has ayudado

[Pues mas que nada eso alguien sabe como obtener la imagen del usuario que ha iniciado sesion.]

Pues mas que nada eso alguien sabe como obtener la imagen del usuario que ha iniciado sesion.

noob_Setup:

Lo que estan pidiendo es un ejercicio simple y la consulta esta con un while en el form2 me parece y si acces queda chico en un sistema pero la que estan pidiendo es un EJERCICIO SIMPLE
Lee con mas atencion TODOS las mensajes (en especial el primero)

Miren les voy a explicar un poco mas.
Esto es un ejercicio personal mas que para romper seguridad ya que como sabemos los sistemas estan protegidos contra fuerza bruta.

Supangamos que tenemos un formulario solamente con un command1 .(exe1)
Y otro formulario con un textbox1 y un boton de aceptar. (exe2)

Al dar clic en en command1 del exe1 (espero y me entiendan)
genere un bucle como este

Código (vb) [Seleccionar] Expandir


For chr_uno = Asc("a") To Asc("z")
    For chr_dos = Asc("a") To Asc("z")
    List1.AddItem Chr(chr_uno) & Chr(chr_dos)
    DoEvents
    Next chr_dos
DoEvents
Next chr_uno


Pero en lugar de mandarlo al list 1 que lo mandara al textbox1 del exe2

Una linea como esta (se que no existe pero es para que me entiendan)

Código (vb) [Seleccionar] Expandir


shell "C:\prueba.exe.text1"= chr(chr_uno) & Chr(chr_dos)


Espero me entiendan y me puedan asesorar

Pues de echo si el chiste de todo esto es como si fuera un sistema con seguridad y lo quisieras tronar con fuerza bruta.
Claro el programa no tendria proteccion contra fueza bruta

Oigan muchas gracias por el codigo y la explicacion lo voy a probar

Pero segun yo el winsock es para conexión en red....... Me voy y a conectar a mi mismo equipo y luego buscar el exe o me conecta a la aplicacion

Yo se que es demasado codigo poro es la unica forma que se me ocurrio

Suena tonto pero cuales son los sockets