Dim q As new QueryBuilder
q.C
q.TableName = "品牌档案查询表"
q.SelectString = "Select * From {品牌档案}"
q.Build
Dim dmp As New TableDataMap
dmp.DataTable = "品牌档案查询表"
dmp.ValueCol = "品牌名称"
dmp.DisplayCol = "品牌名称"
dmp.ListCols = "序号,品牌名称"
dmp.Sort = "序号"
Tables(Vars("表名")).Cols(Args(0)).DataMap = dmp.CreateDataMap()
这一种方法没有问题
下面的方法 不报错,但是不可以用,有啥办法解决下呢:
Dim dtName As String = "品牌档案"
Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "SELECT 序号,品牌名称 From {" & dtName & "}"
dt = cmd.ExecuteReader()
Dim dmp As New TableDataMap
dmp.DataTable = dtName
dmp.ValueCol = "品牌名称"
dmp.DisplayCol = "品牌名称"
dmp.ListCols = "序号,品牌名称"
dmp.Sort = "序号"
Tables(Vars("表名")).Cols(Args(0)).DataMap = dmp.CreateDataMap()