if request("table")="user" then
id=request("id")
sql="select img from [sold] where belogto='"&id&"'"
set rs = server.CreateObject("adodb.recordset")
rs.open sql, conn, 1, 2
if trim(rs("img"))<>"" then '--------出错的语句---------
pic=rs("img")
path= server.MapPath (pic)
set objfso = server.createobject("scripting.FileSystemObject")
if objfso.FileExists(path) then
objfso.DeleteFile (path)
end if
set objfso = nothing
end if
rs.close
set rs=nothing
conn.execute "delete from [user] where userid='"&id&"'"
conn.execute "delete from [sold] where belogto='"&id&"'"
conn.execute "delete from [want] where belogto='"&id&"'"
end if