Discussion :

[aus3004]

Bonjour à tous.

Cela fait près de 2j que je cherche à résoudre un problème qui est assez important dans mon navigateur internet perso.

Je cherche à ce que l'utilisateur puisse enregistrer dans un textbox la page d'accueil du webbrowser.

Avant j'utilisais ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
    Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim regKey As RegistryKey 'Defines regKey
        regKey = Registry.CurrentUser.OpenSubKey("Software\Microsoft\Internet Explorer\Main", True) 'Opens Registry Homepage
        Home.Text = regKey.GetValue("Start Page") 'Sets 'Home' Value to Registry Start Page
    End Sub
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim regKey As RegistryKey 'Defines Regkey
        regKey = Registry.CurrentUser.OpenSubKey("Software\Microsoft\Internet Explorer\Main", True) 'Opens Registry Homepage
        regKey.SetValue("Start Page", Home.Text) 'Sets Registry Value to 'Home'
        Application.Restart()
    End Sub

Mais je me suis rendu compte que ça modifiait la page d'IE donc c'est pas bon

Je vous remercie d'avance pour votre aide
@+

[Pol63]

la base de registre c'est démodé ^^
il y a plein d'autres solutions : fichier ini, base de données, fichier xml par user dans documents and settings, settings de projet etc...

[aus3004]

Salut Pol63.

Le problème est que je suis un débutant.

Pour sauvegarder la donnée de la textbox, j'ai un code qui l'enregistre dans un .ini, mais pour affecter cette donnée comme page d'accueil je sais pas trop, je galère depuis longtemps, ce code est introuvable !

Pourrais-tu me guider stp.
Merci à toi.

[Pol63]

pour les débutants c'est ici :
http://plasserre.developpez.com/cours/vb-net/


et pour la page d'accueil, il suffit de prendre un peu de recul
au démarrage de l'appli tu fais navigate vers le lien que tu as sauvegardé

[aus3004]

Je cherche le code "officiel".

Si je bricole un Navigate(Textbox1.Text) quand l'utilisateur cliquera sur WebBrowser1.GoHome() rien ne se passera.

help me please

[Danyel]

la base de registre c'est démodé

Mais c'est hyper pratique pour juste ce type de chose.
Un petit Navigate(bdr.data.read) et le tour est joué

[cinemania]

la base de registre c'est démodé ^^

Hum... et les fichiers ini c'est pas démodé peut être ? si la registry est démodée, les ini qui ont plus de 15 ans et ne servent pratiquement plus que dans le monde linux sont ultra démodés...
Effectivement XML c'est un bon choix, mais vois tu... la base de données, des idées cités c'est la plus idiotes... Et la connectionString tu l'a trouve OU ?
autant tirer les paramètres de fonctionnement du même endroit non ?

pour son problème la registry est parfaite, mais c'est sure que s'il écrit là ou il faut pas...

[Pol63]

Hum... et les fichiers ini c'est pas démodé peut être ? si la registry est démodée, les ini qui ont plus de 15 ans et ne servent pratiquement plus que dans le monde linux sont ultra démodés...
Effectivement XML c'est un bon choix, mais vois tu... la base de données, des idées cités c'est la plus idiotes... Et la connectionString tu l'a trouve OU ?
autant tirer les paramètres de fonctionnement du même endroit non ?

pour son problème la registry est parfaite, mais c'est sure que s'il écrit là ou il faut pas...

il ne cherche pas à stocker une chaine de connexion

et la base de registre c'est démodé par l'usage/utilisation (non par l'ancienneté) car peu facilement modifiable, .ini et .xml ca se ressemble, tu ouvres le fichier et tu peux gratter dedans ...

quant à tout mettre au meme endroit, je ne suis pas d'accord, la localisation des données en fichier et le reste en base est quand meme mieux ...

[aus3004]

Excusez-moi d'interrompre votre discussion privée mais je trouve assez pervers de laisser cette phrase en suspens :

pour son problème la registry est parfaite, mais c'est sure que s'il écrit là ou il faut pas...

Je pense qu'il serait sympatique de votre part de m'indiquer le chemin (de la lumière) à suivre pour régler mon petit problème qui retarde la distribution de mon soft.

J'ai cherché des heures et des heures dans le registre mais je vois pas ou je peux enregistrer la page d'accueil de mon soft sans qu'il soit navigateur par défaut.

A+ et merci d'avance

[Pol63]

on peut même plus dériver un topic tranquille ...

moi je pourrais pas t'aider, j'aime pas la bdr
le webbrowser utilise en théorie IE ...


tu ne peux pas intercepter l'utilisation du bouton home page pour utiliser une variable privée ?

[aus3004]

Merci, ça avance.

Pour le buton gohomepage c'est OK avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

WebBrowser1.Navigate(Form6.TextBox2.Text)

Mais dans le form1.load

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

WebBrowser1.Navigate(Form6.TextBox2.Text)

ne marche pas, je tombe sur une page blanche "about:blank"

Un dernier coup de pouce

[Pol63]

au démarrage le textbox doit etre vide
donc rempli le avant de faire le navigate

[aus3004]

C'est ce que j'ai fais avec http://msn.fr !

L'erreur doit être ici à mon avis :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 Private Sub Navigate(ByVal address As String)
 
        If String.IsNullOrEmpty(address) Then Return
        If address.Equals("about:blank") Then Return
        If Not address.StartsWith("http://") And _
            Not address.StartsWith("https://") Then
            address = "http://" & address
        End If
        Try
            WebBrowser1.Navigate(New Uri(address))
        Catch ex As System.UriFormatException
            Return
        End Try
    End Sub

[Pol63]

pas à pas pour voir

[Danyel]

Sans en rajouter, je vous ai donne la solution en 1 ligne de code (certes à coder)

[aus3004]

C'est bon ça marche, merci beaucoup à tous !!!!

Fallais mettre ce code dans Form1_Shown.

Pour la réponse de Danyel, je vois pas ou elle est mais tant pis.

Bonne continuation à nous tous