用au3怎么运行光盘下面的文件
用au3怎么运行光盘下面的文件:face (37)::face (37)::face (37)::face (37): 1,判断有无光驱
2,判断光驱中有无光盘就绪
3,判断光盘中有无要运行的文件
4,运行 - -!-.-.-.-.-.-
Dim $x,$i
$x = DriveGetDrive("CDROM") ;返回一个含有指定驱动器盘符的数组,数组中的0号元素储存驱动器的数量
If @error Then
MsgBox(0,"错误","没有找到光驱,汗!")
Exit
EndIf
For $i = 1 To $x ;遍历所有光驱
If FileExists($x[$i] & "\AUTORUN.EXE") Then
Run($x[$i] & "\AUTORUN.EXE")
Exit
Else
SetError(1)
EndIf
Next
If @error Then
MsgBox(0,"错误","没有找到文件!")
EndIf
楼上的代码不错,比我想的遍历A~Z盘要好些
页:
[1]