以下的文章主要介绍的是MySQLSQL数据库清空代码 _php 清空mysql asp的实际操作情况,本文主要讲述的是access或是mssql 2009-10-14 17:34asp 代码的详细解析,希望会给你带来一些帮助在此方面。
复制代码 代码如下:
- <%
- Dim Rs,Conn
- Set Conn=Server.CreateObject("Adodb.Connection")
- Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&server.mappath("readlog.mdb")
- Set Rs=Conn.OpenSchema(20)
- Do While not Rs.Eof
- If Ucase(Rs("TABLE_TYPE"))="TABLE" Then '
如果是用户表
- Conn.Execute("Drop Table "&Rs("TABLE_NAME")&"")
- End If
- Rs.MoveNext
- Loop
- Response.Write "成功!"
- Rs.Close
- Set Rs=Nothing
- Conn.Close
- Set Conn=Nothing
- %>
php清空mysql
MySQLSQL数据库;复制代码 代码如下:
- <?php
- $user = "readlog.cn";//账号
- $password = "readlog.cn";//密码
- $dbname = "readlog";//数据库
- $link = mysql_connect("localhost:3306",$user,$password);
- mysql_select_db("$dbname",$link);
- echo "<p>正在清空数据库...";
- $result=mysql_query("SHOW tables",$link);
- while ($currow=mysql_fetch_array($result));
- mysql_query("DROP TABLE IF EXISTS $currow[0]");
- echo "成功!";
- ?>
asp清空mssql
复制代码 代码如下:
- <%
- Dim Rs,Conn
- Set Conn=Server.CreateObject("Adodb.Connection")
- Conn.Open "Provider=Sqloledb; User ID=readlog.cn; Password=readlog.cn; Initial Catalog =readlog; Data Source=(local);"
- Set Rs=Conn.Execute("Select name from sysobjects Where xtype=char(85) order by id")
- Do While Not Rs.Eof
- Conn.Execute("drop table table "&rs(0)&"")
- Rs.movenext
- loop
- Response.Write "成功!"
- Rs.Close
- Set Rs=Nothing
- Conn.Close
- Set Conn=Nothing
- %>
以上的相关内容就是对MySQLSQL数据库清空代码的介绍,望你能有所收获。
【编辑推荐】