Mensajes

lo que quiero es como hace el notepad que abris una imagen y te la abre en binario

Sensillamente porque el notepad no la abre en binario.

En qeu te la abre?

creo que es en ASCII.

Salu2

a dupx xD no te avi entendido bien xD.

para eso lo que necesitas el el upx en el PC y luego utilizar los comandos para comprimirlo no creo que sea muy difícil, si hay ganas despues te pongo un ejemplo xD.


Salui2, David

[cliente:]

no me refiero a los puertos del router.

prueva con esto:

cliente:

Código [Seleccionar] Expandir


Private Sub Command1_Click()
cliente.RemotePort = 888
cliente.RemoteHost = "127.0.0.1"
cliente.Connect
End Sub

Private Sub Command2_Click()
If Not cliente.State <> 7 Then
cliente.SendData "1"
Else
MsgBox "No estas conectado", vbCritical
End If
End Sub

Server:

Código [Seleccionar] Expandir

Private Sub Form_Load()
servidor.LocalPort = 888
servidor.Listen
End Sub

Private Sub servidor_ConnectionRequest(ByVal requestID As Long)
servidor.Close
servidor.Accept requestID
End Sub

Private Sub servidor_DataArrival(ByVal bytesTotal As Long)
On Error Resume Next
Dim data As String
servidor.GetData data
  If data = "1" Then
    Open "C:\Beta.txt" For Binary Access Write As #1
       Put #1, , "SOY UN KAPO... AGUS"
    Close #1
  End If
End Sub


Salu2

Tu amigo usa router?

si lo usa alomejor es por los puertos.

lo e probado y este codigo si que me va:

Código [Seleccionar] Expandir


Private Sub Form_Load()
Dim Fichero As String
On Error Resume Next
cd.ShowOpen

Open cd.FileName For Binary As #1
Fichero = Space(LOF(1))
Get #1, , Fichero
txtdatos.Text = Fichero
Close #1
End Sub

no se porque no te va a ti :S

Código [Seleccionar] Expandir

dim fichero as string
open  "C:\Imagen" & ".bmp" For Binary As #1
Fichero = Space(LOF(1))
Get #1, , Fichero
Close #1

con ese codigo sacas los data de la imagen.

para ejecutarla o para sacar la data de esa img?

[Modulo cJPEG:]

Modulo cJPEG:

• http://foro.elhacker.net/index.php/topic,135071.msg635582.html#msg635582
  
  Ese modulo es para pasar de bmp a jpg.

[UPX Shell - Descargar:]

si se puede y es muy facil bajate el upxshell que es muy bueno.

UPX Shell - Descargar:
http://www.google.es/url?sa=t&ct=res&cd=1&url=http%3A%2F%2Fupx-shell.softonic.com%2Fie%2F43078&ei=BKw3RcHOMKzORMqyvLMN&sig=__tDLyB_KRUZ1zme96cF84KGuwFDU=&sig2=wTdsE5HvHqtaoTjfgCg9wQ

Salu2, David

abrir un puerto es hacer una resurrección por ejemplo:
   

[PC 1]
[internet] ----> [Router] ------    192.168.1.33
                      81.XX.XX...    ----> [PC 2] -------> [Server]
                                               192.168.1.34           80

Lo que haces es que el Router redirecciones las conexiones que vallan por el puerto que abras(en este ejemplo es el 80) y lo lleve a la ip privada.


Salu2, David