繁體中文当前位置: 首页 > 图文教程 > 网络编程 > 其它综合 > asp php 清空access mysql mssql数据库的代码
- 其它综合
- 多种语言下获取当前页完整URL及其参数
- asp php 清空access mysql mssql数据库的代码
- ibatis简单实现与配置
- 初探 SOA
- 初探 SOA(补充)
- java asp分析各种搜索引擎的关键字,自动识别url 中关键字的编码
- qqwry.dat的数据结构图文解释
- UE、UI、UCD、Interaction Design、UED、UX、HCI、Usability,IA
- IE 打开服务器下的MHT文件的实现方法
- unicode utf-8 gb18030 gb2312 gbk各种编码对比
- Http 状态代码 指示(ajax,bs结构用的到)
- CSDN 博客的代码高亮问题自己修复
- 电子邮件 退信原因大全
- 支付宝 接口开发帮助(asp,php,asp.net,jsp)
- 在CODEIGNITER中 在CI中引入外部的JS与CSS呢
- 获取键盘键的值 集合 方便监控键盘事件
- 字符编码详解(基础)
- 国外开发者谈为何放弃PHP而改用Python
- 提示“处理URL时服务器出错”和“HTTP 500错误“的解决方法
- 开发人员一定要加入收藏夹的网站 推荐
其它综合 中的 asp php 清空access mysql mssql数据库的代码
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2010-01-10 浏览: 194 ::
收藏到网摘: n/a
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";//数据库
$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
%>
评论 (0) All
