asp php 清空access mysql mssql數(shù)據(jù)庫的代碼
更新時間:2008年12月14日 12:32:19 作者:
php清空mysql asp情況access或mssql
asp代碼
<%
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
<?php
$user = "readlog.cn";//賬號
$password = "readlog.cn";//密碼
$dbname = "readlog";//數(shù)據(jù)庫
$link = mysql_connect("localhost:3306",$user,$password);
mysql_select_db("$dbname",$link);
echo "<p>正在清空數(shù)據(jù)庫...";
$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
%>
復(fù)制代碼 代碼如下:
<%
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
復(fù)制代碼 代碼如下:
<?php
$user = "readlog.cn";//賬號
$password = "readlog.cn";//密碼
$dbname = "readlog";//數(shù)據(jù)庫
$link = mysql_connect("localhost:3306",$user,$password);
mysql_select_db("$dbname",$link);
echo "<p>正在清空數(shù)據(jù)庫...";
$result=mysql_query("SHOW tables",$link);
while ($currow=mysql_fetch_array($result));
mysql_query("DROP TABLE IF EXISTS $currow[0]");
echo "成功!";
?>
asp清空mssql
復(fù)制代碼 代碼如下:
<%
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 MYSQL出現(xiàn)問號亂碼的解決方法
- asp.net 結(jié)合mysql存儲過程進(jìn)行分頁代碼
- Asp.net 連接MySQL的實(shí)現(xiàn)代碼[]
- asp.net中通過ALinq讓Mysql操作變得如此簡單
- Win2003下配置iis+php+mysql+zend圖文 使其支持asp,.net,cgi,perl和php
- asp連接mysql數(shù)據(jù)庫詳細(xì)實(shí)現(xiàn)代碼
- 教你Asp.net下使用mysql數(shù)據(jù)庫的步驟
- aspx中的mysql操作類sqldatasource使用示例分享
- ASP.NET連接MySql數(shù)據(jù)庫的2個方法及示例
- asp+mysql+utf8 網(wǎng)頁出現(xiàn)亂碼問題的解決方法
- MySQL結(jié)合使用數(shù)據(jù)庫分析工具SchemaSpy的方法
- ASP使用MySQL數(shù)據(jù)庫的方法
相關(guān)文章
resty更新header控制api版本數(shù)據(jù)源讀寫分離
這篇文章主要介紹了resty的1.2.0-SNAPSHOT版本更新,可以通過header控制api的版本實(shí)現(xiàn)數(shù)據(jù)源讀寫分離,有需要的朋友可以借鑒參考下,希望能夠有所幫助<BR>,2022-03-03
使用postman進(jìn)行接口測試的方法(測試用戶管理模塊)
這篇文章主要介紹了使用postman進(jìn)行接口測試的方法(測試用戶管理模塊),本文給大家介紹的非常詳細(xì),對大家的學(xué)習(xí)或工作具有一定的參考借鑒價值,需要的朋友參考下吧2021-01-01
詳解使用內(nèi)網(wǎng)穿透工具Ngrok代理本地服務(wù)
本文主要介紹了使用內(nèi)網(wǎng)穿透工具Ngrok代理本地服務(wù),文中通過示例代碼介紹的非常詳細(xì),對大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價值,需要的朋友們下面隨著小編來一起學(xué)習(xí)學(xué)習(xí)吧2022-03-03
使用阿里大于(大魚)平臺進(jìn)行發(fā)送手機(jī)驗(yàn)證碼的流程
這篇文章主要介紹了使用阿里大于(大魚)平臺進(jìn)行發(fā)送手機(jī)驗(yàn)證碼的流程,非常不錯,具有一定的參考借鑒價值,需要的朋友可以參考下2019-10-10
用asp與php實(shí)現(xiàn)百度ping服務(wù)的代碼
分別用asp與php實(shí)現(xiàn)百度ping服務(wù)的代碼,需要的朋友可以參考下2012-02-02

