网站已升级!
VB编程

获取程序的版本信息 --- VB

 

取自病毒防火墙里的代码,获取到启动项后,需要根据路径获取到程序的版本信息,后来网上找了一些代码都不能用,经过自己努力终于解决了问题,也发现了API示例里的问题所在。

大致需要3个函数GetFileVersionInfoSize,GetFileVersionInfo,VerQueryValue

API的解释为:

-------------------------------------------------------GetFileVersionInfoSize

...

More...

blackfeather 2009/6/13 0评论

VB编程

最近一直在开发的软件,泄露点

 

传说中搞病毒防火墙,其实就是ring3全局钩子+API hook,没什么新意,但是很有分量。比如实时监控,以前根本没有做过,光写逻辑图就画了一张纸。。。可能还有更简洁的方式通知DLL但是我不知道吧,反正用了文件内存映射。最大的收获就是对系统基层运行过程的了解,消息机制,爽死了,越写越精神,要不是眼睛疼还不卧倒呢!但愿能有一个好的结果。

忙了有段时间了,终于见到轮廓了,感觉不错。先上几张图!

 

...

More...

blackfeather 2009/6/11 0评论

随心杂谈

郁闷,空间再次被封了。。。

 

空间买的XXX(不做广告)的,一年30、40块,没有IIS并发数限制和流量限制,速度还可以,挺爽的。前一段时间结果空间被“和谐”了,给我的理由域名没有备案,不准绑定。我那个郁闷,不就是一个小小博客么,犯得着这么扯淡么。。。跟管理员扯淡了半天还是无果。。。无奈了,找了5944免费空间传说中的美国空间,可以随便绑定域名。OK,终于可以再次开张了。。。

唉,开一个网站真是难啊。。。

blackfeather 2009/5/12 0评论

VB编程

API HOOK的一些收集

 

最近在搞API HOOK的相关操作,收集了一个很牛的模块,不敢独享,发出来!

可能有人看出来了这个不是VB,呵呵确实,这个就是传说中的powerbasic

调用方式,先  #INCLUDE "HookApi.Inc" ,然后···发个例子吧

#COMPILE EXE
#DIM ALL
...

More...

blackfeather 2009/2/3 0评论

VB编程

加载驱动 -- VB

 

使用VB来加载驱动,不多解释了。用的是最简单,最原始的注册表加载的方法。

代码如下:

Option Explicit

Private Const STATUS_IMAGE_ALREADY_LOADED = 
Private Const HKEY_CLASSES_ROOT = 
...

More...

blackfeather 2008/11/26 1评论

VB编程

使用WININET的函数写下载功能 -- VB

 

现在杀毒软件对URLDOWNTOFILEA这个API查的是越来越严了,无论我怎么加密,动态调用等等就是被查出来。哎,我还不会很底层的东西,老老实实使用wininet的API写了一个下载的FUNCTION。感觉倒是很爽!

简单列一下遇到的主要问题:

1、InternetReadFile这个函数原型是

Declare Function InternetReadFile Lib "wininet.dll" (ByRef hFile As Long,ByVal sBuffer As String, ByVal dwNumberOfBytesToRead As Long, ByRef lpdwNumberOfBytesRead As Long)as integer

...

More...

blackfeather 2008/11/25 2评论

其他代码

替换服务添加一个svchost.exe启动的服务 -- delphi

 

建立svchost.exe启动的服务现在貌似很流行,黑洞,gh0st和我们小组的远控都是这种方式,主要是隐蔽性高。我发出来替换服务的方式添加,现在VB版的正在写,就是遇到了点问题,比较恶心,很快就能解决,写完了第一时间发出来!

DELPHI代码如下:

{安装单元
完成进度:服务安装
日期:2008,9,16
作者:Lenk(L.S.T)}
...

More...

blackfeather 2008/11/19 2评论

VB编程

远程注入/卸载/自我删除(RtlCreateUserThread) -- VB

 

原文地址:http://blog.csdn.net/chenhui530/archive/2008/10/21/3119107.aspx  作者:chenhui530(大仙级人物)

 

 最近才发现的“RtlCreateUserThread”(下步调用ZwCreateThread)这可是个好东西,可以创建远程线程,也可以用来写多线程程序,但是在VB里好像还是不是很稳定只能用API。

...

More...

blackfeather 2008/11/16 0评论