Mensajes

Igual que a  MetaL_Riffs los caracteres que decis que aparecen no los veo por ningun lado. Tenes algun plugin o alguna configuracion especial. O sino podrias explicar mas detalladamente como llegaste hasta los caracteres.
En segundo lugar cuando uso el smartcheck me dan unos cuantos errores de apis y despues me aparecen muy pocos eventos, los que aparecen no me sirven ´para nada.
Uno que generalmente da error es el vbaStrCmp.
¿No sabrias decirme porque me pasa esto?

Tengo un problema con un programa que estoy desensamblando.
En una parte tiene una division
DIV BL
Segun lo que tengo entendido esto divide AX por BL y guarda el resultado en AX. En AL el entero y en AH el resto.
Mi problema es que no puedo calcular el resto que aparece en AH ya que no es el resto que da en una divison comun.
El valor de BL es constante siempre es 14h.
Por ejemplo en uno de los casos divide 31h(49)/14h(26) = 1.8846..
En AL aparece 01 pero en AH me aparece 10.
Alguien sabe porque pasa esto? Tengo que dividir de alguna forma especial o que estoy haciendo mal?

Cuando abro uno de los crackme que vienen con el curso de raton,
el crackme 3 capitulo10, me dan varios api error 120 (Esta funcion solo es valida en modo win32).
Uo de esos errores me lo da en el comparestringw por lo que no me compara el serial mio con el original.
¿Alguien sabe como solucionar este problema?
Gracias

Mira en primer lugar lo que estas usando sos procedimientos no funciones. Las funciones se declaran Function y terminan en End Function.
El problema que tiene checarerror() es conta="1". Despues cuando haces  conta=conta+1 lo maximo que va a llegar es 2 porque cuando haga el goto denuevo, conta se va a reiniciar a 1.
No entiendo bien lo que hace tu programa asi que no te puedo ayudar mas.
Espero que te haya servido.

Aca esta el programa lo hice para ver el estado del winsock.
Una vez que esta conectado el estado tendria que ser 7 = sckConnected pero cuando se conecta el estado es 6 = sckConnecting. ¿Esto es asi o el codio tiene algun problema?
Apesar de que esta en 6 y no en 7 manda los datos igual.

Aca el codigo:

Private Sub Command1_Click()
Dim dato As String
dato = Text1.Text
send.SendData dato
End Sub

Private Sub Command2_Click()
listen.LocalPort = 9000
listen.listen
End Sub

Private Sub Command3_Click()
send.RemoteHost = "127.0.0.1"
send.RemotePort = 9000
send.Connect
Label2.Caption = send.State
End Sub

Private Sub listen_ConnectionRequest(ByVal requestID As Long)
listen.Close
listen.Accept requestID
End Sub

Private Sub listen_DataArrival(ByVal bytesTotal As Long)
Dim data As String
listen.GetData data
Label1.Caption = data
End Sub

He visto varios codigon en ASM q empiezan asi:
push ebp
mov ebp,esp
¿Cual es el objetvio de guardar la dirrecion actual de la pila en el registro ebp y para que se pushea ebp?

Listo ahora si entiendo ya leere algo de PE y seguire probando.
Muchas gracias a ambos

La idea no es extraerlo es que se ejecuten los 2 a la vez.

Estoy tratando de hacer un joiner, pero tengo un problema con el codigo. Me une los dos archivos, se nota el cambio de tamaño en el archivo, pero solo se ejecuta uno el primero, en este caso pj64. Alguien puede ayudarme para que se ejecuten los 2.
Aca esta el codigo:

Dim Buffer As String
Dim Buffer2 As String
Dim buffspace As Long
Open "C:\pj64.exe" For Binary As #1
buffspace = LOF(1)
Buffer = Space$(buffspace)
Get #1, , Buffer
Close #1
Open "C:\vb.exe" For Binary As #1
buffspace = LOF(1)
Buffer2 = Space$(buffspace)
Get #1, , Buffer2
Close #1
Open "C:\out.exe" For Binary As #1
Put #1, , Buffer & Buffer2
Close #1

¿Como hacer para que un programa cuando lo ejecute se copie a otro lado?