MySQLSQL数据库清空代码清空

以下的文章主要介绍的是MySQLSQL数据库清空代码 _php 清空mysql asp的实际操作情况，本文主要讲述的是access或是mssql 2009-10-14 17:34asp 代码的详细解析，希望会给你带来一些帮助在此方面。 代码如下:

% DimRs,Conn Set Conn = Server .CreateOb

  



      
以下的文章主要介绍的是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数据库清空代码的介绍，望你能有所收获。