-- 作者:wealthwind
-- 发布时间:2014/5/3 9:37:00
-- 关于外部数据源MSSQL无法连接的求救~~
我的项目中默认,不加载任何数据,只加载表结构;
其中项目
BeforeLoadOuterTable
的代码是:
For Each s As String In "人员|产品vlookup|文具领用|文具明细|行政区域|文件管理|企业信息|经销商信息|专卖店目标|专卖店签约|专卖店人员|目标|专卖店零售额|专卖店人员目标|订单|个案申请".Split("|") If e.DataTableName = s Then e.SelectString = "Select * From {" & s & "} Where [_Identify] Is Null" End If Next
AfterOpenProject
的代码是
Forms("登陆画面").Open() MainTable = Tables("登陆表")
Tables("经销商信息").Cols("省").Combolist = DataTables("行政区域").GetComboListString("省") Tables("经销商信息").Cols("县市").DropForm = "目录树" \'客户表的县市列也采用我们设计的下拉窗口输入数据.
Tables("专卖店零售额").Cols("产品名称").DropForm = "产品目录树"
If User.Type <> UserTypeEnum.Developer TableCaptionVisible = False End If
Tables("文具领用").Cols("姓名").DropForm = "文具目录树" Tables("文具领用").Cols("物品名称").DropForm = "明细目录树"
basemainform.ControlBox=False
请老师给予指点,是不是我的设置出现了问题~~~ 此主题相关图片如下:360截图20140503081003142.jpg
此主题相关图片如下:360截图20140503081023124.jpg
此主题相关图片如下:360截图20140503093312653.jpg
|