无忧启动论坛

标题: 公开源码了,有研究AUTOIT或喜欢编程的的就过来拿吧 [打印本页]

作者: victor888    时间: 2007-12-1 20:07
标题: 公开源码了,有研究AUTOIT或喜欢编程的的就过来拿吧
我没有精力了,喜欢搞的随便弄吧,愿意怎样YY就怎样YY,所有的版权都不要了。

1. 公布卡巴7绿色版所涉及的所有程序的源码,包括setup.exe,setup_cd.exe,uninstall.exe,uninstall_cd.exe,avp7.exe,activate.exe

2. 公布未发布的U盘启动杀软及拖盘程序。

AU3.rar

8.53 KB, 下载次数: 1345, 下载积分: 无忧币 -2


作者: zyyxsyh    时间: 2007-12-1 20:41
好大一只沙发,,,我先坐了,,,

顺便问一句,,永久生效不??嘿嘿,,太贪了啊!
作者: M    时间: 2007-12-1 20:50
天大的一个地板。我抢着做了。
作者: victor888    时间: 2007-12-1 20:52
水区的同志来了,哈哈。
作者: zyyxsyh    时间: 2007-12-1 20:53
对滴对滴,,,LS..挺有眼力滴!

顺便说一句,,原创的东东,,我还是比较喜欢滴,,虽然自已不能原创!

