Quiero que se quede siemore en una web

[Komodo]

Quiero que mi aplicacion este siempre en la misma página web

Y miren como intente hacerlo:

Código (vb) [Seleccionar] Expandir

If Text = "http://web.com" Then
Else
WebBrowser1.Navigate "http://web.com"
End If

Pero no me carga para hace el loop sin más..

[jdc]

Quieres recargar la misma página?

[Psyke1]

.
No entiendo la duda...
Explicate mejor

DoEvents!

[79137913]

HOLA!!!

Creo que comprendi lo que queres hacer.

Te dejo el codigo y me decis como te fue:

Código (vb) [Seleccionar] Expandir

'ESTO SI QUERES QUE EXCLUSIVAMENTE ESTE EN TU PAGINA PRINCIPAL
Private Sub WebBrowser1_DownloadBegin()
    If Not WebBrowser1.LocationURL = "http://web.com" Then
        WebBrowser1.Navigate "http://web.com"
    End If
End Sub

'ESTO SI QUERES QUE NAVEGUE POR TODA TU WEB
Private Sub WebBrowser1_DownloadBegin()
    If Not Mid(WebBrowser1.LocationURL, 1, Len("http://web.com")) = "http://web.com" Then
        WebBrowser1.Navigate "http://web.com"
    End If
End Sub


GRACIAS POR LEER!!!

[aaronduran2]

Puedes probar así:

Código (vb) [Seleccionar] Expandir

Private Sub WebBrowser1_NavigateComplete2(ByVal pDisp As Object, URL As Variant)
    If Not WebBrowser1.LocationURL = "http://web.com" Then WebBrowser1.Navigate "http://web.com"
End Sub

Un saludo.

[Komodo]

Muchas gracias a aaronduran2 y a 79137913.

Psyke, como ves me entendieron todos, janito también pero no tuve tiempo de decirle que si.

Saludos.

[jdc]

Sí no me equivoco hay un método refresh que sería para recargar, podrías usarlo con un timer y listo, sin complicarse

[Komodo]

No, ya me sirvió lo de aaronduran.

[Psyke1]

Muchas gracias a aaronduran2 y a 79137913.

Psyke, como ves me entendieron todos, janito también pero no tuve tiempo de decirle que si.

Saludos.

Lo siento hombre, no lei bien...

DoEvents!

[Komodo]

No pasa nada, hombre.

Ya mostraré resultado de esto en rtfucker