zhweb 发表于 2009-1-3 17:02:31

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

先谢谢大 家了

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

大绯狼 发表于 2009-1-3 17:17:27

话说现在已经是2008年的最后一分钟了

有一个以前自己程序里的 不知道符合楼主要求不
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

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

zhweb 发表于 2009-1-3 17:47:37

我试试，先谢谢

zhweb 发表于 2009-1-3 17:51:48

好像不行啊

大绯狼 发表于 2009-1-3 20:41:48

怎么个不行法

zhweb 发表于 2009-1-3 20:43:32

运行出错啊

大绯狼 发表于 2009-1-3 20:49:41

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

zhweb 发表于 2009-1-3 22:08:56

原帖由 大绯狼 于 2009-1-3 20:49 发表 http://www.autoitx.com/images/common/back.gif
修改了下 没有定义TOTAL 请确定路径存在


太感谢大绯狼了。

水饺睡觉 发表于 2010-7-2 05:33:52

路过，支持一下！
页: [1]
查看完整版本: 记得论坛以前有一个驱动路径设置源码找不到了，谁有请发一个啊