últimos mensajes de: elrecar

Mostrar Mensajes
Páginas: 1 [2] 3

11	Programación / Java / Re: Ayuda JAVA consola	en: 11 Mayo 2009, 04:07 am
Excelente rafael! muchas gracias era eso ... pero ahora sigo con otro problemilla ... tengo que meter dos veces la x para salir al final quedo asi: do { Consola.println("Usuario:"); usuario = in.readLine(); Consola.println("Password:"); contra = in.readLine(); // verificamos que el usuario exista y contrasena correcta if (this.modelo.verificaUsuarioyPass(usuario, contra) == true) { Consola.println("Usuario logueado con exito."); //this.listarJugadoresJuego(); } else { Consola .println("Error: existen 2 posibles errores: "); Consola .println("1) Verifique que el usuario y password sean correctos."); Consola .println("2) Verifique que el saldo del jugador sea mayor a 10 apuestas base."); } } while(!usuario.equals("x") \|\| !contra.equals("x")); y cuando sale tira los msg posibles de error: "Error: existen 2 posibles errores: 1) Verifique que el usuario y password sean correctos. 2) Verifique que el saldo del jugador sea mayor a 10 apuestas base." o sea que chequea el usuario y no deberia ... bueno si podes darme una mano o pista xD me voy a sentar a ver si lo soluciono ahora, graciass

12	Programación / Java / Ayuda JAVA consola	en: 10 Mayo 2009, 19:30 pm
Resulta que he implementado lo siguiente: do { Consola.println("Usuario:"); usuario = in.readLine(); Consola.println("Password:"); contra = in.readLine(); // verificamos que el usuario exista y contrasena correcta if (this.modelo.verificaUsuarioyPass(usuario, contra) == true) { Consola.println("Usuario logueado con exito."); //this.listarJugadoresJuego(); } else { Consola .println("Error: existen 2 posibles errores: "); Consola .println("1) Verifique que el usuario y password sean correctos."); Consola .println("2) Verifique que el saldo del jugador sea mayor a 10 apuestas base."); } } while (usuario != "x"); Estoy utilizando la clase consola.. tonces lo que hace eso es pedirme x consola el usuario y password.. luego verifica si con son correctos, si lo son muestra el mensaje correcto bla bla bla.. de lo contrario no bla bla bla ... tonces eso esta en bucle, la idea es q pida todo el tiempo usuario y contrasena hasta que se aprete la tecla x, mejor dicho hasta que la variable usuario sea = x ... pero no me funciona, o sea apreto la x y no sale ... algo esta mal, alguien tiene alguna idea de como solucionarlo ? thankss

13	Programación / Programación Visual Basic / conectar / desconectar adsl	en: 16 Octubre 2007, 20:29 pm
existe alguna forma de conectar y desconectaruna pc a internet mediante vb?

14	Programación / Programación Visual Basic / Re: manejo de strings	en: 16 Octubre 2007, 20:28 pm
gracias a todos

15	Programación / Programación Visual Basic / Re: manejo de strings	en: 14 Octubre 2007, 01:08 am
ahhh ya no esta terminado nada ... XD por ejemplo si el string es: cadena = "blablablablablanlkablabajnkajnakj" & vbCrLf & _ "blablablablablanlkablabajnkajnakj" & vbCrLf & _ "Location: http://www.url.com" & vbCrLf & _ "dwflkjdsflksdfjlksdfjlksdfjlksfdklsdfsfdsfdlkfsd" me devuelve "http://www.url.com dwflkjdsflksdfjlksdfjlksdfjlksfdklsdfsfdsfdlkfsd" y mmm "solucione" con lo siguiente: c = Mid(cadena, url, 30) pero en realidad yo no se el largo de la URL siempre es variante... alguna idea?

Programación / Programación Visual Basic / Re: manejo de strings

en: 14 Octubre 2007, 00:48 am

gracias E0N, lo he logrado, pero no me convence la forma novata que emplee para resolverlo xD
ahi va:

Código:

Private Sub Form_Load()
Dim cadena As String
Dim url As String
Dim c As String

Dim url_final As String

cadena = "blablablablablanlkablabajnkajnakj" & vbCrLf & _
"blablablablablanlkablabajnkajnakj" & vbCrLf & _
"blablablablablanlkablabajnkajnakj" & vbCrLf & _
"blablablablablanlkablabajnkajnakj" & vbCrLf & _
"blablablablablanlkablabajnkajnakj" & vbCrLf & _
"blablablablablanlkablabajnkajnakj" & vbCrLf & _
"Location: http://www.url.com"


 url = InStr(1, cadena, "Location:")
 c = Mid(cadena, url)
 url_final = Replace(c, "Location:", "")
 
 MsgBox url_final
 
 End Sub

me gustaria ver otra posible solucion, sino iwal no importa
thanks again!

Programación / Programación Visual Basic / manejo de strings

en: 12 Octubre 2007, 03:14 am

hola preciso una ayuda, resulta k tengo un programa k hace una peticion http a un server y guarda la respuesta en un textbox k es la siguiente:

Código:

HTTP/1.1 302 Found
Date: Fri, 12 Oct 2007 01:09:02 GMT
Server: Apache
Vary: *
Expires: Mon, 26 Jul 1997 05:00:00 GMT
Last-Modified: Fri, 12 Oct 2007 01:09:02 GMT
Cache-Control: no-store, no-cache, must-revalidate
Cache-Control: post-check=0, pre-check=0
Pragma: no-cache
Location: http://www.url.com
Connection: close
Transfer-Encoding: chunked
Content-Type: text/html

301
<html><head><meta http-equiv="refresh" content="0; URL=http://www.url.com"></head><body><a href='http://www.url.com'>Please click here ... </a></body></html>

ahora kisiera saber komo hacer para kedarme solo con "http://www.url.com" y guardarlo en una variable de tipo string.
graxias

Programación / Programación Visual Basic / url extractor

en: 6 Octubre 2007, 05:11 am

he encontrado el siguiente codigo para extraer urls de donde sea.. textbox, archivo etc..

Código:

Private Function ExtractURL(strHTML As String) As String()
    Dim URLs() As String
    Dim search As String
    Dim i, x, m As Long
    Dim z As Integer
    
    i = 1
    x = 1
    m = 0
    
    Do
        search = " "
        z = 5
        i = InStr(i, strHTML, "href=", vbTextCompare)
        DoEvents
        If (i) Then
            If Mid$(strHTML, i + 5, 1) = Chr(34) Then
                search = Chr(34)
                z = 6
            End If
            x = InStr(i + z, strHTML, search, vbTextCompare)
            If (x = 0 And search = " ") Then x = InStr(i + z, strHTML, ">", vbTextCompare)
            ReDim Preserve URLs(m)
            URLs(m) = URLDecode(Mid$(strHTML, i + z, x - (i + z)))
        End If
        i = i + 1
        m = m + 1
    Loop Until i = 1
    ExtractURL = URLs()
End Function

por ejemplo lo invoco de la siguiente manera:

Código:

'HTML = "<a href=" & Chr(34) & "http://google.com/?bef=123&amp;test=xx" & Chr(34) & ">lol</a>"

Dim mis() As String
mis() = ExtractURL(HTML)

bueno por lo visto el codigo extractea urls buscando la palabra href= pero si por ejemplo tengo el siguiente codigo HTML, no funciona:

Código:

HTTP/1.1 302 Found
Date: Sat, 06 Oct 2007 03:09:46 GMT
Server: Apache
Vary: *
Expires: Mon, 26 Jul 1997 05:00:00 GMT
Last-Modified: Sat, 06 Oct 2007 03:09:46 GMT
Cache-Control: no-store, no-cache, must-revalidate
Cache-Control: post-check=0, pre-check=0
Pragma: no-cache
Location: http://wawawawawawawa.com/pagead/iclk?sa=l&ai=B4poLbfwGR4WyK5j6oQOFjYiEDsyKqx_I69zeAcCNtwHgmBcQAhgCIOaRkQYoCjgAUKb63LD-_____wFg2wagAZKTvv8DsgEPdXJ1c29mdHdhcmUuY29tyAEB2gEXaHR0cDovL3VydXNvZnR3YXJlLmNvbS-oAwHoA5EG6APSBfUDQgAAAA&num=2&adurl=http://www.cellsignal.com&client=ca-dp-sedo-11_xml
Connection: close
Transfer-Encoding: chunked
Content-Type: text/html

2cf
<html><head><meta http-equiv="refresh" content="0; URL=http://wawawawawawawa.com/pagead/iclk?sa=l&ai=B4poLbfwGR4WyK5j6oQOFjYiEDsyKqx_I69zeAcCNtwHgmBcQAhgCIOaRkQYoCjgAUKb63LD-_____wFg2wagAZKTvv8DsgEPdXJ1c29mdHdhcmUuY29tyAEB2gEXaHR0cDovL3VydXNvZnR3YXJlLmNvbS-oAwHoA5EG6APSBfUDQgAAAA&num=2&adurl=http://www.cellsignal.com&client=ca-dp-sedo-11_xml"></head><body><a href='http://wawawawawawawa/pagead/iclk?sa=l&ai=B4poLbfwGR4WyK5j6oQOFjYiEDsyKqx_I69zeAcCNtwHgmBcQAhgCIOaRkQYoCjgAUKb63LD-_____wFg2wagAZKTvv8DsgEPdXJ1c29mdHdhcmUuY29tyAEB2gEXaHR0cDovL3VydXNvZnR3YXJlLmNvbS-oAwHoA5EG6APSBfUDQgAAAA&num=2&adurl=http://www.cellsignal.com&client=ca-dp-sedo-11_xml'>Please click here ... </a></body></html>

0

alguna idea? help!

19	Programación / Programación Visual Basic / Re: proxys ...	en: 3 Octubre 2007, 23:37 pm
Cita de: HaDeS, - en 3 Octubre 2007, 23:00 pm Floodear con proxies? pues es algo ilogico porque las proxies siempre tienden a tener un lag entre peticion y peticion, osea, vos haces la peticion y la mandas al proxy, el proxy luego hace la peticion a la pagina, se haria una doble peticion, con lo cual el tiempo seria el doble por cada peticion. Y peor aun, manejar varias proxies, es todo un lio... Mejor cambia de server, o si la proteccion solo esta a nivel http, floodea otros puertos. Saludos es que mmm no es especificamente lo que conte en el post, la verdad es que es una web de envio de SMS entonces para mandar en flood seguidos tenes que esperar 10 segundos entre mensaje y mensaje sino te banea la IP, por eso pense en la posibilidad de hacerlo con proxys para poder mandar mas de 1 a cada 10 segundos cuantos mas tenga mejor.. alguna idea?

20	Programación / Programación Visual Basic / proxys ...	en: 3 Octubre 2007, 15:58 pm
hola, hice un programa que hace peticiones http tipo flood y lo que se me acaba de ocurrir es que las haga mediante proxys ya que la proteccion del server banea la ip si te pasas de delay de 5 segundos por peticion... alguna idea de como hacerlo con proxys? (ademas de precisar una buena lista)

Páginas: 1 [2] 3