- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 怪，代码没有错呀，怎么又跳出一个出错的界面 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=8135)
-- 发布时间：2010/9/8 18:05:00
-- 怪，代码没有错呀，怎么又跳出一个出错的界面
AfterOpenProject：
Dim shensi As new SQLCommand
Dim yxb As new SQLCommand
Dim shensidata As datatable
Dim yxbdata As datatable
With shensi
.C
.CommandText = "select DISTINCT 省市 from {行政区域}"
shensidata = .ExecuteReader
End With
With yxb
.C
.CommandText = "select distinct 营销部 from {营销部} "
yxbdata = .ExecuteReader
End With
Tables("营销部").Cols("市场片区_省市").ComboList = shensidata.GetComboListString("省市")
Tables("客户档案").Cols("所属_省市").ComboList = shensidata.GetComboListString("省市")
Tables("客户档案").Cols("所属_营销部").ComboList = yxbdata.GetComboListString("营销部")
此主题相关图片如下：aq.jpg
-- 发布时间：2010/9/8 18:10:00
--
做个例子上来看看
-- 发布时间：2010/9/8 18:21:00
--
已经上传，含sql备份文件
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:含sql备份.rar |
-- 发布时间：2010/9/8 18:42:00
--
你那个备份怎么用了啊，我还原不了。
-- 发布时间：2010/9/8 18:47:00
--
我是按照昨天论坛的 狐友 的操作步骤进行备份的，在另一电脑还原怎么弄 我也不知道啊
-- 发布时间：2010/9/8 18:48:00
--
-- 发布时间：2010/9/8 18:51:00
--
不用看了，你的Afteropenproject中的代码：
With yxb
.Connection Name= "营销部"
.CommandText = "select distinct 营销部 from {营销部} "
yxbdata = .ExecuteReader
End With
你有名为营销部的外部数据源吗？我只看到你有两个数据源，一个行政区域，一个销售系统。
-- 发布时间：2010/9/8 19:07:00
--
，流汗中
-- 发布时间：2010/9/9 11:21:00
--
我是按照昨天论坛的 狐友 的操作步骤进行备份的，在另一电脑还原怎么弄 我也不知道啊
1、右键"数据库" 左键"数据库"
此主题相关图片如下：1.jpg
2、输入新的数据库名 → 选择“原设备”→点击"…"按钮
此主题相关图片如下：2.jpg
3、点击“添加” 找到你的备份文件。 这里不截图的。注意你的备份没有.bak扩展名，所以找文件的时候文件类型要选"所有文件"
此主题相关图片如下：3.jpg
-- 发布时间：2010/9/9 11:25:00
--
还有3张图 不知道怎么传不上来了