导航

2007年4月14日

NtSvc.Ocx使用说明

摘要： Account String , 账号属性，即本 NT 服务在哪一个 NT 域账号下运行，缺省是 LocalSystem 账号，实际上大多数的 NT 服务都可以在此账号下安全圆满的运行。 ControlsAccepted Long, 此服务接受那些 SCM 控制，为以下值： 0 允许 Start 以及 Stop . 2 允许 Pause 以及 Continue . 4 允许 shutdown... 阅读全文

posted @ 2007-04-14 18:41 pegger 阅读(2048) 评论(0) 推荐(0) 编辑

vb程序隐藏运行代码

摘要： '在任务管理器的应用程序栏中隐身Private Declare Function GetWindow Lib "user32" (ByVal hwnd As Long, ByVal wCmd As Long) As LongPrivate Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As ... 阅读全文

posted @ 2007-04-14 18:21 pegger 阅读(1281) 评论(1) 推荐(0) 编辑

vb 纯代码实现NT下隐藏进程

摘要： Option Explicit'-----------------------------------------------------'模块名称：modHideProcess.bas''模块功能：在 XP/2K 任务管理器的进程列表中隐藏当前进程''使用方法：直接调用 HideCurrentProcess()'----------------------------------------... 阅读全文

posted @ 2007-04-14 18:19 pegger 阅读(942) 评论(1) 推荐(0) 编辑

VB加载程序进入系统服务

摘要： VB有2种方式可以加载程序进入系统进程:1.使用纯API方式.下回再写,太麻烦~~~2.使用控件NTSVC.OCX加载现在简单说说如何使用NTSVC.OCX首先在VB工程中加载部件NTSVC.OCX,在窗体中放置该控件.设置NTService1的几个属性:DisplayName(该属性的含义是在服务中显示的名字)ServiceName(该属性的含义是服务的名字,设置它后,我们可以使用控制台命令来开... 阅读全文

posted @ 2007-04-14 16:57 pegger 阅读(1414) 评论(1) 推荐(0) 编辑

获取系统文件夹路径API以及常量

摘要： Const CSIDL_ADMINTOOLS As Long = &H30 '（用户）\开始菜单\程序\系统管理工具Const CSIDL_ALTSTARTUP As Long = &H1D '未本地化的启动Const CSIDL_APPDATA As Long = &H1A '（用户）\应用程序的数据Const CSI... 阅读全文

posted @ 2007-04-14 16:55 pegger 阅读(743) 评论(0) 推荐(0) 编辑

使用Split将规则字符串转化为数组,以及JOIN的用法VB6

摘要： Join函数的参数为一个数组和分隔符（分隔符可选），它把数组的所有元素导入到字符串，元素间用分隔符分隔，并返回该字符串。例如，下面的代码将返回字符串：1,2,3,4,5。 Dim TestArr(0 To 4) As VariantTestArr(0) = 1TestArr(1) = 2TestArr(2) = 3TestArr(3) = 4TestArr(4) = 5debug.prin... 阅读全文

posted @ 2007-04-14 16:54 pegger 阅读(1145) 评论(0) 推荐(0) 编辑

河南恒友科贸有限公司 
电话 ：0371-53733453    传真：0371-65388972
地址：郑州市郑花路8号 E-mail：hengyousoft@QQ.com