- 博客(31)
- 收藏
- 关注
原创 终于完成了Ring3下Call PspTerminateProcess
出差到现在都即将两个月了,无聊郁闷中,好在昨天晚上成功在Ring3下Call PspTerminateProcess总算是有一份值得高兴得事情了,目前还只支持XP,关于搜索PspTerminateProcess的特征码定位是参考了网络上的一篇文章.目前工作正在移植到DLL中封装成标准函数供VB等语言调用.现在冰刃也可以轻易被结束了^_^.
2007-10-23 16:32:00 2821 6
原创 VB Ring3下解锁文件的模块(二)
VB Ring3下解锁文件的模块(一) CSDN地址是:http://topic.csdn.net/u/20070925/11/c0fa3831-e732-46f2-81e3-2465d0577151.html?1416895339VB Ring3下解锁文件的模块(一) 博客地址:http://blog.csdn.net/chenhui530/archive/2007/10/03/181030
2007-10-21 09:30:00 3303 9
原创 VB Ring3下解锁文件的模块(修正及一些新的想法)
发这篇文章之前我想说些心里话,希望大家不要闲我罗嗦.我经常和老魏(Modest【塞北雪貂】)在讨论,VB版的人气越来越差了,我心里在着急,也在难过,说实话我不希望这样的现象出现,更不希望VB从此没落.但是我相信VB不会倒下我们CSDN上的VB版也不会倒下,因为我们大家都不会放弃它,对吗?所以我希望大家发扬共享精神把你宝贵的源码优秀的源码贴出来给大家一起分享吧,多花一点点时间来给大家解决问题,多..
2007-10-18 17:05:00 5257 2
原创 VB 枚举隐藏进程
这篇文章是我翻译了两篇VC文章结合在一起的成果~具体是翻译的文章出处我也不清楚,我也是在网络上找到的希望原作者见谅!此文章是通过获取内核数据枚举EPROCESS结构来枚举进程的.所以现在大部分隐藏进程的程序都可以有一一列出来.在有的机器上运行可能会出错.由于时间关系我只写了检查注释如果有不懂的大家请在这里留言我会一一作答.下面是VB源码:VERSION 5.00Begin VB.Form
2007-10-09 16:33:00 4604 6
原创 VB 更改注册表键权限
VERSION 5.00Begin VB.Form frmMain BorderStyle = 0 None ClientHeight = 885 ClientLeft = 0 ClientTop = 0 ClientWidth = 4680 LinkTopic = "Form1" S
2007-10-03 12:35:00 7232 8
原创 VB Ring3下解锁文件的模块
这篇文章参考了这个地址http://www.xfocus.net/articles/200708/935.html Attribute VB_Name = "modLockFileInfo" Option Explicit Private Declare Function NtQueryInformationProcess Lib "NTDLL.DLL"
2007-10-03 12:31:00 5039 2
原创 VB 分别用DIR和API遍历驱动器实例
相信大家都用过DIR函数吧,用没有用过DIR遍历某个文件夹,甚至一个驱动器乃至整个硬盘呢?有没有想过究竟是DIR使用方便还是API方便呢?有没有想过使用DIR快些还是API快些呢?好了一切都可以在我提供的源码实例中得到肯定回答.以下是关键部分源码:Option Explicit************************************************************
2007-10-03 12:27:00 4272 3
原创 VB 灰色按钮客星
无聊时写的程序。没什么技术可言,就是使用了鼠标钩子和一些遍历子窗体的函数等等,有兴趣的可以看看,下面是源码。主窗体源码:Option ExplicitPrivate Declare Function MessageBox Lib "user32" Alias "MessageBoxA" (ByVal hwnd As Long, ByVal lpText As String, ByVal l
2007-10-03 12:26:00 2535
原创 VB 利用WMI进行外界设备插入分配盘符监视
VERSION 5.00Begin VB.Form frmMain Caption = "Form1" ClientHeight = 3090 ClientLeft = 60 ClientTop = 450 ClientWidth = 4680 LinkTopic = "Form1"
2007-10-03 11:30:00 1777 2
原创 VB 获取外部LISTVIEW内容
VERSION 5.00Begin VB.Form frmMain Caption = "Form1" ClientHeight = 3090 ClientLeft = 60 ClientTop = 450 ClientWidth = 4680 LinkTopic = "Form1"
2007-10-03 11:27:00 6602 1
原创 VB 利用WMI进行服务监视
VERSION 5.00Begin VB.Form frmMain Caption = "服务监视" ClientHeight = 2730 ClientLeft = 60 ClientTop = 450 ClientWidth = 3990 LinkTopic = "Form1"
2007-10-03 11:25:00 1940 1
原创 VB 利用WMI进行共享目录的监视
VERSION 5.00Begin VB.Form frmMain Caption = "Form1" ClientHeight = 3090 ClientLeft = 60 ClientTop = 450 ClientWidth = 4680 LinkTopic = "Form1"
2007-10-03 11:24:00 1282
原创 VB 利用WMI进行PNP监视
VERSION 5.00Begin VB.Form frmMain BorderStyle = 1 Fixed Single Caption = "PNP监视" ClientHeight = 4350 ClientLeft = 45 ClientTop = 435 ClientWidth
2007-10-03 11:23:00 1970
原创 VB 利用WMI进行USB监视
VERSION 5.00Begin VB.Form frmMain BorderStyle = 1 Fixed Single Caption = "Usb监视" ClientHeight = 4350 ClientLeft = 45 ClientTop = 435 ClientWidth
2007-10-03 11:22:00 2811
原创 C# 利用WMI进行注册表监视
VERSION 5.00Begin VB.Form frmMain Caption = "Form1" ClientHeight = 3090 ClientLeft = 60 ClientTop = 450 ClientWidth = 4680 LinkTopic = "Form1"
2007-10-03 11:20:00 3410 6
原创 VB 利用WMI进行进程监视
VERSION 5.00Begin VB.Form frmMain Caption = "Form1" ClientHeight = 3090 ClientLeft = 60 ClientTop = 450 ClientWidth = 4680 LinkTopic = "Form1"
2007-10-03 11:16:00 3093
原创 C# 利用WMI进行日志监视
using System;using System.Collections.Generic;using System.ComponentModel;using System.Data;using System.Drawing;using System.Text;using System.Management;using System.Windows.Forms;namespace Monito
2007-10-03 11:10:00 1811
原创 VB 利用WMI进行日志监视
VERSION 5.00Begin VB.Form frmMain Caption = "Form1" ClientHeight = 3090 ClientLeft = 60 ClientTop = 450 ClientWidth = 4680 LinkTopic = "Form1"
2007-10-03 11:08:00 1527
原创 VB IE控制
VERSION 5.00Begin VB.UserControl uctlIe ClientHeight = 450 ClientLeft = 0 ClientTop = 0 ClientWidth = 510 ScaleHeight = 450 ScaleWidth = 510EndAttri
2007-10-03 11:07:00 4913 1
原创 C# 系统分析器(第一个C#程序)
代码太多了,我现在不能上传附件下次再传吧!frmMain.csusing System;using System.Collections;using System.Collections.Generic;using System.ComponentModel;using System.Data;using System.Drawing;using System.Text;using Sys
2007-10-02 15:54:00 4723 2
原创 C#文件监视程序
frmMain.csusing System;using System.Collections.Generic;using System.Collections;using System.ComponentModel;using System.Data;using System.Drawing;using System.Text;using System.Windows.Forms;using
2007-10-02 15:51:00 3785 1
原创 C#文件搜索实例
using System;using System.Collections.Generic;using System.ComponentModel;using System.Data;using System.Drawing;using System.Text;using System.Windows.Forms;using System.IO;using System.Runtime.Inter
2007-10-02 15:49:00 7698 9
翻译 一个动态调用DLL的源码
Option ExplicitPublic Declare Function LoadLibrary Lib "kernel32" Alias "LoadLibraryA" (ByVal lpLibFileName As String) As LongPublic Declare Function GetProcAddress Lib "kernel32" (ByVal hModule As Lo
2007-10-02 15:39:00 1489 2
原创 VB常用文件操作类
最近经常看到有网友问到VB文件操作相关的,正好以前写程序自己封装了一个类,希望能给大家一些帮助。当中难免存在问题希望大家修改并完善。 Option Explicit "************************************************************************************************************* "
2007-10-02 15:32:00 5092 1
原创 一篇关于在COMBOBOX中使用SENDMESSAGE的实例
最近经常有人问我这个问题索引就把代码贴出来大家一起共享吧!其实难度很低就是SENDMESSAGE的应用而已。但是实用性却瞒高,看到很多程序都有类似的功能。 程序功能: 在TEXTBOX中输入字符后马上在COMBOBOX中找匹配的字符串一但找到马上下拉COMBOBOX菜单并且选中此字符串。然后在这期间用户可以使用“F3”继续查找其他类似匹配的字符串,当用户按下“回车键”就使COMBOBOX复原并且选
2007-10-02 15:29:00 7083 2
原创 VB 给你的程序提供暂停功能
VERSION 5.00Begin VB.Form frmMain Caption = "Form1" ClientHeight = 3195 ClientLeft = 60 ClientTop = 345 ClientWidth = 4680 LinkTopic = "Form1"
2007-10-02 15:27:00 10075 2
原创 VB 进程间通讯
对于进程间的 通讯有N多种方法,常见的有DDE,还有内存文件映射,管道,自定义消息,甚至WINSOCK等等很多种方法本文就内存文件映射来说下进程间的通讯.建立程序A代码如下VERSION 5.00Begin VB.Form Form1 Caption = "Form1" ClientHeight = 3090 ClientLeft =
2007-10-01 19:44:00 6044 1
原创 VB 利用UDP制作简单的点对点聊天程序
VERSION 5.00Object = "{248DD890-BB45-11CF-9ABC-0080C7E7B78D}#1.0#0"; "MSWINSCK.OCX"Begin VB.Form frmMain BorderStyle = 1 Fixed Single Caption = "点对点聊天 " ClientHeight = 51
2007-10-01 19:24:00 5119 2
原创 VB 局域网传输工具(接收端)
VERSION 5.00Object = "{248DD890-BB45-11CF-9ABC-0080C7E7B78D}#1.0#0"; "MSWINSCK.OCX"Begin VB.Form frmMain BorderStyle = 1 Fixed Single Caption = "程序之家文件局域网传输器接收端 V1.0" ClientHe
2007-10-01 12:38:00 3538
原创 VB 局域网传输工具(发送端)
VERSION 5.00Object = "{248DD890-BB45-11CF-9ABC-0080C7E7B78D}#1.0#0"; "MSWINSCK.OCX"Begin VB.Form frmMain BorderStyle = 1 Fixed Single Caption = "程序之家局域网文件传输器发送端 V1.0" ClientHe
2007-10-01 12:34:00 4847 2
原创 VB 远程注入卸载DLL
Option ExplicitPrivate Const PROCESS_CREATE_THREAD = &H2Private Const PROCESS_QUERY_INFORMATION = &H400Private Const PROCESS_VM_WRITE = &H20Private Const PROCESS_VM_OPERATION = &H8Private Const MEM_CO
2007-10-01 12:32:00 2542 2
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人