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

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

资讯

公司动态
业界资讯

Access资讯

Excel资讯

Word资讯

PPT资讯

其它Office资讯

微软新闻

IT资讯

热门文章

  • 英特尔体验店首现家电卖场
  • 蔡冠深议案:推广Linux..
  • 三类渠道将共分IT产品天下
  • SQL Server数据库..
  • 欧盟报废电子电气设备指令实..
  • 福建泉州率先实行手机实名制..

最新文章

  • 李开复:中国高校急需根据社..
  • 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-07-26] 2010年IT的热门和冷门职业access数据库
  • [2006-11-20] 【公司】惠普营业额逾九百亿 超IBM成全球最大IT公司access数据库
  • [2005-04-06] MessagEase能用同一键盘输入八种语言access数据库
  • [2006-09-29] 腾讯成功之道access数据库
  • [2006-11-19] 惠普首超IBM成最大IT公司access数据库
  • [2006-08-03] 国产手机出口大增国内失守 黑手机转向隐蔽access数据库

热门产品

  1. Access通用开发平台

    Access通用开发平台

  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-2022  www.metinfo.cn