| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 求助：如何设置某用户名只能在特定的几个Ip地址下登录 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=46771) |
| -- 作者：34772849 -- 发布时间：2014/2/27 14:44:00 -- 求助：如何设置某用户名只能在特定的几个Ip地址下登录 有个表格叫ip，格式如下：
用户名 ip 某某车站 10.99.137.9 10.99.137.93
每个用户名对应的ip不止一个，应如何设置代码，在登录的时候除了需要输入密码，还要判断本机ip，是表里的ip才能登录，不是则跳出窗口提示无权登录。
|
| -- 作者：狐狸爸爸 -- 发布时间：2014/2/27 14:51:00 -- 在AfterOpenProject事件中，获取本机ip，和数据库中的ip比较，不符合就退出系统 |
| -- 作者：Bin -- 发布时间：2014/2/27 14:52:00 -- 首先你表结构应该更改为 用户名 IP 张三 192.168.1.1 张三 192.168.1.2 假如你获取的本地IP变量为 bdip dim dr as datarow = datatables("IP").Find("用户名=\'" & user.name & "\' and ip =\'" & bdip & "\'") if dr is nothing then 没找到,不允许登录 else 找到,允许登录 end if
|