| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 465 人关注过本帖
标题:关于删除上传的图片的问题
只看楼主 加入收藏
wly9908
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2006-12-1
收藏
 问题点数:0 回复次数:4 
关于删除上传的图片的问题

如何才能把上传的图片删除?
<%
'----------------删除信息开始------------------'
If Request.QueryString("del_id")<>"" Then
del_id=Request.QueryString("del_id")
Set rs=Server.CreateObject("ADODB.RecordSet")
'----------------删除图片------------------'
Sqlstr="Select * from Person where id="&del_id
Set Rs=Conn.Execute (Sqlstr)
If Not Rs.Eof And Rs.Bof Then
Picture=Rs("Picture")
Line="/"
Set Fso = CreateObject("Scripting.FileSystemObject")
Filepath=Server.Mappath("../upfile_picture/")
SourceFile=Filepath&Line&Picture
If Fso.fileExists(SourceFile) Then
Fso.DeleteFile(SourceFile)
End If
Set Fso = Nothing
End If
Set Rs0=Nothing
'------------------删除记录--------------------'
Sql_del="Delete From Person Where id="&del_id
Conn.Execute (Sql_del)
End If
'--------------------------删除信息结束-----------------------------'
rs.Close
Set rs=Nothing
conn.Close
Set conn=Nothing
Response.Write("<SCRIPT language=JavaScript>javascript:history.go(-1)</SCRIPT>")
Response.Redirect "Person_manger.asp"
%>

路径都对的,就是不知道为什么还是删不掉文件夹里的图片,请各位帮忙~~~~~~

搜索更多相关主题的帖子: 删除 
2006-12-01 15:20
wly9908
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2006-12-1
收藏
得分:0 
到现在也没人提示我呀?!!!
晕~~~~~~~~~~
2006-12-06 09:23
tang688
Rank: 5Rank: 5
等 级:贵宾
威 望:16
帖 子:1219
专家分:35
注 册:2004-12-25
收藏
得分:0 
SourceFile=Filepath&Line&Picture
Response.Write SourceFile '加这一句先看看你说的路径都对的,它到底对不对。
If Fso.fileExists(SourceFile) Then
Fso.DeleteFile(SourceFile)
End If

2006-12-06 10:33
メ冰枫ぱ雪
Rank: 1
等 级:新手上路
威 望:2
帖 子:326
专家分:0
注 册:2004-11-13
收藏
得分:0 
同3楼,先输出下 SourceFile 是怎么样的吧。。!

动态网页技术交流群:16449874 免费网络收藏夹:http:///Favorite
2006-12-06 17:14
a8a12
Rank: 1
等 级:新手上路
帖 子:37
专家分:0
注 册:2005-11-10
收藏
得分:0 
whichfile=server.mappath(Request("FileName"))
Set thisfile = fso.GetFile(whichfile)
thisfile.Delete True
2006-12-06 17:26
快速回复:关于删除上传的图片的问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.018149 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved