| 
  
|   | 
	 名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash | 
  | 
    
 <% Call RenameTable("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=c:example.mdb", "test", "changed") Sub RenameTable (conStr, oldName, newName) \\\'Has to be OLE DB connection \\\'Create object and connect to DB... Dim objADOXDatabase Set objADOXDatabase = Server.CreateObject("ADOX.Catalog") objADOXDatabase.ActiveConnection = conStr \\\'Change the name... objADOXDatabase.Tables(oldName).Name = newName \\\'Clean up... Set objADOXDatabase = Nothing End Sub %> 返回类别: 教程 上一教程: MICROSOFT 脚本编码器SCRIPT ENCODER介绍(3)全中文 下一教程: 在ASP中用EASYMAILOBJECT组件处理EXCHANGE邮件源代码-读取邮件主题和大小 您可以阅读与"关于ACCESS数据库表改名的一段代码"相关的教程: · ACCESS数据库表改名的一段代码 · 在ASP中通过GETROWS实现数据库记录分页的一段代码 · ASP中通过GETROWS实现数据库记录分页的一段代码 · 将汉字转变成汉语拼音的一段代码 · 关于将数据成批导入新数据库的程序例子(ACCESS TO SQL)  | 
  
| 快精灵印艺坊 版权所有 | 
	首页 | 
    ||