删除SQL数据以及对应文件

来源:百度知道 编辑:UC知道 时间:2024/06/01 13:41:57
<%
Set Conn=Server.CreateObject("ADODB.Connection")
ConnStr = "driver={SQL Server};server=(local);uid=tw0902;pwd=jintian***8;database=legion"
conn.open ConnStr
a="insert into delpic select picname from pic where picname not in(select 'uploadfile/' + picname from news_uploadpic union select picname from delpic)"
set rs=server.createobject("adodb.recordset")
rs.open a,conn,1,3
set rs=nothing
set conn=nothing
%>
实现了将pic表里存在news_uploadpic表没有的picname存入delpic表。
现在要将delpic里的数据全部删除,并且删除硬盘中对应的文件。
picname格式是这样的:uploadfile/jpg/2008-3/2008311165858815.jpg
其中uploadfile/jpg/2008-3/是文件夹上下级关系,2008311165858815.jpg是文件名。
uploadfile文件夹下有jpg和gif两个文件夹,jpg和gif文件夹下有若干日期命名的文件夹,再打开就是图片文件了。
是有难度,还是我表述有问题呀? 或者不能实现?

这不就是先从数据表delpic中选择全部的记录,再到程序中一个一个的删除.
最后清空表delpic.

我来看看数据库能不能用SQL脚本删除文件.

说的有点罗嗦,看标题的话,想楼主是要删除数据库。那么就drop database 数据库名。
比如说sql server
每个服务器都有一个master数据库,我们连接到master数据库,然后drop database 数据库名
那么此时sql server会自动删除数据库文件的。

或者也可以执行cmd的命令 net stop mssqlserver,然后用程序删除数据库所在的文件

<%
''文件删除函数
function deletefile(filename)
if filename<>"" then
set fso=server.CreateObject("scripting.filesystemobject")
if fso.FileExists(filename) then
fso.DeleteFile filename
else
Response.Write "<script>alert(''该文件不存在'');</script>"
end if
end if
end function
%>

'删除文件 调用方法
strfile=server.MapPath("../"+fileName) '注意这个路径
deletefile(strfile)

然后把数据库的记录删掉就行,例如:
delete 表名 where...

现在要将de