Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何删除临时表


  共有2889人关注过本帖树形打印复制链接

主题：如何删除临时表
帅哥哟，离线，有人找我吗？
南望
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：392 积分：3312 威望：0 精华：0 注册：2014/4/9 10:04:00 		如何删除临时表  发帖心情 Post By：2021/6/4 12:47:00 [只看该作者]

如何批量删除用Dim dtb As New DataTableBuilder 建立 的临时表，只删除临时表，不处理本地表。
[此贴子已经被作者于2021/6/4 12:46:43编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107135 积分：544918 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/6/4 13:37:00 [只看该作者]

DataTableBuilder 建表的时候，指定一个前缀，比如表名为“临时_表A”，然后遍历所有表，判断是“临时_”开头的表名全部删除掉

 回到顶部
帅哥哟，离线，有人找我吗？
南望
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：392 积分：3312 威望：0 精华：0 注册：2014/4/9 10:04:00 		  发帖心情 Post By：2021/6/4 14:01:00 [只看该作者]

现有TABLE_1\TABLE_2\TABLE_3....用下面代码删除报错：

Dim val1 As Boolean
For Each dt As DataTable In DataTables
   If val1=dt.name.StartsWith("table_")=False Then
        output.show(dt.name)
        DataTables.Unload(dt.name) ‘卸载表即可

    End If

Next

图片点击可在新窗口打开查看此主题相关图片如下：qq截图20210604135945.png
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107135 积分：544918 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/6/4 14:11:00 [只看该作者]

删除要倒序处理

For i As Integer = DataTables.count - 1 To 0 Step -1
dim n as string = DataTables(i).name
If n.StartsWith("table_")=trueThen
        output.show(n)
        DataTables.Unload(n) ‘卸载表即可
    End If
next
 回到顶部
帅哥哟，离线，有人找我吗？
南望
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：392 积分：3312 威望：0 精华：0 注册：2014/4/9 10:04:00 		  发帖心情 Post By：2021/6/4 16:35:00 [只看该作者]

收到，问题解决。请问老师设置临时表字段为备注字段时我用下面的方法设置的，超过255就自动认为是备注字段，但实际使用往临时表该字段填充数据时却报长度超过被截取的错误，这是为什么？


Dim dtb As New DataTableBuilder(t & Num)
dtb.AddDef("字段1", Gettype(String),500)
dtb.Build()


图片点击可在新窗口打开查看此主题相关图片如下：qq截图20210604163008.png
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107135 积分：544918 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/6/4 16:41:00 [只看该作者]

手工创建的备注列其实也是有大小的，把500改大一点，比如8000

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03711 秒, 4 次数据查询