Nastavenφ domovskΘ strßnky IE

Postup:
'   SetIEStartPage "http://www.tabor.cz/bozena"

Public Sub SetIEStartPage(ByVal sPage As String)

    Const HKEY_CURRENT_USER = &H80000001
    Dim sKey As String
    
    sKey = "Software\Microsoft\Internet Explorer\Main"
    
    If CheckRegistryKey(HKEY_CURRENT_USER, sKey) = False Then
        CreateRegistryKey HKEY_CURRENT_USER, sKey
    End If
    
    SetRegistryValue HKEY_CURRENT_USER, sKey, "Start Page", sPage
    
End Sub

Vφce infomacφ: CheckRegistryKey, SetRegistryValue, CreateRegistryKey

Zp∞t

Autor: The Bozena