在Access数据库中重命名表

时间:2008-10-07 12:20:56  来源:第二电脑网上收集  作者:

  第二电脑网导读:r.CreateObject("ADOX.Catalog") oCat.ActiveConnection = ConnStrSet oTbl = Server.CreateObject("ADOX.Table")Set oTbl = oCat.Tables("OldTable") '要重命名的表名:OldTableoTbl.Name = "NewTable" '新表名Set oCat = NothingSet oTbl = Nothing ...
  正文: 下面代码是用Adox重命名Access表名的示例代码:
Dim Conn,ConnStr,oCat,oTbl
ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("data.mdb")
Set oCat=Server.CreateObject("ADOX.Catalog")
oCat.ActiveConnection = ConnStr

Set oTbl = Server.CreateObject("ADOX.Table")
Set oTbl = oCat.Tables("OldTable") '要重命名的表名:OldTable
oTbl.Name = "NewTable" '新表名
Set oCat = Nothing
Set oTbl = Nothing

在Access数据库中重命名表》由第二电脑网原创提供,转载请注明:http://www.002pc.com/master/College/Programming/ASP/2008-10-07/3419.html


关键字:

关于《在Access数据库中重命名表》文章的评论

站内搜索: 高级搜索

热门搜索: Windows style 系统 tr IP QQ CPU 安装 function 注册 if td