- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 动态改变表名称、表结构 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=128335)
-- 发布时间：2018/12/4 11:06:00
-- 动态改变表名称、表结构
老师，如果用代码改变表的名称、表的结构？ 我查找帮助，查了一上午都没有找到如何操作。谢谢了
-- 发布时间：2018/12/4 11:15:00
--
终于找到了，不用麻烦老师了。谢谢！
-- 发布时间：2018/12/4 11:17:00
--
http://www.foxtable.com/webhelp/scr/2122.htm
-- 发布时间：2018/12/4 14:02:00
--
老师，以表A为例。我想删除表A的现有列，然后增加列并设定列名称。下列代码有错误。
Dim Builder As New ADOXBuilder
dim i as integer
Builder.Open() \'打开ADOXBuilder
With Builder.Tables("表A")
\' For i =0 To Tables("表A") .Cols.Count
.DeleteColumn(i)
\' Next
\' For i As Integer=1 To 10
\' .AddColumn(i,ADOXType.String, 250) \'增加字符型列,长度指定为250
\'Next
End With
Builder.Close() \'关闭ADOXBuilder
错在哪里？
谢谢了
-- 发布时间：2018/12/4 14:48:00
--
Dim Builder As New ADOXBuilder
Builder.Open() \'打开ADOXBuilder
With Builder.Tables("表A")
For Each c As Col In Tables("表A").Cols
If c.DataCol.Expression = "" Then
.DeleteColumn(c.name)
End If
Next
For i As Integer=1 To 10
.AddColumn("列" & i,ADOXType.String, 250) \'增加字符型列,长度指定为250
Next
End With
Builder.Close() \'关闭ADOXBuilder
DataTables.Unload("表A")
DataTables.load("表A")
-- 发布时间：2018/12/4 17:19:00
--
老师，狐表的调试没有逐语句吗？出现错误不知道出在哪里，调试起来太累了。有什么好办法吗？
-- 发布时间：2018/12/4 17:25:00
--
如何将Excel文件导入到表A
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:book1.zip |
谢谢老师！
-- 发布时间：2018/12/4 18:02:00
--
1、不是可以导入后处理？
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=128291&skin=0
2、导入代码，参考
http://www.foxtable.com/webhelp/scr/0685.htm
http://www.foxtable.com/webhelp/scr/2334.htm
-- 发布时间：2018/12/4 18:07:00
--
老师，这个问题已经折腾我一天多时间了，还是没有搞好。您帮我导入下。合并单元格的问题我自己解决。关键是导入。
谢谢！
-- 发布时间：2018/12/4 18:12:00
--
照抄代码即可的。
http://www.foxtable.com/webhelp/scr/0685.htm
http://www.foxtable.com/webhelp/scr/2334.htm