q115643492 发表于 2009-9-1 12:23:34

请帮我修改下错误，谢谢！

我这有一段代码，提示 $path = \\Server\baojing\这行解析错误，请帮我看看怎么修改！
#include <GUIConstants.au3>
#NoTrayIcon

$path = \\Server\baojing\

While 1

$time0 = @mon & "月" & @mday & "日"
$time1 = "开始时间" & @mon & "-" & @mday & " " & @hour & ":" & @min & ":" & @sec
$time2 = @mon
$time3 = @mday
if FileExists ($path & $time0 & ".htm") then
    Else
filewriteline($path & $time0 & ".htm","<HTML>")
filewriteline($path & $time0 & ".htm","<HEAD>")
filewriteline($path & $time0 & ".htm","<meta http-equiv='refresh' content='11'>")
filewriteline($path & $time0 & ".htm","<TITLE>")
filewriteline($path & $time0 & ".htm", $time2 & "月"& $time3 & "日" & "非法上机记录")
filewriteline($path & $time0 & ".htm","</TITLE>")
filewriteline($path & $time0 & ".htm","</HEAD>")
filewriteline($path & $time0 & ".htm","<BODY>")
EndIf

$name =regread("HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control\ComputerName\ComputerName","ComputerName")
$name1 = @Computername
if ProcessExists ("pubwin.exe")Then
    Else
$time0 = @mon & "月" & @mday & "日"
$time1 = "开始时间" & @mon & "-" & @mday & " " & @hour & ":" & @min & ":" & @sec
filewriteline($path & $time0 & ".htm","客户机 " & $name & " 发现PUBWIN进程被非法结束，请注意！" & $time1 & "   ====" & $name1 & "</P>" )
EndIf

Sleep(10000)

$name =regread("HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control\ComputerName\ComputerName","ComputerName")
$name1 = @Computername
if FileExists ("C:\Program Files\PUBWIN\PUBWIN.EXE") then
    Else
$time0 = @mon & "月" & @mday & "日"
$time1 = "开始时间" & @mon & "-" & @mday & " " & @hour & ":" & @min & ":" & @sec
filewriteline($path & $time0 & ".htm","客户机 " & $name & " 发现C:\Program Files\PUBWIN\PUBWIN.EXE" & $time1 & "   ====" & $name1 & "</P>" )
EndIf

Sleep(10000)

WEnd

顽固不化 发表于 2009-9-1 13:51:02

没学会爬就想会走的感觉。:face (19):

netegg 发表于 2009-9-1 14:23:42

$path = \\Server\baojing\
其他和服务器格式的问题先不管，引号呢

kn007 发表于 2009-9-1 15:30:26

在哪copy来的吧，额

clshuai 发表于 2009-9-2 10:36:48

路径分为相对路径和绝对路径，并且在AU3中，路径是字符串，需要有引号的
页: [1]
查看完整版本: 请帮我修改下错误，谢谢！