求助 软件限制ip使用 如何写

tangible酱

我想在软件加一个限制首次登录的ip使用，只验证ip，不是首次ip登录的一律不允许
如何能最简单安全的做到，我自己有服务器，大哥们有没有例子或者思路？

壮志豪情

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
当前IP	文本型
首次的IP	文本型

当前IP ＝ 网页_取wai网IP (, )
首次的IP ＝ 读配置项 (取特定目录 (1) ＋ “/首次使用的IP.ini”, “首次IP”, “IP”, “”)
如果真 (首次的IP ＝ “”)  ' 如果IP=不存在说明是首次使用
首次的IP ＝ 当前IP
写配置项 (取特定目录 (1) ＋ “/首次使用的IP.ini”, “首次IP”, “IP”, 当前IP)

如果真 (首次的IP ≠ 当前IP)
提示框 (“不是首次使用软件的IP,程序将自动关闭”, , , , )
结束 ()

提示框 (“恭喜IP校验通过,您可以使用软件了”, , , , )

i支持库列表	支持库注释
shell	操作系统界面功能支持库

.版本 2<br /> .支持库 shell<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 当前IP, 文本型<br /> .局部变量 首次的IP, 文本型<br /> <br /> 当前IP ＝ 网页_取wai网IP (, )<br /> <br /> 首次的IP ＝ 读配置项 (取特定目录 (1) ＋ “/首次使用的IP.ini”, “首次IP”, “IP”, “”)<br /> .如果真 (首次的IP ＝ “”)  ' 如果IP=不存在说明是首次使用<br />     首次的IP ＝ 当前IP<br />     写配置项 (取特定目录 (1) ＋ “/首次使用的IP.ini”, “首次IP”, “IP”, 当前IP)<br /> .如果真结束<br /> <br /> .如果真 (首次的IP ≠ 当前IP)<br />     提示框 (“不是首次使用软件的IP,程序将自动关闭”, , , , )<br />     结束 ()<br /> .如果真结束<br /> <br /> <br /> 提示框 (“恭喜IP校验通过,您可以使用软件了”, , , , )

emodiyu

这样行不通的，动态IP用户的IP会经常更换（并不是人为，具体原理我也不懂），反正不是固定的

逆向正解

电脑重启ip就会改变

难寻。

打开软件 连接服务器 上传机器码+IP  服务器搜索机器码是否存在 ，存在就对比IP 不存在就是第一次登录，就创建机器码保存IP  

简单不....

tangible酱

emodiyu 发表于 2024-12-16 22:26
这样行不通的，动态IP用户的IP会经常更换（并不是人为，具体原理我也不懂），反正不是固定的 ...

一般家庭用的 ip只会变后面2位吧！

tangible酱

逆向正解 发表于 2024-12-16 22:28
电脑重启ip就会改变

一般家庭用的 ip只会变后面2位吧！

tangible酱

难寻。 发表于 2024-12-16 22:30
打开软件 连接服务器 上传机器码+IP  服务器搜索机器码是否存在 ，存在就对比IP 不存在就是第一次登录，就 ...

确实....挺简单 没写过链接服务器这一块源码

emodiyu

tangible酱 发表于 2024-12-16 22:31
一般家庭用的 ip只会变后面2位吧！

是整个IP段都改变了，我的就是这样，重启路由啊，或者隔三岔五的就变了，每个都不一样

难寻。

tangible酱 发表于 2024-12-16 22:32
确实....挺简单 没写过链接服务器这一块源码

易语言史上最完美远控框架 - 功能可无限扩展 - 远程服务支持库例程
https://bbs.125.la/forum.php?mod=viewthread&tid=14008419
(出处: 精易论坛)
用这个改
或者易语言自带支持库的远程服务