以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  web开发时如何共用FOXTABLE外部账户密码登录  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=125742)

--  作者:zhenghangbo
--  发布时间:2018/10/5 17:17:00
--  web开发时如何共用FOXTABLE外部账户密码登录


 外部数据源与用户管理

在默认情况下,Foxtable的用户名、用户密码、用户分组、用户角色等数据保存在项目文件中。
在多用户环境下,增加、删除、更改用户后,需要更新各终端的项目文件,这对于大型的应用系统,特别是远程应用的时候,是一件很麻烦的事情。

不过从Foxtable 2013开始,用户可以很方便地使用外部数据表存储用户信息,要做的只是单击几次鼠标。

步骤

1、首先要在外部数据库中新建一个数据表,用于保存用户信息,这个表必须包括三列,分别是:

列名     数据类型     说明

Name     字符型       必须将此设为主键

Type     整数型

Config   备注 



[此贴子已经被作者于2018/10/5 17:17:51编辑过]

--  作者:zhenghangbo
--  发布时间:2018/10/5 17:20:00
--  

在WEB登录的时候,如何提取Config中的密码来与网页输入的密码进行比较?(账户提取简单)

 

这里只输出了config中的用户分组


--  作者:zhenghangbo
--  发布时间:2018/10/5 17:26:00
--  
不知道怎么回事,限制在这里输入代码发表了
--  作者:有点甜
--  发布时间:2018/10/5 17:51:00
--  

参考

 

Dim dr As DataRow
dr = DataTables("users表").Find("Name = \'" & UserName & "\'") 
If dr IsNot Nothing AndAlso dr("config").contains(MD5Encrypt(password)) Then
    Verified  = True
End If


--  作者:zhenghangbo
--  发布时间:2018/10/5 18:33:00
--  
项目如果不加载users表的情况下不可以这样写吧?
要用这样写吧
Dim cmd As New SQLCommand



--  作者:zhenghangbo
--  发布时间:2018/10/5 18:34:00
--  
cm.C


--  作者:zhenghangbo
--  发布时间:2018/10/5 19:24:00
--  
谢谢,搞定了。哈哈