Microsoft VBScript 运行时错误 错误 '800a0035' 文件未找到
<!--#includefile="odbc_connection.asp"--><%friendsid=request("id")setrs=server.create...
<!-- #include file="odbc_connection.asp"-->
<%
friendsid=request("id")
set rs=server.createobject("adodb.recordset")
sql="select * from friends where id="&friendsid
rs.open sql,db,1,3
if not rs.eof then
Set fs = CreateObject("Scripting.FileSystemObject")
filename=Server.MapPath(rs("f_image"))
fs.DeleteFile(filename)
else
db.execute ("delete from friends where id="&friendsid&"")
end if
response.Write("<script>alert('记录成功删除！');history.back(-1);</script>")
response.Redirect("friends.asp")
Response.End
%>
大家能不能帮我看一下，我想删除文字和图片 的程序，但是出现就是这样的问题，也没有好的代码提供给我啊。既可以删除图片也可以删除文字的. 展开
<%
friendsid=request("id")
set rs=server.createobject("adodb.recordset")
sql="select * from friends where id="&friendsid
rs.open sql,db,1,3
if not rs.eof then
Set fs = CreateObject("Scripting.FileSystemObject")
filename=Server.MapPath(rs("f_image"))
fs.DeleteFile(filename)
else
db.execute ("delete from friends where id="&friendsid&"")
end if
response.Write("<script>alert('记录成功删除！');history.back(-1);</script>")
response.Redirect("friends.asp")
Response.End
%>
大家能不能帮我看一下，我想删除文字和图片 的程序，但是出现就是这样的问题，也没有好的代码提供给我啊。既可以删除图片也可以删除文字的. 展开
1个回答
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
