Foxtable(狐表)用户栏目专家坐堂 → 老大!急!帮看看关联表问题


  共有20450人关注过本帖树形打印复制链接

主题:老大!急!帮看看关联表问题

帅哥哟,离线,有人找我吗?
狐狸爸爸
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47479 积分:251266 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/4/23 20:19:00 [显示全部帖子]

你把门锁了,我怎么看啊?

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

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47479 积分:251266 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/4/24 9:01:00 [显示全部帖子]

还是打不开,数据源不行。


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47479 积分:251266 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/4/24 9:03:00 [显示全部帖子]

你可以将你的数据源导出为access文件,然后链接到这个Access文件。

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47479 积分:251266 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/4/24 10:39:00 [显示全部帖子]

你自己看看登陆窗口的按钮代码吧:

if Vars("用户")<>"gdlgh" then
    For Each tb As Table In Tables
        tb.Visible = true 'false
    Next
    QAT.Visible = False
    ConfigBar.Visible = False
end if
Dim cmd As New SQLCommand
cmd.C
Dim dt As DataTable
cmd.CommandText = "select 名称 From [权限]"
dt = cmd.ExecuteReader()
Dim cbox As WinForm.ComboBox = e.Form.Controls("ComboBox1")
For Each dr As Datarow In dt.Datarows
    cbox.Items.Add(dr("名称"))
Next

[此贴子已经被作者于2009-4-24 10:39:29编辑过]

 回到顶部