以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助] 用户管理  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=28642)

--  作者:wsxdwh
--  发布时间:2013/2/6 14:04:00
--  [求助] 用户管理

If User.name = "我要注册"  Then
    For Each ob As object In QAT.Items
        If ob = "daohanglan"  Then
            ob.Enabled = False
        End If
    Next
Else 

    Forms("导航栏").Open()
    MainTable = Tables("aaa")
End If

 

这句代码输入正常,执行报错。如何修改?请指教!!!

 

图片点击可在新窗口打开查看

--  作者:wsxdwh
--  发布时间:2013/2/6 14:05:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:_11akhv}j64hq%rwud(janx.jpg
图片点击可在新窗口打开查看

--  作者:wsxdwh
--  发布时间:2013/2/6 14:08:00
--  

  请教林老师:

上次提到的用户管理如何实现网络同步,即管理员修改或添加用户后,被修改或添加的用户能直接登录。

谢谢做一个例子,行吗?!!!


--  作者:lin_hailun
--  发布时间:2013/2/6 14:21:00
--  
 上传说过了,如果要实现通过代码添加用户的话,就需要自己弄一个用户管理,而不能使用系统自带的用户管理。

 看例子。http://www.foxtable.com/help/topics/2048.htm
--  作者:wsxdwh
--  发布时间:2013/2/6 14:39:00
--  
看过了 ,不太实用。我希望的是类似邮箱注册类的方案。先帮我解决一楼的问题吧!
--  作者:wsxdwh
--  发布时间:2013/2/6 15:04:00
--  
谢谢林老师帮我看看一楼的问题,如何解决?!!!
--  作者:wsxdwh
--  发布时间:2013/2/6 15:18:00
--  
下班了???!!!!!!
--  作者:lin_hailun
--  发布时间:2013/2/6 15:41:00
--  

If User.name = "我要注册"  Then
    For Each ob As object In QAT.Items
        If ob.Name = "daohanglan"  Then
            ob.Enabled = False
        End If
    Next
Else 

    Forms("导航栏").Open()
    MainTable = Tables("aaa")
End If

 
==========

或者 ob.Text

--  作者:lin_hailun
--  发布时间:2013/2/6 15:44:00
--  
 如果你要做远程注册,你至少安装一个sql数据库,然后在狐表设置数据源。注册的信息写入数据库,就可以了。