求助！关于修改hosts文件内容的问题

12407470

如果hosts文件内不存在172.19.2.6  s508295和172.17.37.97  s508295这两个IP，就添加172.17.37.97  s508295，如果存在172.17.37.97  s508295就跳过，如果存在172.19.2.6  s508295就修改为172.17.37.97  s508295。现在调试的时候hosts文件里存在172.19.2.6  s508295就是改不过来，请教如果更改脚本？


$hostFile = @SystemDir & "\drivers\etc\hosts"
$a=FileGetAttrib($hostFile)
FileSetAttrib($hostFile,"-RSAH")


Run("notepad C:\Windows\System32\drivers\etc\hosts")
WinWait("hosts - 记事本","")
WinActivate("hosts - 记事本","")
$b=ControlGetText("hosts - 记事本","","Edit1");$b=获取hosts文件内容
$c=StringInStr($b,"172.19.2.6");$c=检查变量b里是否包含此IP
$e=StringInStr($b,"172.17.37.97");e=检查变量b里是否包含此IP
If $e<>0 Then ;如果存在172.17.37.97那么
        WinClose("hosts - 记事本","");关闭窗口

ElseIf $c=0 and $e=0 Then;如果两个ip不存在那么
        FileWriteLine($hostFile,@CRLF & "172.17.37.97  s508295" & @CRLF);另起一行添加该IP到最后

ElseIf $c<>0 Then ;如果存在172.17.2.6那么
        $d=StringReplace($b,$c,"172.17.37.97  s508295");将原IP替换为现IP
        ControlSetText("hosts - 记事本","","Edit1",$d);将替换后的hosts文件内所有内容写入hosts文件
EndIf

WinClose("hosts - 记事本","");关闭窗口

haijie1223

fileopen
fileread
fileclose

12407470

回复 2# haijie1223


FileOpen("C:\Windows\System32\drivers\etc\hosts")
   使用fileopen打不开hosts文件啊