1、ASP清空ACCESS

<% 
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 
%> 

2、PHP清空mysql 

<?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 "成功!"; 
?> 

3、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 
%> 

---

转载请注明本文标题和链接：《asp php 清空access mysql mssql数据库的代码》