VB变态应用之"移花接木",陈辉原创(VB6.0)
作者:admin 日期:2008-07-21
使用陈辉的注入模块写的一个远程下载的例子,嘿嘿.
之前这小子写的那个说明直接看得我差点断气(他不喜欢用标点貌似=_=)
原地址: http://blog.csdn.net/chenhui530/archive/2008/06/01/2500112.aspx
于是干脆自己写个说明算了,真要命.
用这个模块可以方便地在指定的进程里执行API函数.
默认下载的那个文件是使用超级绿豆的读别的进程的LV内容的模块写的,具体自己看吧....
不过有一点要注意,就是用这个函数下载大些的文件,那么下载过程中本进程会挂起.
下载地址在这里:
点击下载此文件
添加个图片:
之前这小子写的那个说明直接看得我差点断气(他不喜欢用标点貌似=_=)
原地址: http://blog.csdn.net/chenhui530/archive/2008/06/01/2500112.aspx
于是干脆自己写个说明算了,真要命.
用这个模块可以方便地在指定的进程里执行API函数.
默认下载的那个文件是使用超级绿豆的读别的进程的LV内容的模块写的,具体自己看吧....
不过有一点要注意,就是用这个函数下载大些的文件,那么下载过程中本进程会挂起.
下载地址在这里:
点击下载此文件添加个图片:
上一篇: 
下一篇: 
文章来自: 评论: 7 | 引用: 0 | 查看次数: 2058
admin[2008-08-23 03:01 PM | 
]EXPLORER进程应该是被安全软件处理了
我查了一下已经载入urlmon.dll的进程,有千千静听与傲游,于是就试了一下,没有问题,但现在关了杀软也不能在EXPLORER里执行(之前是可以的)
另外就是其它没有载入这个DLL的进程也会出现这样的问题.
我查了一下已经载入urlmon.dll的进程,有千千静听与傲游,于是就试了一下,没有问题,但现在关了杀软也不能在EXPLORER里执行(之前是可以的)
另外就是其它没有载入这个DLL的进程也会出现这样的问题.
万里无云[2008-08-23 12:53 PM | ]0X*****指令引用的0X内存.该内存不能为"written"
admin[2008-08-17 04:55 PM | ]出什么错？
不同的系统可能会有些小差别的。
不同的系统可能会有些小差别的。
万里无云[2008-08-15 02:53 PM | ]出错吖`~`用不了
admin[2008-07-25 11:38 AM | ]哈哈.
方便吧?
看例子,什么API都可以方便地远程执行.
方便吧?
看例子,什么API都可以方便地远程执行.
千里流云[2008-07-25 01:43 AM | ]这东西太恐怖了吧......
让我用它来干点坏事
让我用它来干点坏事
VB 6.0 里，我在一个程序里用了webbrowser，webbrowser里有alert弹窗。于是我用timer来不停检测（用了FindWindow,FindWindowEx,EnumChildWindows等）是否弹窗，若有则关闭。可是除了个别的貌似能被关闭，其他的都没反应。
程序本身的msgbox窗口弹窗时，并不会中断timer的运行。是不是反而webbrowser里引起的外部弹窗会是使之挂起啊？而且奇怪的是，按理说，即使这样会被挂起，那我同时开两份程序，用一份程序去自动点击另一份程序的弹窗，好像也没用呢。
这是为什么呢？
有木有解决的办法？
ps:写完这些没填验证码就提交，回馈错误，我吓一大跳，难道我幸苦码的字就白费了，幸好信春哥原地复活~~~~~
消息框我研究不深,但它确实不会在编译后的EXE里挂起定时器,你用另一个进程去点肯定是行的,不过不确定你的方法是否正确.
你可以试试这个函数:
给出消息框句柄,再给出按钮的坐标(句柄内的绝对坐标),就行了.
Private Function SendClick(hwnd As Long, mX As Long, mY As Long)
'发送点击消息
Dim I As Long
I = PostMessage(hwnd, WM_LBUTTONDOWN, 0, (mX And &HFFFF) + (mY And &HFFFF) * &H10000)
I = PostMessage(hwnd, WM_LBUTTONUP, 0, (mX And &HFFFF) + (mY And &HFFFF) * &H10000)
End Function