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 - rembolso

#81
Programación Visual Basic / modulo clss md5
17 Abril 2010, 08:07 AM
hola .  ando buscando un modulo  para descifrar md5 . lo intente hacer revirtiendo el proceso de cifrado . pero me dio cualquier cosa jajaj , si alguno lo tiene me lo podría pasar   :-X
#82
. no tengo ruter tengo moden ja , y  e provado con otras personas y tampoko se conecta .
#83
hola . recientemente realize un porgrame cliente servidor ( un chat).

donde el  cliente se conecta al servidor.  en forma local funciona perfecto . pero en forma remota salta el siguiente error

connection time out.

no se que puede ser . si me podria ayudar les agradeceria mucho.

lo e provado con otras personas y les da el mismo error ..  :-(

nota : es un winsock con index ,

#84
me quedo haci
perrito01\perrito02\perrito55\perrito222\
#85
bueno . resulta q tengo una caja de texto q tiene estos datos
(los numeros provienen de un random)
perrito01\
perrito02\
perrito55\
perrito222\
como hago para pasar al  TreeView y que queden  =  . lo intente con un split y un bucle pero queda haci

perrito01\
perrito01\
perrito01\
perrito01\

como hago para q quede  = q el textbox  :-X
#86
no no lo estas haciendo mal mira:

WS.Close
WS.RemoteHost = "messenger.hotmail.com"
WS.RemotePort = 1863
WS.Connect
' a ese si si funca yo e echo de todo
`toma mas datos
Timer1.Enabled = False
If num < 10 Then
num = num + 1

ElseIf num = 10 Then
num = num + 1

End If
Dim tmp2() As String, tmp3 As String, tmp4 As String, hopen As Long, hConnection As Long, hRequest As Long, lgRep As Long, stStatusCode As String
hopen = InternetOpen("MSMSGS", 1, 0, 0, 0)
hConnection = InternetConnect(hopen, "loginnet.passport.com", 443, vbNullString, vbNullString, 3, &H280000, 0)
hRequest = HttpOpenRequest(hConnection, "GET", "/login2.srf", 0, vbNullString, 0, &H84E8F000, 0)
tmp2 = Split(Text1.Text, "@")
tmp4 = tmp2(0) & "%40" & tmp2(1)
tmp3 = "Authorization: Passport1.4 OrgVerb=GET,OrgURL=http%3A%2F%2Fmessenger%2Emsn%2Ecom,sign-in=" & tmp4 & ",pwd=crapware, " & res
lgRep = HttpSendRequest(hRequest, tmp3, -1, 0, 0)
stStatusCode = Space$(1000)
HttpQueryInfo hRequest, &H16, ByVal stStatusCode, 1000, 0
InternetCloseHandle hopen
InternetCloseHandle hConnection
InternetCloseHandle hRequest
ak se conecta y enviamos esto
WS.SendData "VER 1 MSNP8 CVR0" & Chr(13) & Chr(10)
para mas informacion agregame y explicame q queres hacer y te ayudo

mi correo : rembolso@rembolso.com
#87
injecta tu programa en alguna dll de firefox o en un user document o en firefox . se te hace mas facil
#88
Programación Visual Basic / Re: RichTextBox
16 Octubre 2009, 00:08 AM
gracias . eso es loq buscava
#89
Programación Visual Basic / Re: RichTextBox
15 Octubre 2009, 23:48 PM
me podrias dar un ejemplo o hacerme esa parte del code , porq no  entiendo :-[
#90
Programación Visual Basic / Re: RichTextBox
15 Octubre 2009, 23:35 PM
 pero  la idea es buscar [[ ]] lo del medio no ,


"[[ esto es un texto ak  termina ]]

me quedo

    Dim Pos As Integer
    Dim PalabraClave As String
    PalabraClave = "[["

             RichTextBox.SelStart = Pos - 1
                RichTextBox.SelLength = Len(PalabraClave)
                RichTextBox.SetFocus
                RichTextBox1.SelColor = vbRed

pero busca esto directamente [[ y yo quero q busque  "[[ ]]"  y me  selecione el texto  q se encuentra en el medio de  los corchetes  y les cambie el color nada mas