目的：给职务列输入内容

代码1：

Dim dt As DataTable = DataTables(“基本类型”)

Dim dmpzw As New TableDataMap

dmpzw.DataTable = “基本类型”   \'指定数据来源表

dmpzw.ValueCol = "_Identify" \'指定取值列

dmpzw.DisplayCol = "名称" \'指定显示列

\'指定下拉列表时显示哪些列的数据

dmpzw.ListCols = "编码,名称"

dmpzw.Filter = "[基本类型] = \'职务类别\'"

Tables("用户").Cols("职务").DataMap = dmpzw.CreateDataMap() \'生成并设置DataMap

代码发不上去，

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:求教代码.txt

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:求教代码.txt

dmpzw.DataTable = dt2.  Name   \'指定数据来源表

这条代码该怎么写？

 不行，必须先生成表格，才能设置 DataMap

 生成表 http://www.foxtable.com/help/topics/0695.htm

谢谢老师，我得改变思路，直接用表得了