- 博客(143)
- 资源 (50)
- 收藏
- 关注
RSS订阅原创 Delphi10.2调用diocp开发的HTTP服务器，网址带中文参数用了UTF8Decode还是乱码的问题解决
由于项目需要，最近用 Delphi.10.2精简版404M的开发工具 维护了一个 网关程序，这个网关程序采用的是 HTTP服务器。核心是调用了 diocp这个开源项目，听说是支持高并发。以上路径 D:\\你.txt 传入到服务器后，出现了 D:\\乱码.txt。通过观察发现 ，由于diocp开源项目是法国人写的。对于中文的支持不够完美。那么我前端发过来的是每个汉字都加一个汉字不就好了吗。最终 retstr 不乱码了，显示的是 D:\\你.txt。然后改成下面的 ，返回则是正常 D:\\你好txt。
2024-03-31 10:17:14
542
原创 vb Image1控件在线加载jpg图片，核心Api函数OleLoadPicturePath
End Type'加载函数With IIDEnd WithLocalErr:Err.Clear调用如下End Sub。
2024-02-03 20:30:49
644
原创 VB判断进程或窗口是否无响应，判断程序是否卡死
'Timeout - 如果目标窗口在指定的时间里没有相应则被视为挂起,以毫秒为单位。'返回 - 被挂起返回true,否则返回false。'hWnd - 欲判断的窗体句柄。群 214016721。'判断窗口是否被挂起。
2023-09-27 22:51:51
396
原创 VB判断其他窗口是否最小化
If IsIconic(a) = 1 Then Me.Caption = "已被最小化" Else Me.Caption = "未被最小化"a = FindWindow(vbNullString, "新倚天2")
2023-09-27 22:42:39
231
原创 vb判断是否联网,判断网络状态调用gethostbyname API函数
Private Sub Command1_Click() '调用方法。Me.Caption = "已联网"Me.Caption = "未联网"
2023-09-27 22:27:30
511
原创 VB6.0实现修改EXE程序的图标
当你给一家公司做技术支持的时候，需求各种各样的，其中今天遇到就是要修改某个程序的图标，代码实现如下。'//注 意：这个方法貌似只对有些EXE文件有效，这不是万能的方法，此方法只能做为参考所用。'//参 数：IconFile 图标文件 ExeFile 被修改的EXE文件。'// q1016058890 群 214016721。'//返 回 值： 成功为True，否则False。MsgBox "成功"MsgBox "失败"'//函数说明：修改EXE图标。
2023-09-27 22:13:45
1447
原创 VB从资源文件中播放wav音乐文件
第一步把 wav音乐文件存放到VB的资源里面，然后就可以调用了。注意以上资源的命名 "Sound", "Wave"'Res 文件读取时也不区分大小写。'音乐效果请“单击”
2023-09-27 22:04:18
666
原创 VB6.0开发文件管理小数据库-基于ACCESS
sSQL = "Select * from 文件信息表 where 文件='" & VSFlexGrid1.TextMatrix(VSFlexGrid1.RowSel, 1) & "'" & " and 日期=#" & VSFlexGrid1.TextMatrix(VSFlexGrid1.RowSel, 2) & "#" & " and 动作='" & VSFlexGrid1.TextMatrix(VSFlexGrid1.RowSel, 3) & "'"实现了数据的增删改查。
2023-09-27 21:33:05
821
原创 用VB实现GM服务端启动器-同时启动多个EXE进程
nRet = CreateProcess(vbNullString, sCommandLine, 0, 0, False, NORMAL_PRIORITY_CLASS, 0, CurrentDir, sInfo, psInfo) '注意 这个CurrentDir参数 这个参数 如果不写的话，对于大半部分程序是没问题的，但是 对于传奇服务端来说 必须要写，因为服务端会通过。' vbCommandLine = String(length + 1, 0) '调整字符串的大小。获取文件名 = ""
2023-09-12 09:21:46
290
原创 逆向大漠插件/用VB6.0实现后台鼠标移动和后台鼠标左键点击
PostMessage hwnd, WM_LBUTTONDOWN, MK_LBUTTON, (mX And &HFFFF) + (mY And &HFFFF) * &H10000 '模拟鼠标左键点击。PostMessage hwnd, WM_LBUTTONUP, 0, (mX And &HFFFF) + (mY And &HFFFF) * &H10000 '模拟鼠标右键点击。Public Const WM_SETTEXT = &HC& '设置窗体的Caption。VB技术研发群 214016721。
2023-09-05 22:39:00
4493
原创 屏蔽软件，一个技术出生的小企业老板的灵感
虽然 人不多，但是有的时候 人在外面出差，不知道办公室的情况。这个时候为了企业的安全考虑，灵感上就想到了开发出一款能屏蔽软件的工具。软件后端采用的是JAVA服务器。可以屏蔽员工上班摸鱼玩游戏、看B站，炒股软件、逛淘宝等也可以屏蔽员工打开一些求职类的网站。屏蔽软件的开发其实很简单，不过由于360等杀毒软件的出现，让这类系统监控类的软件收到了阻碍，就是误报。软件很迷你在，不到1M，在开发上首选要注意的就是防止软件被员工活青少年结束掉进程。软件陆陆续续的完善，最早做的时候2021年，现在空下来了，又继续完善。
2023-08-23 11:28:46
244
原创 sql2008 开启端口1433，进行远程连接SQL服务器
但是这里我们对于外网的项目，基本不会在客户端上直接用 这种模式去连接SQL的IP和端口，更多的是采用web api接口的模式。这个接口可以用JAVA开发也可以用c#开发。注意本机测试的话，必须要关闭防火墙，如果是腾讯云或阿里云的话，必须开启1433端口。否则无法远程连接到SQL服务器的。
2023-08-22 01:48:48
1514
原创 SQL2008安装到腾讯云win2012-和win10系统
1先安装这个 SQLManagementStudio_x64_CHS.exe 自己网上下载。2再安装这个 SQLEXPRADV_x64_CHS.exe 自己网上下载。安装了以后看下 ，如果没有下面的程序那就得麻烦了。这个数据库软件网上下载的基本用不了，
2023-08-21 13:45:38
335
原创 恢复NuGet包_解决:System.BadImageFormatException:无法加载文件或程序集
在 Microsoft.CodeAnalysis.CSharp.CommandLine.Program.Main(String[] args) Test1。删除 packages文件夹,然后再打开 Visual Studio 会提示 是否恢复 NuGet Packages 包，这个是否恢复即可。C#工程 主要是开发了一个 web api接口，这个工程源码去年还可以的，今年换了一个电脑打开工程就报错。System.BadImageFormatException:无法加载文件或程序集。
2023-08-20 01:24:43
1104
原创 针对千年的反外挂系统
还有比较问题就是，GM接入反外挂系统 涉及到新旧客户端的问题，如果玩家用老客户端启动游戏，这样就导致反外挂系统没法启动。千年是一款比较老游戏，是用Delphi语言写的游戏，属于和传奇一个时代的产品。而面临游戏运营方头疼的外挂主要有两类。这里说到加速挂主要是类似变速齿轮的那种挂和驱动级的游戏守望者电脑整体加速。目前我设计的发外挂系统针对千年游戏中出现的以上两类外挂有很好的作用。还有自动挂机打材料的挂主要是图色按键挂 和 内存脚本挂。一类是 加速挂，另一类是自动挂机打材料的挂。而大部分的挂都是采用易语言开发。
2023-07-14 22:09:56
1543
2
原创 基于云查杀的PC游戏反外挂
外挂是游戏公司的克星。针对于不同的游戏，反外挂的策略也是不同的。比如是一款老游戏需要接入反外挂系统的话，驱动技术就不好了，原因很简单，这个时候的老游戏的汇编代码早已被市场上的外挂作者获取到了，各个功能提取了特征。那这个时候就得用 基于云查杀的方案了。下面是从服务器购买到开发的一些研究成果图。
2023-04-19 11:25:40
269
原创 【服务器部署】JAVA项目从打包到发布到全新的阿里云服务器-前后端全套流程
1、阿里云环境搭建（mysql 安装等，防火墙开启，端口设置等）2、java项目打包成 jar包，投方到阿里云服务器。
2023-04-05 16:38:47
792
原创 封装OutputDebugStringExA函数输出字符串信息-以及DbgView设置
无论是 发布模式 还是 调试模式 都可以用 DbgView工具检测到。
2022-12-15 01:08:13
375
原创 Delphi的系统模块全部采用汇编语言开发-这执行效率在传奇时代估计是叼咋天，难怪能开发出中国最大游戏IP-传奇
function IntToStr(Value: Integer): string;// FmtStr(Result, '%d', [Value]);asm PUSH ESI MOV ESI, ESP SUB ESP, 16 XOR ECX, ECX // base: 0 for signed decimal PUSH EDX // result ptr
2022-12-05 22:52:58
760
原创 Delphi自定义单元模块和调用_全局函数、全局过程、全局变量、全局常量定义
Delphi的基础研究记录 当我们熟悉了一个第一语言后去学习另一种语言，往往但会想到 第一语言的功能。Delphi这门语言基于 VB 和 VC++ 之间的一个语言，非常不错，很快上手了。下面定义个自定义模块。不过我喜欢叫 单元模块。 因为 Delphi 的程序代码是 由N个单元构成，其实这里的单元就是 VB里面的模块差不多。下面的这个单元模块，里面没有对象实现。但是函数和过程，还有全局变量和全局变量初始化和全局常量。这里有一个错误比较特殊，就是 当你写了关键字后，但是没有 写接下来的匹配的代码他就会提示Id
2022-12-05 15:05:05
1306
原创 VS2019_静态编译MDT_问题解决：无法解析的外部符号 _imp_XXXXXXXXX
1>Log.obj : error LNK2019: 无法解析的外部符号 ___acrt_iob_func，该符号在函数 "public: static void __cdecl Log::Init(struct HINSTANCE__ *,char const *,char const *)" (?1>Log.obj : error LNK2019: 无法解析的外部符号 ___stdio_common_vsprintf_s，该符号在函数 __vsprintf_s_l 中被引用。
2022-11-05 14:05:52
1757
原创 GOM登录器技术研究，闪退、掉线的原因分析和解决
最近在GOM技术研究的路上又了一些突破，无需额外的登录器，直接启动GOM客户端。不过在启动这个GOM客户端的时候，遇到层层困难，不过最后都是逐一突破，这个GOM客户端设计的非常精妙，登录器原理上也非常精妙，不按他的模式或结构去做登录器，GOM客户端就无法启动。不是闪退，就是启动了以后 显示断开连接掉线。从技术的角度触发这是一款设计非常精妙的登录器架构，里面有各种压缩和加密算法，结构层次复杂。下面贴下原始Delphi版的代码，不是GOM20151108的版本，本帖图片上用的是GOM20151108的版本。
2022-10-26 11:21:53
4142
2
原创 GOM登录器和配置器研究
目前已经重现构造 客户端启动的命令参数，但是这个客户端被嵌入到了登录器的资源里面，登录器再从内存里面启动这个客户端，客户端大小再3.41 M左右，很小的一个，这也给微端带来了便利性。登录器尾部 附加的数据，大量压缩算法和亦或算法，结构层次复杂。不知道为啥GOM当时要这么设计登录器。
2022-10-23 21:51:53
1163
原创 编写GOM引擎登录器，直接启动GOM客户端DAT文件不掉线
在注册账号、修改密码的功能上目前已经实现，接下来是是做客户端文件的启动，即 Clent.dat这个文件的启动，这个文件很多人被忽视，其实这个文件才是GOM引擎的核心精髓，所谓的引擎也主要是指这个文件，这个文件里面包含了游戏的所有逻辑代码。刚接触传奇的时候是2002年，那时候网吧玩SF，都是手动用IP直接连接，当时的一款 联创传奇 很好玩，有传送戒子，木域戒指，土域戒指，麻痹戒子，护手戒子，法师的圣言术可以直接把2000厚血的教主直接秒掉，星星战甲这个衣服更是拉风，穿上直接是一个双头精钢。
2022-10-11 09:00:47
4109
4
原创 【插件开发】VC6.0要求将EXE改成DLL运行
今天遇到特殊的需求，就是要求将EXE改成DLL运行，一开始遇到这个需求，是要把整个EXE工程改了。其实还有一种比较方法就是将EXE直接嵌入到DLL的资源里面即可
2022-10-09 09:25:25
1254
原创 PC端反外挂系统研发手记1.重现原神驱动功能之防内存修改
具体细节的实现这里不方便透露，我只是把功能结果输出，从2009年入这游戏安全这行到现在10多年了，是时候给过去做一次总结了。对于这套系统的研发,经历了早期XP系统的SSDT HOOK。现在如果用SSDT HOOK 那是会直接蓝屏的。
2022-10-04 01:01:53
2223
原创 PC反外挂项目立项，国庆7天弄出核心功能
对于反外挂项目的形态和技术预研，已经完成。接下来就是开发核心功能，对于细节不方便在本文讨论。研究这个从2009年开始，时候对过去做一个总结了，那就开发一款安全产品。
2022-10-03 10:56:37
1412
原创 C++模仿CE工具快速内存搜索——（Sunday算法）
2、跨进程读取内存：ReadProcessMemory。1、查看内存块信息：VirtualQueryEx。可以看出Cheat Engine内存搜索的核心逻辑是。3、通过“字符串模式匹配算法”进行比较定位。
2022-10-03 10:48:09
2784
原创 逆向必备技术:进程间通信——自定义消息方式实现(SETWINDOWSHOOKEX)
进程的通信，在HOOK类逆向领域是非常的重要，在早器，我使用过 SetWindowText 的模式来进行把傀儡进程里面的数据导出到 我自身的软件上，但是 这个方法很笨，如果数据量多了以后就会出现丢失。后来采用了 本文的自定义消息 和 消息回调函数 可以完美实现 注入到目标进程的DLL 和 我自身的EXE进程进行通信。（自身EXE 是MFC，建立了 自定义消息处理函数，而注入到其他进程的DLL里面有PostMessage消息函数,因为当时数据传递只做了单项 的，只需将DLL里面的数据 传入到EXE即可！）
2022-09-25 15:21:07
447
原创 VB6进程路径支持64位进程的路径和32位的进程路径
用普通的API函数只能获取 32位进程的路径，64位进程的路径就无法获取了。得用采用获取dos路径模式。
2022-08-27 15:56:00
767
原创 VB读写进程句柄-共享内存-内存映射CreateFileMapping
共享内存 其实就是 一个 句柄可以用工具查看进程句柄 中就可以发现，类似 互斥体一样的东西然后共享内存 ，创建的是一个句柄名称 "Global\{FD921876-60EB-4799-A084-872BEDB29151}")不过这个东西在 用工具查看进程句柄的时候 发现 并没有 Global\ 这个字符串名，而是 句柄类型 句柄名称Section \BaseNamedObjects\{FD921876-60EB-4799-A084-872BEDB29151}...
2022-08-26 22:21:49
1231
原创 VB6.0研发五金厂信息管理系统，研发适合小企业小工厂的信息系统
现在这个时代发展很快，但是在研发企业数据系统的时候，并不是那些某友，某碟的专属。因为那些操作复杂比较，功能繁多。功能多了反而成了累赘。那么今天我这边接到的项目是研发一款乡镇五金厂的信息管理系统软件，架构是CS模式，不喜欢搞BS的网页模式。数据库用的是SQL2008,所有的数据 存放到企业本地电脑上，不跑阿里云，不存自身服务器。这样做的好处就是确保企业的数据是安全的。界面比较粗糙，功能简单实用，完全依据本地的一个五金厂需求而定制。销售，生存，库存一目了然。
2022-08-23 22:33:01
750
原创 C++实现仿CE工具-快速内存搜索-内存特征码定位快速实现-代码很精妙
第一步 进行内存属性过滤，第二步 就是拷贝内存到自身进程进行for循环遍历，这样速度不快才怪！搜索内存底层没用API函数，直接是纯汇编了。
2022-07-10 23:33:20
3963
2
原创 真正实现网络下载，文件不落地.解决XmlHttp对象、winnet.dll、URLDownloadToFile生成的ie缓存(Hook_CreateFileW阻止缓存生成)
解决XmlHttp对象、winnet.dll生成的ie缓存
2022-06-22 09:47:00
1413
1
原创 VB6程序实现 自我销毁/自我删除
Private Declare Function GetModuleFileName Lib "kernel32" Alias "GetModuleFileNameA" (ByVal hModule As Long, ByVal lpFileName As String, ByVal nSize As Long) As LongPrivate Declare Sub ExitProcess Lib "kernel32" (ByVal uExitCode As Long)Public Sub Kil...
2022-05-23 23:10:15
969
转载 [原创]通过PsSetCreateProcessNotifyRoutineEx和PsSetCreateThreadNotifyRoutine实现进程与线程监控
PsSetCreateProcessNotifyRoutineEx是Windows提供得一个可以通过设置回调函数实现进程监控的内核API。其在文档的定义如下: 1 2 3 4 5 NTSTATUS PsSetCreateProcessNotifyRoutineEx( INPCREATE_PROCESS_NOTIFY_ROUTINE_EXNotifyRoutine, INBOOLEAN...
2021-12-10 00:26:05
2105
原创 Detours版HOOK 未导出的API函数CreateProcessInternalW
#include <stdio.h>//#include <tchar.h>#include <windows.h>#include "detours.h"#pragma comment(lib,"detours.lib")//以下是HOOK需要的头文件//#include <winsock2.h>//#include <MSWSock.h>//#pragma comment(lib,"ws2_32.lib")//.
2021-11-22 20:05:03
1884
游戏多开器LSP注入模式（摘除互斥体）
2017-05-13
40G郁金香VC++游戏辅助制作视频教程（如何学习OD调试游戏必看|过保护驱动开发视频）
2017-05-17
游戏对象结构化内存分析工具做游戏辅助会用到的工具找偏移量必备
2017-05-14
过360免杀技术视频教程|特征码修改和定位|不用数字签名轻松解决报毒问题
2017-05-17
3.8G小甲鱼和郁金香汇编语言视频教程打包下载|如何学好汇编语言就看它了|百度云下载
2017-05-18
VB.NET视频教程|如何学习VB.NET|VB.NET比VB6.0哪个好
2017-05-17
虚拟桌面一键隐藏桌面（上班隐藏游戏和淘宝京东等网站无视领导！）
2017-05-13
VB6企业迷你版12M稳定全面无毒.rar
2020-07-08
vb加载lua用的模块mdlLua.bas
2018-12-07
xposed -夜神模拟器5.1.1安卓模拟器Xposed框架
2020-02-25
vb6.0写变速齿轮源代码（VB+VC全套代码）.rar
2021-02-23
vb调用lua脚本案例，带mdlLua.bas模块
2018-12-07
《未来简史》 霍洛斯时代.人工智能pdf 66M中文完整
2018-12-29
VB调用ZIP压缩和解压DLL-静态编译稳定不会提示找不到DLL
2022-11-05
VC6实现EXE修改为DLL执行_dll里面嵌入EXE文件DLL被加载就执行这个EXE
2022-10-09
VB读写共享内存和其他进程互通
2022-08-26
VB6.0调用 DLL版ZIP压缩文件夹目录和解压ZIP文件
2022-07-17
VC6.0调用JSONCPP全案例_支持解析中文防乱码【无措版！】
2021-11-17
超强补丁技术_让EXE加载DLL（含VC6写的DLL源码模版）.rar
2021-03-03
[11集]VB和OD反汇编逆向找CALL视频教程（全套：含VB超级模块、工具、源码、B站播放地址）.rar
2021-09-11
VC操作Base64实现加密和解密，完美应对后端接口返回的数据
2021-11-17
VC6.0实现POST和Get,调用后端WEBAPI接口_MFC版.rar
2021-11-17
VB_API免声明（Win32Api.tlb_3432个函数包括参数常量和数据类型结构体）
2021-08-29
VB6.0写的反调试代码，防止被OD等软件调试，结合VMP加壳会很棒
2021-02-23
VB6.0写的基址更新器(特征码搜索)支持一键更新偏移和基址
2021-02-23
vb检测内核模块PCHunter驱动和XueTr驱动
2021-02-23
VB进程网络封包监测器.rar
2021-02-23
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人