Access交流网
  • 设为首页|收藏本站|繁体中文|手机版
  •     
  • Access培训-Access开发平台-Access行业开发

  • 首页
  • 资讯
  • 技巧
  • 源码
  • 行业
  • 资源
  • 产品
  • 活动
  • 培训
  • 招聘
  • 论坛
  • 商城
  • 关于

资讯

公司动态
业界资讯

Access资讯

Excel资讯

Word资讯

PPT资讯

其它Office资讯

微软新闻

IT资讯

热门文章

  • 双核电脑售价跌破4000元
  • IT专业连锁 家电连锁新锐..
  • 华硕服务器IT硬件平台搭建..
  • 美拟进行超新星加速度实验探..
  • Linux主流厂商合纵连横..
  • 分类计算余额的函数

最新文章

  • 李开复:中国高校急需根据社..
  • VBA编程常用语句300句
  • SQL基础:常用SQL语句..
  • ACCESS学习日记
  • 多表查询技巧
  • Oracle数据库EXP、..

联系方式

Access交流网

电  话:0760-88315075
热  线:0760-88315075

邮  编:528463
咨询QQ:1918333016
营销QQ:4008553990

Email:1918333016@qq.com

网  址:www.access-cn.com

当前位置:首页 > 资讯 > 业界资讯 > IT资讯
IT资讯

批量去除通过ODBC连接到SQL Server链接表名前的"DBO_"

Public Sub RenameLinkTableName()
    Dim dbs As Database
    Dim tdf As TableDef
    Dim strNewName As String
    Dim strName As String
   
    Set dbs = CurrentDb
    For Each tdf In dbs.TableDefs
        strName = tdf.Name
        If Ucase(Left(strName, 3)) = "DBO" Then
            strNewName = Right(strName, Len(strName) - 4)
            tdf.Name = strNewName
            tdf.RefreshLink
        End If
    Next
End Sub

发布人:朱亦文-Access开发者  
分享到:
点击次数:  更新时间:2006-11-23 23:19:52  【打印此页】  【关闭】
上一篇:传台湾新浪将出售 新浪官方并未否认  下一篇:微软第五届学生编程竞赛全面启动 冠军2.5万美元



相关文章

  • • 李开复:中国高校急需根据社会需求培养学生
  • • VBA编程常用语句300句
  • • SQL基础:常用SQL语句详解 (转)
  • • ACCESS学习日记
  • • 多表查询技巧
  • • Oracle数据库EXP、IMP命令语句使用方法
  • • SQL注入的高级应用ACCESS篇!
  • • 代码打开页面设置

热门文章

  • [2006-11-17] 华为3Com竞购程序启动access数据库
  • [2006-07-26] IT应用不断深入 IT资产心要做到中有“数”access数据库
  • [2005-12-14] 电话实名在重庆兴起 拨打全国只收市话费access数据库
  • [2006-10-10] 电信将启动3G试商用 采用WCDMA制式access数据库
  • [2006-10-21] 谷歌市值突破一百亿access数据库
  • [2005-10-31] “网赚”诈骗又出新花样 叫卖网站源代码骗钱财access数据库

热门产品

  1. 销售宝销售管理软件--让销售像“偷菜”一样简单!

    销售宝销售管理软件--让销售像“偷菜”一样简单!

  2. 通用POS软件

    通用POS软件

  3. 电子厂管理软件系统

    电子厂管理软件系统

公司动态|在线留言|在线反馈|联系我们|友情链接|会员中心|站内搜索|网站地图

中山市天鸣科技发展有限公司 版权所有 1999-2018 粤ICP备10043721号

广东省中山市西苑广场富贵阁20楼A座

电话:0760-88315075 手机:13928102596 QQ:1918333016

Access应用 Access培训 Access开发 Access平台

access|数据库|access下载|access教程|access视频|access软件

Powered by MetInfo 5.3.12 ©2008-2021  www.metinfo.cn