İnternet Açılış Sayfasını Değiştirme

İnternet Explorer açılış sayfasını TextBox a gireceğimiz adres ile değiştireceğiz. Şekil 1

Şekil 1

Not: Firefox ta geçerli değildir.

Form1.vb

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

TextBox1.Text = "http://www."

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Try

Dim acilissayfasi As Microsoft.Win32.RegistryKey

acilissayfasi = Microsoft.Win32.Registry.CurrentUser.OpenSubKey("Software\Microsoft\Internet Explorer\Main", True)

acilissayfasi.SetValue("Start Page", TextBox1.Text)

MessageBox.Show("Açılış sayfası" & vbCrLf & TextBox1.Text & vbCrLf & "olarak değiştirildi.", "Bilgi Mesajı", MessageBoxButtons.OK)

Catch ex As Exception

MessageBox.Show("Hata oluştu.", "Bilgi Mesajı", MessageBoxButtons.OK)

End Try

End Sub

End Class

Bir makalenin daha sonuna geldik. Bir sonraki makalede görüşmek dileğiyle. Hoşçakalın. Bahadır ŞAHİN

Share This:

Facebook Twitter Pinterest Linkedin Whatsapp Whatsapp

About Bahadır Şahin

This is a short description in the author block about the author. You edit it by entering text in the "Biographical Info" field in the user admin panel.