Problem with Win98

[Dieuz]

Hi,

I made this script on Window XP but when I try to run it on Window 98, it just doesnt work...Anyone know why?

$szNewPage = "www.google.com" ;Enter the URL of the HomePage

; Change Internet Home Page
_IESetHomePage($szNewPage)

;Close Internet Explorer
While 1
If ProcessExists ("iexplore.exe") Then
    ProcessClose("iexplore.exe")
Else
ExitLoop
EndIf
Wend


Func _IESetHomePage($szNewPage)
    If RegRead("HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main", "") Then
        SetError(0)
        Return 0
    ElseIf RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main", "Start Page", "REG_SZ", $szNewPage) Then
        Return 1
    Else
        SetError(-1)
        Return -1
    EndIf
EndFunc

I ran it compiled and when I launched the exe, nothing happened and the homepage did not change.

Edited May 24, 2007 by Dieuz

[The Kandie Man]

Your above script works fine on Win98 with Internet Explorer 5. Try changing it to this and see if this changes anything:

$szNewPage = "http://www.google.com/" ;Enter the URL of the HomePage

; Change Internet Home Page
_IESetHomePage($szNewPage)

;Close Internet Explorer
While 1
If ProcessExists ("iexplore.exe") Then
    ProcessClose("iexplore.exe")
Else
ExitLoop
EndIf
Wend


Func _IESetHomePage($szNewPage)
    If RegRead("HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main", "") Then
        SetError(0)
        Return 0
    ElseIf RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main", "Start Page", "REG_SZ", $szNewPage) Then
        Return 1
    Else
        SetError(-1)
        Return -1
    EndIf
EndFunc

- The Kandie Man ;-)

Edited May 24, 2007 by The Kandie Man