LaoDan 的博客

VB.NET 使用API调用默认浏览器打开网页

头部API写：Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Int32, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Int32) As Long 响应过程写：Dim lngReturn As Long lngReturn = ShellExecute(0, "open", "https://lxjc.com", "", "", 0)

VB.NET · 2023-05-27 · 1005 人浏览

VB.NET 与 PHP互通进行的AES网络验证

本来很早就想搞个这玩意了，就是校验软件是否可用性，当然也可以进行请求数据的加密！软件远程请求PHP文件，PHP进行AES的加密。加密内带入时间戳。软件接收到了PHP的加密值，然后在软件内进行解密。解密之后校验时间戳，判断当前的时间戳是否在返回的时间戳六十秒之内（提高安全性）。判断无误的话，则提取解密数据的|之前的字符，进行校验。校验成功，进软件。校验失败，弹出服务器返回的失败内容。软件生成之后记得使用VMP加壳软件加壳，不然被破解还是轻轻松松，加上壳之后破解难度就飙升了。代码如下：PHP代码：<?php function EncryptAES($key, $data) { $ivLength = 16; $iv = openssl_random_pseudo_bytes($ivLength); $encryptedText = openssl_encrypt($data, 'AES-128-CBC', $key, OPENSSL_RAW_DATA, $iv); $combinedData = $iv . $encryptedText; $e

VB.NET · 2023-05-27 · 1305 人浏览

123直链下载协议分析流程

首先，打开一个带密码的文件，然后输入密码。得到了一处请求：请求1GET请求地址：https://www.123pan.com/b/api/share/get?limit=100&next=1&orderBy=share_id&orderDirection=desc&shareKey=AHC0Vv-5HIc&SharePwd=&ParentFileId=0&Page=1其中shareKey为分享地址中的参数，SharePwd参数如果分享地址中有密码的话，填写，没有的话置为空即可。得到数据：{"code":0,"message":"ok","data":{"Next":"-1","Len":1,"IsFirst":true,"Expired":false,"InfoList":[{"FileId":2192571,"FileName":"AsteriskPassword.exe","Type":0,"Size":616448,"ContentType":"0","S3KeyFlag":"1655422-0","CreateAt":"2023-05-21T22:50:43+08:00","U

协议分析 · 2023-05-27 · 1989 人浏览

使用宝塔面板的Docker安装ChatGPT-pandora项目

本机以腾讯云轻量云服务器为例。首先在轻量云服务器后台的防火墙放行端口3002。然后登陆宝塔，点击Docker，提示没有安装的话，请安装Docker。然后再点击Compose模板，写入：version: '3' services: app: image: pengzhile/pandora # 总是使用 latest ,更新时重新 pull 该 tag 镜像即可 ports: - 3002:3002 environment: # 二选一 PANDORA_SERVER: 0.0.0.0:3002 PANDORA_ACCESS_TOKEN: eyxxxx 注意：PANDORA_ACCESS_TOKEN参数，请通过https://chat.openai.com/api/auth/session获取。这个请提前登陆openai的网站。然后点击Compose，再点击添加项目。选择Compose模板(自动选择)，随便输入一个名称。点击添加即可下载。图片小的话，请右键图片，新标签页打开安装完，在容器内，即可看到，容器在

原创软件 · 2023-05-26 · 4909 人浏览

VB.NET 字符串转Unicode十进制编码源码

运行图源码Sub Main(args As String()) 跳过: Console.Clear() Dim inputString As String Console.WriteLine("请输入字符串：") inputString = Console.ReadLine() Dim unicodeArray(inputString.Length - 1) As Integer For i As Integer = 0 To inputString.Length - 1 unicodeArray(i) = Char.ConvertToUtf32(inputString, i) Next Console.Write("输出的十进制Unicode编码为：" & Environment.NewLine) For Each code As Integer In unicodeArray Console.Write("&#" & code.To

VB.NET · 2023-05-26 · 1060 人浏览

吾爱破解论坛原创技术贴汇总

微信网页版登陆协议详细分析，并检测好友。https://www.52pojie.cn/thread-836149-1-1.html(出处: 吾爱破解论坛)123盘直链下载协议分析流程及源码https://www.52pojie.cn/thread-1790395-1-1.html(出处: 吾爱破解论坛)https://www.52pojie.cn/thread-1790395-1-1.html某大学继续教育平台刷课分析https://www.52pojie.cn/thread-1083820-1-1.html(出处: 吾爱破解论坛)DZ论坛登陆协议分析及源码分享https://www.52pojie.cn/thread-1049325-1-1.html(出处: 吾爱破解论坛)极其危险的QQ快速安全登陆协议分析https://www.52pojie.cn/thread-835096-1-1.html(出处: 吾爱破解论坛)百分百可查任意QQ坦白说分析以及操作方式[失效]https://www.52pojie.cn/thread-851477-1-1.html(出处: 吾爱破解论坛)某素材

原创软件 · 2023-05-23 · 1671 人浏览

通过代码注入实现的VX撤回提醒代码

说明适用于PCWX 3.9.2.23，前段时间研究的，一直没有发。一个半成品，不想继续研究下去了。发出来，有学习的可以借鉴借鉴。环境VS2015 VB.NET 环境下开发。下载具体分析过程在吾爱破解：https://www.52pojie.cn/thread-1776768-1-1.htmlVX撤回提示VB.NET代码.rar

协议分析 · 2023-05-20 · 1105 人浏览

极速跟打器练习打字速度

同类软件有好多，什么所谓的金山打字通入门还行。但是真的要练习打字的话。我推荐当前的这个极速跟打器。其实在15年的时候，我们平时都用添雨跟打器，界面更好看。使用.NET开发。不过现在我在跟打群内下载添雨跟打器无法下载了。现在的话就用这个极速吧，生态更好。他也有在线跟打的网站。也有相关的工作配套。也不需要付费，一切只提供打字速度，打字比赛。在线网站：http://www.jsxiaoshi.com/跟打工具下载：https://www.jsxiaoshi.com/js.7z使用方式：1、通过网站获取每日赛文，群内比赛。统计成绩，也可以通过网站的赛文进行跟打。2、通过软件获取群内最新的赛文段落，进行跟打，自动发送成绩，具体使用方法，请见软件的使用说明。

转载软件 · 2023-05-20 · 1416 人浏览

二七加速器 3.9破解开放所有线路

新鲜热乎，刚出炉，今天太闲了。无所事事。整了整二七加速器，3.9版本，破解所有的线路。至于修改方法，还是老样子，有需要研究的请看帖子：https://www.52pojie.cn/thread-1341874-1-1.html软件加了UPX的压缩壳，用工具脱掉就好了。软件的三天试用的限制未解除，我还没有遇到。遇到了之后我尝试解除掉。他的这个参数应该是校验的电脑名，还有另外一个参数组成的MD5进行的校验。也可以手动修改计算机名绕过三天的试用。记得修改了计算机名要重启。下载地址先在官网下载二七加速器，安装好之后，进入目录，将下载的EXE替换目录的文件即可。https://www.123pan.com/s/AHC0Vv-8hIc.html

原创软件 · 2023-05-18 · 3254 人浏览

LaoDan 2023-05-18

Typecho 的这个反垃圾插件用着不错

测试挺稳，个人使用是免费的。

本站已启用。