以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助] 查询表改成数据表  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=141534)

--  作者:sanny
--  发布时间:2019/10/2 21:46:00
--  [求助] 查询表改成数据表

老师, 以下代码执行后产生的是查询表,不可变变更,如何让它改成数据表,可以在其中进行修改。谢谢。

 

Dim q As new QueryBuilder
q.TableName =
"销量统计"
q.Se/lectString =
"Se/lect 产品,Sum(数量) As 数量 From {订单} Group By 产品"
q.Build

MainTable
= Tables("销量统计"
)


--  作者:狐狸爸爸
--  发布时间:2019/10/4 9:01:00
--  
Dim q As new QueryBuilder
q.TableName = "销量统计"
q.Selec tString = "Sele ct 产品,Sum(数量) As 数量 From {订单} Group By 产品"
q.Build()
MainTable = Tables("销量统计")
Tables("销量统计").AllowEdit = True

--  作者:sanny
--  发布时间:2019/10/4 10:31:00
--  
这个只能修改记录,如何可以复制这表并可增加列?
--  作者:狐狸爸爸
--  发布时间:2019/10/4 10:33:00
--  
没办法
--  作者:狐狸爸爸
--  发布时间:2019/10/4 10:33:00
--  
要不你导出,再导入吧