|
![]() |
名片设计 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数据库安全 · 把文件存进ACCESS数据库然后取出来供人下载的代码 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |