以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  数据库字段名批量修改  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=139955)

--  作者:weibu
--  发布时间:2019/8/26 15:11:00
--  数据库字段名批量修改
SQLserver  如何批量修改字段名称,如:例子:A表1字段改为a,2字段改为b;B表3字段改为c,4字段改为d
--  作者:有点蓝
--  发布时间:2019/8/26 15:54:00
--  
1、参考:http://www.foxtable.com/webhelp/topics/2122.htm
--  作者:weibu
--  发布时间:2019/8/26 20:16:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20190826201513.png
图片点击可在新窗口打开查看


Dim Builder As New ADOXBuilder
Builder.Open()
With Builder.Tables("rs_canti")
    .RenameColumn("proname","姓名")
End With
Builder.Close()

为什么报错

--  作者:有点蓝
--  发布时间:2019/8/26 20:42:00
--  
因为不认真看帮助

使用外部数据源

前面的代码都是针对内部数据源的,如果要为外部数据源动态创建表和列,只需在定义ADOXBuilder的时候,指定数据源名称即可:

Dim Builder As New ADOXBuilder("数据源名称")

例如在名为nwnd的外部数据源中创建一个订单表:

Dim Builder As New ADOXBuilder("nwnd"\'要指定数据源名称
Dim
 tbl As ADOXTable
Builder.Open() 
tbl = Builder.NewTable(
"订单"\'创建表
With
 tbl
    .AddColumn(
"日期" ,ADOXType.DateTime)
    .AddColumn(
"产品" ,ADOXType.String12)
    .AddColumn(
"客户" ,ADOXType.String20)
    .AddColumn(
"数量" ,ADOXType.Integer)
    .AddColumn(
"备注" ,ADOXType.Text)
End With
Builder.AddTable(tbl) 
\'增加表
Builder.Close()