[ 本帖最后由 zyyxsyh 于 2007-12-1 08:55 PM 编辑 ]
作者: bixing    时间: 2007-12-1 21:20
走过路过,一定要捧版主的场哦。
作者: yce    时间: 2007-12-1 21:31
强,拿一个下来研究研究
作者: 假大空    时间: 2007-12-1 21:43
来的正当时啊,版主的精品一定要顶!
作者: genius3    时间: 2007-12-1 22:17
水区过来滴,来看看楼主的最后一次~
作者: 无优处男    时间: 2007-12-1 22:54
看不懂,纯路过
作者: ynxmaifmsguxmft    时间: 2007-12-1 23:02
可惜了,我不懂啊,这么好的东东。哎。。。。
作者: 虚无飘渺    时间: 2007-12-1 23:24
哇,真是好东东,快快收藏。
作者: shizewen    时间: 2007-12-2 01:37
可惜了,我不懂啊,这么好的东东。哎。。。。
作者: freesoft00    时间: 2007-12-2 09:51
太好了。我最近也有研究autoit的意思
作者: barton    时间: 2007-12-2 09:53
看了下,回帖的人当中水区的人较多
作者: spadek    时间: 2007-12-2 13:03
我来了,支持下,嘿嘿,好好研究。。。o(∩_∩)o.
作者: shuodan    时间: 2007-12-2 15:02
年终岁尾,大家都比较忙,楼主应该理解o(∩_∩)o...
这不代表我们忘了你,o(∩_∩)o...来——干一杯
作者: mynba98    时间: 2007-12-2 16:36
我也来顶一下。老大昨天说了,要公开,就公开了。佩服呀。再顶你
作者: y10k    时间: 2007-12-2 20:47
收一个备用,谢谢分享。
作者: 阿非    时间: 2007-12-2 21:32
菜鸟路过一次 
作者: 小木头    时间: 2007-12-3 08:27
收藏下了!谢谢你公布源码。回头会有用的。
作者: 无翼鸟飞翔    时间: 2007-12-4 02:17
Func _GetUSBDrives()
    Local $aDletters[1]     
    $strComputer = "."
    Local $objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\cimv2")
        Local $colDiskDrives = $objWMIService.ExecQuery("SELECT * FROM Win32_DiskDrive")
        For $objDrive In $colDiskDrives
                If $objDrive.pnpdeviceid <> RegRead("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Disk\Enum", _
                RegRead("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Disk\Enum","count")-1) then Continueloop
        $strDeviceID = StringReplace($objDrive.DeviceID, "\", "\\")
        Local $colPartitions = $objWMIService.ExecQuery _
            ("ASSOCIATORS OF {Win32_DiskDrive.DeviceID=""" & _
                $strDeviceID & """} WHERE AssocClass = " & _
                    "Win32_DiskDriveToDiskPartition")     
        For $objPartition In $colPartitions
            Local $colLogicalDisks = $objWMIService.ExecQuery _
                ("ASSOCIATORS OF {Win32_DiskPartition.DeviceID=""" & _
                    $objPartition.DeviceID & """} WHERE AssocClass = " & _
                        "Win32_LogicalDiskToPartition")
            For $objLogicalDisk In $colLogicalDisks
                _ArrayAdd($aDletters,$objLogicalDisk.DeviceID )
            Next
        Next
    Next
    Return $aDletters
EndFunc


偶已关闭wmi.................................
还有.程序中存在一些小错误...
作者: 1test1    时间: 2007-12-4 02:54
哇!好东西啊,谢谢楼主无私分享,拿来学学:)
作者: victor888    时间: 2007-12-4 06:48
原帖由 无翼鸟飞翔 于 2007-12-4 02:17 AM 发表
Func _GetUSBDrives()
    Local $aDletters[1]     
    $strComputer = "."
    Local $objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\cimv2")
        Local $colDiskDrives = $objWMIService ...


关闭WMI,则无法判断U盘HDD的分区盘符。
当然,就量产自己的U盘的话,可以通过指定U盘上的特定文件,或都给U盘指定序列号来判定。

BUG,肯定是有,希望我们能探讨。
作者: chinaboy    时间: 2007-12-4 10:27
支持原代码.希望有人继续努力
作者: jfm034    时间: 2007-12-8 14:01
支持....

虽然头晕
作者: btwhy    时间: 2007-12-8 20:35
不懂。。纯属路过而以
作者: victor888    时间: 2007-12-13 13:39
我把它移动到PE区,可能这里感兴趣的人多。
作者: wands    时间: 2007-12-13 14:02
拿一个下来研究研究 谢谢!
作者: chouliu    时间: 2007-12-13 14:05
分享精神
顶你
......
作者: garuda    时间: 2007-12-13 15:52
谢谢分享~
作者: wanghh    时间: 2007-12-13 17:17
楼主是好人啊!我的看看呀!
作者: zhengxiaoj    时间: 2007-12-13 19:00
好东西,谢谢分享   
作者: zjl6634    时间: 2007-12-13 19:09
嘿嘿,好东西是要顶的!!!
作者: coney_nzly    时间: 2007-12-13 21:05
支持一下!下載過來試試看!
作者: xiaoyou    时间: 2007-12-13 21:55
支持下,虽然是剩下的
作者: krell    时间: 2007-12-13 23:58
很好。谢谢楼主。

之前没好意思 PM 的。呵呵!
作者: 123    时间: 2007-12-14 02:28
习惯用反编译来得到源码
作者: nn2nn    时间: 2007-12-15 07:56
提示: 作者被禁止或删除 内容自动屏蔽
作者: songyang    时间: 2007-12-15 09:32
多谢谢版主的无私奉献!
作者: ghostlya    时间: 2007-12-15 12:41
呵呵,下下来看看~~
作者: xin5jin    时间: 2007-12-15 13:21
虽然看不动。 但也顶了。谁叫这样的帖子太少
作者: wangyunpeng    时间: 2007-12-15 17:05
强,拿一个下来研究研究
作者: pgy15    时间: 2007-12-16 09:15
想学学,不知道难不难,先顶
作者: housex    时间: 2007-12-16 09:19
来研究一下,谢谢分享
作者: 659203962    时间: 2007-12-21 20:25
我也支持~~~~~·
作者: qsj    时间: 2007-12-21 20:38
谢谢LZ!正在pe中使用au3。。。
作者: traveller2    时间: 2007-12-21 23:27
感谢楼主分享!!!!
作者: m3lin    时间: 2007-12-22 00:31
近期在研究这个....
不过算是个入门都而已..
哈..可能还看不懂你的作品..
作者: 凌晨破晓前    时间: 2007-12-22 09:09
哎,被N人踩在脚地下
作者: zhhwin    时间: 2007-12-22 10:08
好大一坑哟```顶`````````````
作者: WLDNA    时间: 2007-12-24 10:47
别的不会,就是想学技术,楼主的这个大礼包,偶收下了,(*^__^*) 嘻嘻……
虽然对AU3不是很熟,但是也要硬啃下来滴说,嘿嘿
作者: WLDNA    时间: 2007-12-24 10:57
原帖由 123 于 2007-12-14 02:28 AM 发表
习惯用反编译来得到源码




o(∩_∩)o...哈哈
真是高啊,什么时候我也能啊,羡慕
作者: hehui    时间: 2008-1-31 09:22
有空研究下了!!!
支持原创的!!!!!!!!!!!!!!
作者: smscxj    时间: 2008-1-31 09:57
我也支持~~~~~·
作者: zxb1027    时间: 2008-3-1 20:05
楼主精神可贵,支持一个
作者: Killsystem    时间: 2008-3-3 16:12
支持了,好人啊!---------------------
作者: zhaozhigang    时间: 2008-3-3 16:24
想学技术,楼主的这个大礼包
作者: zxyy    时间: 2008-3-3 17:07
支持了,学习了,谢谢了。
作者: wanghh    时间: 2008-3-3 18:12
非常好的东西!!收藏了
作者: hgzzy    时间: 2008-5-27 06:06
正在学习中......
作者: nijian    时间: 2008-5-27 09:18
这么好的东西都开源了啊!呵呵!
作者: 135956    时间: 2008-5-27 10:59
下来慢慢看。头大啊。
作者: qkydi    时间: 2008-5-27 14:05
好的东西支持,谢谢了。
作者: yypxlove    时间: 2008-6-25 20:51
楼主很有共享精神啊,有时间学习学习。在此多谢了。

[ 本帖最后由 yypxlove 于 2008-6-25 08:52 PM 编辑 ]
作者: 老毛桃    时间: 2008-6-25 21:05
原帖由 原名丢了 于 2007-12-4 06:48 发表


关闭WMI,则无法判断U盘HDD的分区盘符。
当然,就量产自己的U盘的话,可以通过指定U盘上的特定文件,或都给U盘指定序列号来判定。

BUG,肯定是有,希望我们能探讨。

PE 中是无法使用 WMI 服务的,AutoIT 在此情况下就无法做到识别准确识别所有 U 盘的盘符。


作者: 123    时间: 2008-6-25 21:08
原帖由 老毛桃 于 2008-6-25 21:05 发表

PE 中是无法使用 WMI 服务的,AutoIT 在此情况下就无法做到识别准确识别所有 U 盘的盘符。

42616

不是已经给你一个东东?
作者: 老毛桃    时间: 2008-6-25 21:15
原帖由 123 于 2008-6-25 21:08 发表

不是已经给你一个东东?

正是借助 MM 的那个 CheckUSB

准备应用到以后的 PESetup.exe 中,多谢!

使用 AutoIT 编写


作者: xypcmac    时间: 2008-6-25 21:28
CheckUSB 做得好,MM我借用了!

[ 本帖最后由 xypcmac 于 2008-6-25 09:30 PM 编辑 ]
作者: mfyll4    时间: 2008-6-26 12:29
我来学习学习。
谢谢。
作者: tlze    时间: 2008-6-26 16:40
就是看不懂,但也要来支持一下.
作者: stwcb2007    时间: 2008-10-6 22:06
最近在学AUTOIT
下载来研究研究
谢谢咯
作者: lisong    时间: 2008-10-9 13:35
一定要分享版主的精品
作者: 2010susanzhou    时间: 2010-12-27 16:08
多谢楼主的分享,真是好东西啊。
作者: 201234    时间: 2013-4-10 19:52
zyyxsyh 发表于 2007-12-1 20:41
好大一只沙发,,,我先坐了,,,

顺便问一句,,永久生效不??嘿嘿,,太贪了啊!

永久生效不    ?????????
作者: IT砖家    时间: 2013-4-12 13:32
大公无私!值得宣扬啊
作者: 2011profile    时间: 2013-4-13 00:54
源码好东西呀,楼主真无私。
作者: ok007    时间: 2013-4-13 11:58
楼主的心血啊。
作者: longdoushi100    时间: 2013-4-13 13:11
支持楼主
下载学习下
作者: qj395202409    时间: 2013-4-13 16:17
谢谢共享源码 谢谢了~~~
作者: 2011lubb    时间: 2013-4-14 09:54
谢谢共享源码 谢谢了~~~
作者: 1e3e    时间: 2013-4-15 08:56
拿下一个,收藏之,谢谢分享
作者: JonChon    时间: 2013-4-15 10:36
来的正当时啊,版主的精品一定要顶!
作者: 2013戴工科技    时间: 2013-4-15 10:37
厉害啊,开源啦!
作者: 2012aaa55aaa    时间: 2013-4-15 19:03
走过路过,差点就错过啦




欢迎光临 无忧启动论坛 (http://bbs.c3.wuyou.net/) Powered by Discuz! X3.3