Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - vivachapas

#211
queria saber como hacer tipo un SendKeys pero q invie el evento Keyup de una tecla... o keydown y keyup es lo mismo... pero con sendkeys no lo hace... :S
#212
jaja muchas gracias!! re bien explicado :P jeje

ahroa estoy haciendo graficos para darle una mejor forma y apariencia.. luego le pongo la transpariencia y va a quedar de 10 ;)
#213
Programación Visual Basic / Re: comondialog
30 Diciembre 2007, 22:08 PM
o mas facil Ctrl + T y despues elegis el control ;)
#214
no me gustan lo q la chitean.. y ademas siempre les gano :P
#215
me parece q lo q quieres hacer es algo asi como un redireccionador de ip a traves de una web?? es eso?
#216
Excelente el codigo!!!


todos los q habia visto ponian todo el form invisible y era... al pedo... xq no se veia xD

este esta muy bueno!!

SALUDOS
#217
jja si barbaro muchas gracias :DD: ;)
#218
Programación Visual Basic / Re: Desafios
29 Diciembre 2007, 17:11 PM
lo de matar procesos.. no se para q lo queres... se com ose hace xq lo usaba en mis troyanos... pero vos q queres matar procesos de tu pc? Ctrl + Alt + Supr es mas facil :P a menos q quieras q sea remoto
#219
si esa es la q tenia xD pero... mas abajo cuando recibe el archivo... para poner asi tengo q modificarlo al code xD

otra cosita... en una parte del code tengo dos InpuBox, pero si se cancela uno... se sigue con el codigo como si hubiese aceptado.. y en el caso de no poner nada va al error

el code es

Private Sub Command2_Click()
On Error GoTo Peor
Puerto = InputBox("Ingrese Puerto para Escuchar:", "Share Escuchar", "200")
If Puerto = vbCancel Then
Exit Sub
End If
WS.Close
WC.Close
WC.LocalPort = Puerto
WC.Listen
Command1.Enabled = False
Form1.Caption = "Share - Esperando Conexión"
Color (3)
Exit Sub

Peor:
MsgBox "Error, verifique que los datos ingresados sean correctos.", vbCritical, "Share Error"
End Sub


pense q seria como el msgbox... pero se ve q no xD jejej alguna idea de como hacerlo? aca no puedo usar el On Error Goto xq lo use para el caso de q en el puerto pongan una palabra...
#220
Open "C:\server.exe" for binary as #1
Server = Input(LOF(1),1)
Close #1
Resultado = Mid(Server,40,3)


donde puse 40,3 no va 40... tire un numero... pero iria la ubicacino del 1 del 127... 3 es xq 127 tiene 3 caracteres...

bueno la verdad no se si te sirve... xD

pero suerte y SALUDOS