以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]通过自定义登录窗口筛选与单位相关数据  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=10960)

--  作者:倪惠明
--  发布时间:2011/7/1 16:06:00
--  [求助]通过自定义登录窗口筛选与单位相关数据

通过自定义窗口,根据登录单位的代码,使系统只显示本单位数据,我在登录确定按钮的代码为:

Dim UserName As String = e.Form.Controls("UserName").Value
Dim cmd As New SQLCommand
Dim dt As DataTable
Dim dr As DataRow
cmd.C
If UserName = ""  Then
    Messagebox.show("请选择用户!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    Return
End If
cmd.CommandText = "Select * From {Users} Where [Name] = \'" & UserName & "\'"
dt = cmd.ExecuteReader
dr = dt.DataRows(0)
If e.Form.Controls("PassWord").Value = dr("Password") Then
    _UserName = UserName
    _UserGroup = dr("Group")
    _Userdwdm = dr("dwdm")
    Dim tj As String = "dwdm=\'" & _Userdwdm &"\'"
    If _Userdwdm <> "10001"
        DataTables("jgxxb").loadfilter=tj
        DataTables("ryxxb").loadfilter=tj
        DataTables("llyjb").loadfilter=tj
        DataTables("kyxmb").loadfilter=tj
        DataTables("sjqkb").loadfilter=tj
       \' DataTables("dwdmb").loadfilter=tj
        DataTables("ryzktjb").loadfilter=tj

        DataTables("jgxxb").load
        DataTables("ryxxb").load
        DataTables("llyjb").load
        DataTables("kyxmb").load
        DataTables("sjqkb").load
       \' DataTables("dwdmb").load
        DataTables("ryzktjb").load

    End If
    e.Form.Close
Else
    Messagebox.show("密码错误!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If

 

运行出现下面错误提示,但运行结果却是正确的,这是什么原因,请帮忙!

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


--  作者:狐狸爸爸
--  发布时间:2011/7/1 16:16:00
--  
看不到图,你要上传图片才行。
--  作者:倪惠明
--  发布时间:2011/7/1 16:34:00
--  如何在主窗口中隐藏表B和表C
已经上传了,现在能看见吗?
--  作者:狐狸爸爸
--  发布时间:2011/7/1 16:35:00
--  
看不到
--  作者:倪惠明
--  发布时间:2011/7/1 16:39:00
--  如何在主窗口中隐藏表B和表C

图片点击可在新窗口打开查看此主题相关图片如下:错误提示.png
图片点击可在新窗口打开查看

--  作者:倪惠明
--  发布时间:2011/7/1 16:44:00
--  如何在主窗口中隐藏表B和表C
现在能看见了吧。
--  作者:狐狸爸爸
--  发布时间:2011/7/1 16:49:00
--  

http://help.foxtable.com/topics/0106.htm

 

 


--  作者:倪惠明
--  发布时间:2011/7/1 16:57:00
--  如何在主窗口中隐藏表B和表C
是因为关联的存在才出现上述问题吗?
--  作者:倪惠明
--  发布时间:2011/7/1 17:03:00
--  
除了取消关联还有没有其他办法?请指导!
--  作者:狐狸爸爸
--  发布时间:2011/7/1 17:11:00
--  
应该是表达式引起的