Nastavenφ obrßzku pozadφ panelu nßstroj∙ IE

Postup:
'   SetIEToolbarPicture "E:\WinNT\Greenstone.bmp"

Public Sub SetIEToolbarPicture(ByVal sPict As String)

    Const HKEY_CURRENT_USER = &H80000001
    Dim sKey As String
    
    sKey = "Software\Microsoft\Internet Explorer\Toolbar"
    
    ' Pokud klφΦ neexistuje
    If CheckRegistryKey(HKEY_CURRENT_USER, sKey) = False Then
        ' tak si ho vytvo°φme
        CreateRegistryKey HKEY_CURRENT_USER, sKey
    End If
    
    ' nastavenφ hodnoty
    SetRegistryValue HKEY_CURRENT_USER, sKey, "BackBitmapIE5", sPict
    
End Sub

Vφce infomacφ: CheckRegistryKey, SetRegistryValue, CreateRegistryKey

Zp∞t