urenai 发表于 2025-10-17 12:25:22

非开源 另类实现 ServiceDLL ，欢迎测试。

本帖最后由 urenai 于 2025-10-24 11:56 编辑

DLL 只有2个导出函数：
第一个是安装服务。
第二个是构建服务名称。








<火山程序 类型 = "通常" 版本 = 1 />

方法 Init <公开 静态>
{
    变量 pd <类型 = 变整数>
    变量 pa1 <类型 = 变整数>
    变量 pa2 <类型 = 变整数>
    变量 ps <类型 = 变整数>
    @ @<pd> = (INT_P)LoadLibraryW(L"ServiceDLL.dll");
    @ @<pa1> = (INT_P)GetProcAddress((HMODULE)@<pd>,(LPCSTR)1);
    @ @<pa2> = (INT_P)GetProcAddress((HMODULE)@<pd>,(LPCSTR)2);

    ps = 分配内存 (1024)
    内存清零 (ps, 1024)

    调用静态方法 (pa2, 整数, 取文本指针 ("ServiceDLL_Test"), ps)// 构建服务名
    调用静态方法 (pa1, 逻辑型, -950618, ps)// 安装服务

    全局信息框 ("点击确定，服务自动释放。")
}


不是源码，测试用32 64 位 DLL。



白雪皑皑0306 发表于 2025-10-17 14:49:13

你的意思是,服务直接用DLL来运行的? 不需编译成EXE?

2oon 发表于 2025-10-17 19:49:26

楼主加油

白雪皑皑0306 发表于 2025-10-18 09:11:11

urenai 发表于 2025-10-17 18:23
众所周不知，Windows 服务好像是分为r0 r3级别。
火山搞的是r3级别的exe模板。
我发帖建议好多次，希望官 ...

求开源下啊

白雪皑皑0306 发表于 2025-10-18 17:05:01

server 发表于 2025-10-18 12:17


SB是吧

易涛涛 发表于 2025-10-19 03:01:43


楼主加油

正版商业用户 发表于 2025-10-19 08:55:36

urenai 发表于 2025-10-19 03:06
兄弟你骂我干嘛

他骂的是那个骂你的人！兄弟别介意，人上一百形形色色，林子大了什么鸟都有！白嫖还叽叽歪歪的人哪里都有，平常心看待就好
页: [1]
查看完整版本: 非开源 另类实现 ServiceDLL ，欢迎测试。