o problema é erro interno do servidor msm! =/
to tirando parte por parte do código pra ver o q pode ser... mas nao to conseguindo! =/
na pagina
cadastro_alterar.asp o link de excluir tá indo assim:
cadastro_excluir.asp?codigo=(CODIGO)cadastro_excluir.asp<%
If Len(Request("codigo")) <> "0" Then
Set Banco=Server.CreateObject("ADODB.Connection")
Banco.Open Application("ConexaoMYSQL")
Set TabelaCadastro=Server.CreateObject("ADODB.Recordset")
TabelaCadastro.CursorType = 1
TabelaCadastro.LockType = 2
TabelaCadastro.CursorLocation = 3
Sql = "SELECT * FROM Cadastro WHERE codigo="+request("codigo")+""
nome = TabelaCadastro.Fields("nome_usuario")
If Request("confirmar") <> "sim" Then
%>
<font face="verdana" size="2"><a href="cadastro_excluir.asp?codigo=<%=request("codigo")%>&confirmar=sim">Tem certeza que deseja excluir o registro de <%=nome%>?</a></font>
<%
End If
If Request("confirmar") = "sim" Then
'******************************
'* Exclui registro do cadastro
'******************************
SQL="DELETE FROM Cadastro WHERE codigo="+request("codigo")+""
Banco.Execute SQL,Banco
'************************************
'* Encerra conexão e destroi objetos
'************************************
TabelaCadastro.Close
Set TabelaCadastro=nothing
Banco.Close
Set Banco=nothing
Response.Redirect "cadastro_alterar.asp"
End If
End If
%>
só pra confirmar com certeza... com mysql usa-se sem o * no delete from e + no lugar de & né?
tenho quase certeza que o problema té nessas duas linhas:
Set Banco=Server.CreateObject("ADODB.Connection")
Banco.Open Application("ConexaoMYSQL")
será q é aí msm?
Edição feita por: knoxville, 03/05/2006, 16:48.