[Resolvido] Erro ao Excluir Registro

[xanburzum 169]

no seu link você esta passando isso

 

apaga_main.asp?Deletar=cadastro&autonum=<%=autonum%>">Deletar Cadastro</a>

 

por isso ele resgata isso

361">Deletar Cadastro

existe o id , mas esta sendo passado "lixo" junto

e dae dá erro na sql

 

tente passar apenas assim

apaga_main.asp?autonum=<%=autonum%>">Deletar Cadastro</a>

você passando apenas o autonum ele nao dará erro...

[Mário Monteiro 179]

na verdade posso até está enganado mas esta alteração do xanburzum não resolverá pois não foi feita correção apenas removeu um parametro

 

post este link completo

 

<a> .. </a>

acho provável de corrigir apenas com duas aspas simples mas precisa da linha toda para por no local correto

[fabio Avila 1]

segue Mario o link .

<a href="apaga_main.asp?Deletar=cadastro&autonum=<%=autonum%>">Deletar Cadastro</a>

[xanburzum 169]

passe apenas como te falei

apaga_main.asp?autonum=<%=autonum%>">Deletar Cadastro</a>

para testar o k esta recuperando, pois sua SQL esta certa,mas

ele recupera o ">Deletar Cadastro; junto

na verdade independente do link, como você esta recuperando somente o autonum, ele deve

pegar apenas o ID mesmo...

da um

 

autonum= Trim(Request.QueryString("autonum"))
response.write (autonum)
response.end()

mas faz o teste

[Mário Monteiro 179]

editado

 

desculpa fabio não havia visto seu post

 

estou analisando agora mas a principio não vi erro

[Mário Monteiro 179]

onde recupera o autonum que poe no link?

[fabio Avila 1]

Mario ,

 

Eu estou postando o que vcs estão pedindo , posso postar o codigo todo do formulario ?

[xanburzum 169]

olha acabei de testar um exemplo baseado na sua lógica e foi normalmente

 

Option explicit
	'declaro as var
	dim conexao, conDBQ, constring,rsdel, SQLdel, varcodigo
	'recupero a var
	varcodigo=Trim(request.form("codigo"))
	'crio a conexao %>
	<!--#include file="conn/conexao1.asp"-->
	<% 'abro a conexao
	call abreconexao
	  'crio o rsdel para excluir o registro
	    set rsdel=server.createobject("ADODB.Recordset")
		SQLdel="DELETE FROM login WHERE codigo="&varcodigo&""
		rsdel.open SQLdel,conexao,1,3
		response.redirect("administracao_treina.asp?msg=3")
		set rsdel=nothing
	'fecha a conexao
	call fechaconexao %>

obs...

faça os teste k pedi e veja o resultado, como tb você pode pegar esse code como exemplo

[Mário Monteiro 179]

fez o teste que pediram neste post

 

http://forum.imasters.com.br/index.php?/topic/354409-erro-ao-excluir-registro/page__view__findpost__p__1344994

[fabio Avila 1]

Ola Amigos , ja fiz todos os testes q ma passaram aki e nda de funcionar , segue os arquivos para quem puder dar uma olhada e me ajudar muito obrigado por enquanto ..

Abraços

 

http://ueboo.com/files/741852/excluir.rar_369258.php

[Salgado 4]

Aparentemente aqui:

<input type="button" value="Imprimir" name="Imprimir" onclick="javascript:DoPrinting()" style="font-size: 8 pt; font-family: Tahoma; font-weight: bold; background-color: #A1C094"></span></font><a href="apaga_main.asp?Deletar=cadastro&autonum=<%=autonum%>">Deletar Cadastro</a>">clique aqui para apagar</a></td>

Está sendo passado de forma errada, durante alguma edição do link sobrou algum "lixo", substitua pelo trecho abaixo e teste novamente.

              <input type="button" value="Imprimir" name="Imprimir" onclick="javascript:DoPrinting()" style="font-size: 8 pt; font-family: Tahoma; font-weight: bold; background-color: #A1C094"></span></font><a href="apaga_main.asp?Deletar=cadastro&autonum=<%=autonum%>">clique aqui para apagar</a></td>

 

[xanburzum 169]

estranho isso, cara dá uma analisada neste code k fiz baseando em sua lógica

 

<%	Option explicit
	'declaro as var
	dim conexao, conDBQ, constring,rsdel, SQLdel, varcodigo
	'recupero a var
	varcodigo=Trim(request.form("codigo"))
	'crio a conexao %>
	<!--#include file="conn/conexao1.asp"-->
	<% 'abro a conexao
	call abreconexao
	'crio o rs
	set rs=server.createobject("ADODB.Recordset")
		  'crio o rsdel para excluir o registro
	    set rsdel=server.createobject("ADODB.Recordset")
		SQLdel="DELETE FROM login WHERE codigo="&varcodigo&""
		rsdel.open SQLdel,conexao,1,3
		response.redirect("administracao_treina.asp?msg=3")
		set rsdel=nothing

	'fecha a conexao
	call fechaconexao %>

funciona certinho, e passe no link apenas como te falei, apra teste...

 

apaga_main.asp?autonum=<%=autonum%>">Deletar Cadastro</a>

k é o que salgado falou tb

antes dá um response.write no autonum...

[fabio Avila 1]

Ola Salgado beleza ,

 

Fiz como passou mas ainda continua com o mesmo erro .. você tem alguma outra alternativa q poderia fazer pra resolver isso ?

 

Vlw

[fabio Avila 1]

Ola AMigos ,

 

Aff , depois de varios dias na luta funcionou a parada aki , veja como ficou :

 

Link :

 

apaga_main.asp?id=<%=id%>

Codigo que exclui:

 

<%
Set conObj = Server.CreateObject("ADODB.Connection")
conObj.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("bd.mdb") & ";"
id= Request.QueryString("id")
sql = "DELETE FROM Representantes WHERE id=" & id
conObj.Execute(sql)
conObj.Close
Set conObj = nothing
Response.write "A foto foi apagada com sucesso!"
response.write "<br><br>Você será redirecionado em 5 segundos<br>"
%>

Um abraço a todos q me ajudaram .. vlw

[xanburzum 169]

praticamente o k postei acima

<%      Option explicit       
 'declaro as var       
 dim conexao, conDBQ, constring,rsdel, SQLdel, varcodigo    
    'recupero a var       
 varcodigo=Trim(request.form("codigo"))    
    'crio a conexao %>     
   <!--#include file="conn/conexao1.asp"-->    
    <% 'abro a conexao      
  call abreconexao       
 'crio o rs     
   set rs=server.createobject("ADODB.Recordset")
                  'crio o rsdel para excluir o registro 
           set rsdel=server.createobject("ADODB.Recordset")  
              SQLdel="DELETE FROM login WHERE codigo="&varcodigo&""  
              rsdel.open SQLdel,conexao,1,3      
          response.redirect("administracao_treina.asp?msg=3")  
              set rsdel=nothing  
      'fecha a conexao    
    call fechaconexao %>

[Mário Monteiro 179]

e cade o resultado do teste?

[xanburzum 169]

acredito k resolveu, caso exista duvida a mais, poste novamente

até lá tópico resolvido