Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

灵活选择表1中的字段生成表2的结构

花落,相依  发表于:2011-09-27 12:42:32  
复制

各位好

    我好像在本论坛看到过有这么一个示例:就是灵活选择一个表中的字段后就将选中的字段生成一个新表中的结构。找不到这个原贴,请朋友们帮找找。谢谢。

 

    大概意思是:

    选择已有表中的什么字段,点生成就生成了新表(这个新表中只有结构没有内容)

 

Top
麥田 发表于:2011-09-27 12:45:14
做个生成表查询

麥田 发表于:2011-09-27 12:45:41
生成表查询示例-Access软件网
http://www.accessoft.com/article-show.asp?id=5328

麥田 发表于:2011-09-27 12:46:11
【Access通用工具源码】Access表生成器-Access软件网
http://www.accessoft.com/article-show.asp?id=4730

煮江品茶 发表于:2011-09-27 13:35:17
dbaseIIIer 发表于:2011-09-27 18:53:43

建个窗体有个 ListBox 名字叫 字段列表

 

On Open

 

Me!字段列表.MultiSelect=True

s=""

for each c in Currentdb().tabledefs("表1").fields

     s=s & c.Name & ";"

next

Me!字段列表.RowSource=s

 

 

再建个按钮 cmdGo

 

cmdGo_Click()

 

s=""

With Me!字段列表

for n = 0 to .ListCount

    if .selected(n) then s= s & "," & .column(0,n)

next

End With

 

if s <> "" then

docmd.runsql "select top 0 " & mid(s,2) & " into 表2 from 表1"

endif



都市侠影 发表于:2011-09-28 11:03:02
运行时执行CREATE TABLE语句即可

dbaseIIIer 发表于:2011-09-29 00:40:41

create table 的字段名呢? 数值类型呢? 长度呢?

 

当然用 select top 0 into  好用了啊!

 

管他什么数据类型, 是那个名就 加上就好了!



总记录:7篇  页次:1/1 9 1 :