Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Ja vou logo esclarecendo que não sou "EXPERT" em ASP então tenham paciencia, bem tentei fazer um arquivo para deletar os registros, mas o que acontece é que ele não mostra e ja vai direto pra página "default.asp" como é pedido no final do código.
<!--#include file="StrCOn.asp" -->
<%
Set dados = conexao.execute("Select id,titulo,texto from home order by id DESC;")
While not dados.eof
%>
<a href="deletar.asp?id=<%=dados("id")%><%=dados("titulo")%><%=dados("texto")%>">Excluir</a>
<%
dados.movenext
wend
id = request.QueryString("id")
if id <> "" then
SQL = "Delete from home where id=" &id
conexao.execute(sql)Obrigado
você qr q ele mostre os <a> q você faz no Loop .. certo ??
Mas... quando você qr q ele redirecione para a outra página ???
Do jeito que está.. ele VAI REDIRECIONAR MESMO.... pois ele vai fazer tudo que você pede no loop e logo que terminar vai para a outra página...
você deve fazer o seguinte... O tio Dark aki vai ser bonzinho e fazer a função correta pra você...
<!--#include file="StrCOn.asp" -->
<%
Set dados = conexao.execute("Select id,titulo,texto from home order by id DESC;")
While not dados.eof
%>
<a href="deletar.asp?Exclui=Sim&id=<%=dados("id")%><%=dados("titulo")%><%=dados("texto")%>">Excluir</a>
<%
dados.movenext
wend
%>
<%
If Request.QueryString("Exclui") = "Sim" Then
id = request.QueryString("id")
if id <> "" then
end if
dados.close
set dados = nothing
response.Redirect("default.asp")
End if
%>
Pronto... agora sim ela vai fazer oq você qr..
Ela vai fazer a listagem de tudo que está no banco.. e só quando você clicar em algum link é q ela vai fazer a exclusão e depois será redirecionada para a Default.asp
Mais mastigado e paciente do que isso.. impossivel..
Abraços...