版版再来看看这个问题！关于搜索文件的！[已经解决]

sunkiss

还是找文件，不确定文件所在的盘符，但是知道盘符下面的路径，比如我的ghost.exe文件在移动硬盘的i:\sys\ghost.exe这里，但是每次换电脑路径会变！怎么查找呢？我自己琢磨个查找文件的东东，没成功！我最终是想找到\SYS\WINXPSP3.GHO这个路径并把"X:\SYS\WINXPSP3.GHO"这个路径设或者找到的这个盘符设置为环境变量，然后用ghost恢复系统的时候调用，

Local $var[20],$gho=":\SYS\WINXPSP3.GHO",$si,$sum,$sp,$flag

For $i = 99 To 119
        ;$bj=Chr($i)
        $sp=$var[Chr($i)]&$gho
        MsgBox(4096,"sdfsa",$sp)
                $flag=FileExists($sp)
                If $flag=1 Then
                MsgBox(4096, "C:\autoexec.bat 文件", "存在")
                Else
    MsgBox(4096,"C:\autoexec.bat 文件", "不存在")
                EndIf
        Next

我自己都觉得相当不通顺，但是不会改了！

afan

Local $var = DriveGetDrive('all'), $gho = '\SYS\WINXPSP3.GHO'
If @error Then Exit MsgBox(0, 0, '错误')
For $i = 2 To $var[0]
        If FileExists($var[$i] & $gho) Then ExitLoop MsgBox(4096, 0, '已找到：' & $var[$i] & $gho)
Next

sunkiss

回复 2# afan


你看我自己搞的还是不成功！

Local $gho=':\SYS\WINXPSP3.GHO',$si,$sum,$sp,$flag
Dim $var[21]
$var[0]='c'
$var[1]='d'
$var[2]='e'
$var[3]='f'
$var[4]='g'
$var[5]='h'
$var[6]='i'
$var[7]='j'
$var[8]='k'
$var[9]='l'
$var[10]='m'
$var[11]='n'
$var[12]='o'
$var[13]='p'
$var[14]='q'
$var[15]='r'
$var[16]='s'
$var[17]='t'
$var[18]='u'
$var[19]='v'
$var[20]='w'
For $i = 0 To 20
        ;$bj=Chr($i)
        $sp=$var[$i]&$gho
        MsgBox(4096,'sdfsa',$sp)
                $flag=FileExists($sp)
                If $flag=1 Then
                MsgBox(4096, 'C:\autoexec.bat 文件', '存在')
                Else
    MsgBox(4096,'C:\autoexec.bat 文件', '不存在')
                EndIf
        Next

sunkiss

我怎么就不会呢？

afan

Local $gho = ':\SYS\WINXPSP3.GHO', $si
For $i = 67 To 90
        If FileExists(Chr($i) & $gho) Then MsgBox(4096, 1, Chr($i) & $gho & ' 存在')
Next

sunkiss

回复 5# afan


  厉害简洁明了

ndyzx

回复 5# afan
A大好，如果WINXPSP3.GHO改为一个可执行文件，要运行它我加一句：RunWait('$var[$i] & $gho')，但不能运行，要怎样才能运行。

afan

回复  afan
A大好，如果WINXPSP3.GHO改为一个可执行文件，要运行它我加一句：RunWait('$var[$i] & $gho') ...
ndyzx 发表于 2012-2-23 21:54

    RunWait($var[$i] & $gho)

ndyzx

回复 8# afan
谢谢老大，但我的文件是放在U盘，调用U盘驱动安装程序路径为I：\SYj\drivers\e5\EasyDrv.exe，其不I为U盘盘符。可是改后还是运行不了，用过其它方法也不行，不知是什么原因。

afan

回复  afan
谢谢老大，但我的文件是放在U盘，调用U盘驱动安装程序路径为I：\SYj\drivers\e5\EasyDrv.exe， ...
ndyzx 发表于 2012-2-23 22:04

    I：\SYj\drivers\e5\EasyDrv.exe，其不I为U盘盘符
不懂意思

ndyzx

回复 2# afan
按3楼的方法不能运行，但按5楼的行，很奇怪

Local $gho = ':\SYj\drivers\e5\EasyDrv.exe', $si
For $i = 67 To 90
        If FileExists(Chr($i) & $gho) Then RunWait(Chr($i) & $gho )
        Next

这样能行，太好了，晚上在论坛潜了3个小时收获很大，这么简洁的几句就行，谢A大。

ndyzx

回复 10# afan
字打错了  I:是U盘盘符。

huangshan719

学习了学习了