Deletar arquivo
Agora estou tentando assim, mas tem algo errado, quando solicito para deletar o arquivo,demora uma eternidade para finalizar a solicitação, e mesmo assim não chega a deletar do diretorio, e ate parece que o iis da uma travada......<!--#include file="verifica.asp" --><!--#include file="../conection/conn.asp"--><% On Error Resume Nextid = Request.Querystring("id")AbreConexaoSet RSfabricante = Conn.Execute("SELECT FROM fabricante WHERE id="&id)Set objFSO = Server.CreateObject("Scripting.FileSystemObject") 'Criar objeto FSO para deletararqDel = "C:\Inetpub\wwwroot\mega\fim\img_fabricantes\" & RSfabricante("logo")objFSO.DeleteFile arqDel, TrueConn.Execute("DELETE FROM fabricante WHERE id="&id) 'Exclui do DBSet objFSO = Nothing 'Fecha ObjetoSet RSfabricante = Nothing If err = 0 ThenResponse.Redirect("fabricante.asp?msg=3")ElseResponse.Write("erro.asp")End If %>
Discussão (2)
Carregando comentários...