Ir para conteúdo
Fórum Script Brasil
  • 0

Fso


smez

Pergunta

7 respostass a esta questão

Posts Recomendados

  • 0

O meu código e esse

como que eu coloco o FSO para apagar o registro e a imagem

<%
set rs = createobject("adodb.recordset")
set rs.activeconnection = abredb


SQL = "DELETE * FROM equipe WHERE codigo = "&Request.QueryString("codigo")&""
rs.open sql

set rs = nothing
set conn=nothing

Response.Redirect("equipe.asp?deletado=sucesso")
%>

Link para o comentário
Compartilhar em outros sites

  • 0
<%
set rs = createobject("adodb.recordset")
set rs.activeconnection = abredb

SQL = "SELECT * FROM equipe WHERE codigo = "&Request.QueryString("codigo")&""
rs.open sql
'Pega a imagem
'O caminho deve ser relativo à página que executa este código
imagem = rs("campodaimagem")

'Deleta a imagem
Set fso = CreateObject("Scripting.FileSystemObject")
Set aFile = fso.GetFile("../images/"&imagem)
aFile.Delete

'Deleta o registro
SQL = "DELETE * FROM equipe WHERE codigo = "&Request.QueryString("codigo")&""
rs.open sql

set rs = nothing
set conn=nothing

Response.Redirect("equipe.asp?deletado=sucesso")
%>

Link para o comentário
Compartilhar em outros sites

  • 0

Eu fiz assim mas da erro na linha que esta em vermelho

<%

set rs = createobject("adodb.recordset")

set rs.activeconnection = abredb

SQL = "SELECT * FROM equipe WHERE codigo = "&Request.QueryString("codigo")&""

rs.open sql

Set fso = CreateObject("Scripting.FileSystemObject")

Set aFile = fso.GetFile("../equipe/" & rs("foto"))

aFile.Delete

SQL = "DELETE * FROM equipe WHERE codigo = "&Request.QueryString("codigo")&""

rs.open sql

set rs = nothing

set conn=nothing

Response.Redirect("equipe.asp?deletado=sucesso")

%>

Tipo de erro:

Erro de tempo de execução do Microsoft VBScript (0x800A0035)

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,1k
    • Posts
      651,8k
×
×
  • Criar Novo...