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

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

资讯

公司动态
业界资讯

Access资讯

Excel资讯

Word资讯

PPT资讯

其它Office资讯

微软新闻

IT资讯

热门文章

  • 四五十岁的老程序员还有没有..
  • 中国投14亿元建全球最大I..
  • 新浪,李嵩波
  • 苏州电博会10月18日举行..
  • 英特尔商用平台博锐亮相(图..
  • 方兴东预言中国新媒体发展速..

最新文章

  • 李开复:中国高校急需根据社..
  • 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-10-13] Google推教育资源门户网站 继续细化业务范围access数据库
  • [2005-08-18] 电子业陷入全行业低迷 电子百强利润大降53%access数据库
  • [2006-07-31] 十一家华尔街分析机构评级:搜狐高于新浪access数据库
  • [2006-08-03] 印度反盗版:法律较健全 公民意识不强access数据库
  • [2005-07-15] 微软中国新战略 陈永正资本探路中国市场access数据库
  • [2006-06-02] 微软官员为联想PC辩护 称安全威胁论毫无根据access数据库

热门产品

  1. 通用POS软件

    通用POS软件

  2. 较强的日程管理功能源码(新版)

    较强的日程管理功能源码(新版)

  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