找回密码
 加入
搜索
楼主: 仙乃日

让XP安装与7俱进

 火... [复制链接]
 楼主| 发表于 2010-7-10 17:41:02 | 显示全部楼层
更新了离线封装的核心代码。
发表于 2010-7-10 19:59:08 | 显示全部楼层
学习了.!!!!!!!
发表于 2010-7-10 19:59:41 | 显示全部楼层
应该放入源码作品!!!
 楼主| 发表于 2010-7-11 12:25:57 | 显示全部楼层
#include <SetupApi.au3>
Clear_Ghost_Hardware()
Func Clear_Ghost_Hardware()
        Local $Enum, $x, $y, $z, $ID1, $ID2, $ID3, $EnID,$hDevs, $tDevInfo
        $Enum = "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Enum"
        $x = 1
        While 1
                $ID1 = RegEnumKey($Enum, $x)
                If @error = -1 Then ExitLoop
                If StringInStr($ID1, "USB") = 0 And StringInStr($ID1, "Root") = 0 And  StringInStr($ID1, "SW") = 0 Then
                        $y = 1
                        While 1
                                $ID2 = RegEnumKey($Enum & "" & $ID1, $y)
                                If @error = -1 Then ExitLoop
                                $z = 1
                                While 1
                                        $ID3 = RegEnumKey($Enum & "" & $ID1 & "" & $ID2, $z)
                                        If @error <> 0 Then ExitLoop
                                        RegRead($Enum & "" & $ID1 & "" & $ID2 & "" & $ID3 & "\Control", "hdj")
                                        If @error = 1 Then
                                                $EnID = $ID1 & "" & $ID2 & "" & $ID3
                                                MsgBox(64, "", $EnID)
                                                _SetupDiCreateDeviceDevs($EnID, $hDevs, $tDevInfo)
                                                _SetupDiRemoveDevice($hDevs, $tDevInfo, True)
                                                _SetupDiDestroyDeviceInfoList($hDevs)
                                                DllCall("shell32.dll", "none", "SHChangeNotify", "long", 0x8000000, "int", 0, "ptr", 0, "ptr", 0)
                                        EndIf
                                        $z += 1
                                WEnd
                                $y += 1
                        WEnd
                EndIf
                $x += 1
        WEnd
EndFunc   ;==>Clear_Ghost_Hardware
发表于 2010-7-15 10:23:56 | 显示全部楼层
楼主啊,你的权限也只是20,却设置过高的31的权限,只让高级会员看吗?希望楼主能手下留情,放低权限。嘻嘻!
 楼主| 发表于 2010-7-26 16:52:38 | 显示全部楼层
楼主啊,你的权限也只是20,却设置过高的31的权限,只让高级会员看吗?希望楼主能手下留情,放低权限。嘻嘻 ...
23070205 发表于 2010-7-15 10:23


呵呵 ……多多灌水就行啦!
发表于 2010-7-26 18:34:21 | 显示全部楼层
下来学习下
发表于 2010-7-26 23:15:37 | 显示全部楼层
可惜权限不够
发表于 2010-7-27 06:23:56 | 显示全部楼层
又有更新,支持楼主
发表于 2010-7-30 19:40:17 | 显示全部楼层
权限不够   我差得太远了  这样让那些半瓢水的很难进步啊
发表于 2010-8-3 15:44:00 | 显示全部楼层
不是很懂 深奥啊
发表于 2010-8-3 17:21:27 | 显示全部楼层
国内前几年搞封装部署研究的不少,现在都没人搞咯...
想看些资料还得去国外,国内都是老资料了!
发表于 2010-11-12 20:52:22 | 显示全部楼层
感谢分享!
发表于 2010-11-16 15:41:24 | 显示全部楼层
没明白这玩艺是干吗的
发表于 2010-11-16 16:09:58 | 显示全部楼层
在灌区也收钱 真哟哟你的
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-25 14:55 , Processed in 0.073926 second(s), 14 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表