shounei 发表于 2009-4-20 15:03:46

写到中间没办法写了

不好意思！本人刚学AU3。现在想写一个小程序。根据配置文件里面的计算机名，运行程序Global $inipath = @ScriptDir & "\config.ini"
If @error Then
MsgBox(4096, "", "发生错误,可能目标文件并非标准的INI文件.")
Exit
Local $HostName
$HostName = StringSplit(IniRead($inipath, "配置信息", "机器列表", ""), ",")
If @ComputerName=$HostName
。请高手指点怎么往下写


这是配置文件
[配置信息]
机器列表=D180,D179

[ 本帖最后由 shounei 于 2009-4-20 16:09 编辑 ]

shounei 发表于 2009-4-20 15:06:48

:face (33): 高手快来

seominho 发表于 2009-4-20 15:30:07

Global $inipath = @ScriptDir & "\config.ini"
If Not FileExists($inipath) Then
MsgBox(4096, "", "发生错误,可能目标文件不存在")
Exit
EndIf
Local $HostName
$HostName = StringSplit(IniRead($inipath, "配置信息", "机器列表", ""), ",")
for $i=0 to ubound($HostName)-1
If @ComputerName=$HostName[$i]
；执行相应操作
EndIf
Next

shounei 发表于 2009-4-20 16:02:45

楼上的给的代码不行呀
:face (37): 修正一下呀

shounei 发表于 2009-4-20 16:06:46

Global $inipath = @ScriptDir & "\config.ini"
If Not FileExists($inipath) Then
MsgBox(4096, "", "发生错误,可能目标文件不存在")
Exit
EndIf
Local $HostName
$HostName = StringSplit(IniRead($inipath, "配置信息", "机器列表", ""), ",")
for $i=0 to ubound($HostName)-1
If @ComputerName=$HostName[$i] Then
Run("Notepad.exe", "", @SW_MAXIMIZE)
EndIf
Next:face (32): 搞定

小包乖兔兔 发表于 2009-4-20 16:17:21

#include <array.au3>
Global $inipath = @ScriptDir & "\config.ini"
If Not FileExists($inipath) Then
        MsgBox(4096, "", "发生错误,可能目标文件不存在")
        Exit
EndIf
Local $HostName
$HostName = StringSplit(IniRead($inipath, "配置信息", "机器列表", ""), ",")
if @error then MsgBox(0,"温馨小提示","读取机器列表失败")
for $i = 1 to $HostName
        If @ComputerName = $HostName[$i] then
                ;;;这里填写你要执行的内容
        EndIf
Next
页: [1]
查看完整版本: 写到中间没办法写了