Question

易语言 怎么让自己的程序一个帐号只能同时一台机器在线？

写了个小程序....想让他有帐号密码功能..[无需注册，帐号密码我直接给别人]....
问题是。别人有几台电脑.我想让一个帐号同一时间只能在一个电脑登录，，，，【本来想一个小网站程序的注册功能来做的，但是对网站那些不怎么熟悉..加上空间不好的话就无法验证了.......请教大家网络验证的方法
[本地验证无需考虑]
我要的功能是不想让一个帐号同时登录2台电脑 [帐号我直接发给别人，无需注册...一个帐号我让他绑定多台电脑]

Answer 1

可以给你个思路：
在数据库中加入一个记录登录信息的字段
客户登陆后每隔一段时间写一次数据库，写入当前时间，这样登录的时候可以验证相同客户登录是否超过了间隔时间，如果没有超过就不能登录。

追问

感谢你的热心 能提供下先关例程吗？

Answer 2

办法都是人想出来的，就看你是否充分利用
我到是有个办法，就是有些麻烦

1、在启动窗口上放服务器和客户组件，服务器端口=0
2、运行时，客户连接服务器（可以用域名），连接的端口1
3、如果连接成功，说明已经有人登陆。如果连接失败，就更新域名的IP地址为本机外网IP。
这样，当你登录别人的时候，别人也就不能登陆了。

望您采纳！

追问

感谢你的热心 试着做了 但是做不出来。。能提供下先关例程吗？

追答

大概的源码如下：

.版本 2
.子程序 __启动窗口_创建完毕
.局部变量 域名, 文本型
服务器1.端口 ＝ 11
.判断开始 (客户1.连接 (域名, 33) ＝ 真)
信息框 (“帐号已在别处登陆！”, 0, )
.默认
服务器1.端口 ＝ 33
更新域名（域名，取本机外网IP（））' 易语言支持库中没有这个子程序
.判断结束

程序运行后，服务器端口为11，客户连接 域名指向IP 端口为11

如连接成功,提示已登录

如连接失败，改服务器端口为33，并更新域名指向为本机IP

这样你登陆后，别人在运行时，也就会提示已登录

Answer 3

以前写过的聊天软件我是这样做的：用数组来记录登入的帐号名，其中包括客户句柄，用来判断断开的时候清楚登入记录账户，当一个帐号要登入的时候检测数组之内是不是有这个帐号，有就发送重复登入命令并断开客户端！很简单的

Answer 4

- -