记得论坛以前有一个驱动路径设置源码找不到了，谁有请发一个啊

zhweb

先谢谢大 家了

[ 本帖最后由 zhweb 于 2009-1-3 22:09 编辑 ]

大绯狼

有一个以前自己程序里的 不知道符合楼主要求不
[au3]Global $total=""
Seek(@WindowsDir & "\drivers\")
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion", "DevicePath", "REG_EXPAND_SZ", $total & ";%SystemRoot%\inf")
Func Seek($Dir)
        If StringRight($Dir, 1) <> "\"  Then $Dir = $Dir & "\"
        $search = FileFindFirstFile($Dir & "*.*")
        While 1
                $file = FileFindNextFile($search)
                If @error Then ExitLoop
                If FileGetAttrib($Dir & $file) = "D"  Then
                        Seek($Dir & $file)
                        $total = $total & ";" & $Dir & $file
                EndIf
        WEnd
        FileClose($search)
EndFunc   ;==>Seek[/au3]

[ 本帖最后由 大绯狼 于 2009-1-3 20:50 编辑 ]

zhweb

我试试，先谢谢

zhweb

好像不行啊

大绯狼

怎么个不行法

zhweb

运行出错啊

大绯狼

修改了下 没有定义TOTAL 请确定路径存在

zhweb

原帖由 大绯狼 于 2009-1-3 20:49 发表
修改了下 没有定义TOTAL 请确定路径存在

太感谢大绯狼了。

水饺睡觉

路过，支持一下！