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

(Resolvido)Problema no botão excluir

jow

Perguntado por jow,

 Share

Pergunta

jow

jow

Postado
Postado (editado)

Estou com um problema no botão excluir q gostaria da ajuda de vocês ... meu código:

<%

Option Explicit

Response.Expires = 0

Dim array_id, i, sql_id, id,strDBPath

id = Request.QueryString("checkbox")

'Caso ocorra algum erro os precessos não são interrompidos

'e é passado para a próxima linha de comando

On error Resume Next %>

<!--#include file="config/conexao.asp"-->

<%

call abre_conectar

'Deletando registro da tabela contato onde esta a id

%>

<html>

<head>

<LINK REL=stylesheet HREF="liks_etc.css" TYPE="text/css">

<title>Tela de Exclusão</title>

</head>

<body bgcolor="#FFFFFF">

<table width="100%" border="0" cellspacing="0" cellpadding="0">

<tr>

<td>

<%

if err = 0 and id <> "" then

array_id = split(id,",")

For i=0 to ubound(array_id)

sql_id = sql_id & "contato.autonum = " & Trim(array_id(i)) & " OR "

'campo texto, então" & Trim(array_id(i)) & " OR "

'caso numerico '" & Trim(array_id(i)) & "' OR "

Next

sql_id = left(sql_id,(len(sql_id)-4))

sql = "DELETE * FROM contato WHERE "&sql_id&""

set tab = cnn.execute(sql)

call fecha_conectar

set tab = nothing

%>

<table width="100%" border="0" cellspacing="2" cellpadding="2">

<tr align="center">

<td bgcolor="#FFFFC4" width="30%">

<div align="center"><font color="#000099"><b><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><a href="form_inclusao.asp" class="menu">

<font color="#0000FF">Incluir</font></a></font></b></font></div>

</td>

<td bgcolor="#FFB98A" width="30%">

<div align="center"><font color="#000099"><b><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><a href="form_exclui.asp" class="menu">

<font color="#0000FF">Excluir</font></a></font></b></font></div>

</td>

<td bgcolor="#00FFFF" width="35%">

<div align="center"><font color="#000099"><b><font face="Verdana, Arial, Helvetica, sans-serif" size="2" color="#CCCCCC"><a href="escolhe_pra_auterar.asp" class="menu">

<font color="#0000FF">Alterar</font></a></font></b></font></div>

</td>

</tr>

</table>

<table border="0" width="100%" height="8" cellpadding="2" align="center">

<tr bgcolor="#0099FF">

<td colspan="7" height="1" align="center">

<font size="4" color="#FFFF00"><b><font face="Verdana, Arial, Helvetica, sans-serif">

<span style="background-color: #0099FF">Seus

dados foram excluidos com sucesso!</span></font></b><span style="font-weight: 700; background-color: #0099FF">

</span></font> </td>

</tr>

</table>

<%else%>

<div align="center"><b><font face="Verdana, Arial, Helvetica, sans-serif" size="4">Ocorreu algum erro!<br>Nenhum dado foi excluido!</b><br><a href="java script:history.back(-1)">Volta</a></font></div>

<%End if%>

</td>

</tr>

</table>

</body>

</html>

o mesmo código só funciona com conexão no banco ACCESS, mas no banco MySql ele não exclui os registros ... alguém poderia me ajudar ???

Editado por jow
Link para o comentário
Compartilhar em outros sites

13 respostass a esta questão

Posts Recomendados

  • 0
jow

jow

Postado
  • Autor
Postado

Opá então estou voltando a esse problema como disse acima esse script funciona perfeitamente no ACCESS já no MYSQL ele não roda e não dá erro algum na tela, as variáveis também não estão indo vázias ... não sei o porque esse script não roda no MYSQL, espero q vocês possam me dar a solução

Link para o comentário
Compartilhar em outros sites
  • 0
jow

jow

Postado
  • Autor
Postado

estou postando o meu código, pois não consigo achar o erro já no ACCESS o mesmo código funciona, poq q não funciona no MySql ???

<!--#include file="config/conexao.asp"-->

<%

call abre_conectar

'Option Explicit

Response.Expires = 0

Dim objConn, stringSQL, strConnection, array_id, i, sql_id, id,strDBPath

id = Request.QueryString("checkbox")

'Caso ocorra algum erro os precessos não são interrompidos

'e é passado para a próxima linha de comando

On error Resume Next

'Deletando registro da tabela contato onde esta a id

%>

<html>

<head>

<LINK REL=stylesheet HREF="liks_etc.css" TYPE="text/css">

<title>Tela de Exclusão</title>

</head>

<body bgcolor="#FFFFFF">

<table width="100%" border="0" cellspacing="0" cellpadding="0">

<tr>

<td>

<%

if err = 0 and id <> "" then

array_id = split(id,",")

For i=0 to ubound(array_id)

sql_id = sql_id & "contato.autonum = " & Trim(array_id(i)) & " OR "

'campo texto, então" & Trim(array_id(i)) & " OR "

'caso numerico '" & Trim(array_id(i)) & "' OR "

Next

sql_id = left(sql_id,(len(sql_id)-4))

sql = "DELETE * FROM contato WHERE "&sql_id&""

set tab = cnn.execute(sql)

call fecha_conectar

set tab = nothing

%>

<table width="100%" border="0" cellspacing="2" cellpadding="2">

<tr align="center">

<td bgcolor="#FFFFC4" width="30%">

<div align="center"><font color="#000099"><b><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><a href="form_inclusao.asp" class="menu">

<font color="#0000FF">Incluir</font></a></font></b></font></div>

</td>

<td bgcolor="#FFB98A" width="30%">

<div align="center"><font color="#000099"><b><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><a href="form_exclui.asp" class="menu">

<font color="#0000FF">Excluir</font></a></font></b></font></div>

</td>

<td bgcolor="#00FFFF" width="35%">

<div align="center"><font color="#000099"><b><font face="Verdana, Arial, Helvetica, sans-serif" size="2" color="#CCCCCC"><a href="escolhe_pra_auterar.asp" class="menu">

<font color="#0000FF">Alterar</font></a></font></b></font></div>

</td>

</tr>

</table>

<table border="0" width="100%" height="8" cellpadding="2" align="center">

<tr bgcolor="#0099FF">

<td colspan="7" height="1" align="center">

<font size="4" color="#FFFF00"><b><font face="Verdana, Arial, Helvetica, sans-serif">

<span style="background-color: #0099FF">Seus

dados foram excluidos com sucesso!</span></font></b><span style="font-weight: 700; background-color: #0099FF">

</span></font> </td>

</tr>

</table>

<%else%>

<div align="center"><b><font face="Verdana, Arial, Helvetica, sans-serif" size="4">Ocorreu algum erro!<br>Nenhum dado foi excluido!</b><br><a href="java script:history.back(-1)">Volta</a></font></div>

<%End if%>

</td>

</tr>

</table>

</body>

</html>

Link para o comentário
Compartilhar em outros sites
  • 0
jow

jow

Postado
  • Autor
Postado

Nossa detonou hehe ... tava faz tempo procurando o erro e não encontrava, pois o script rodava perfeitamente no ACCESS, obrigado mesmo ... esse era o meu único problema em um sistema de noticias q eu estou fazendo, agora está OK valeuuu ...

Só gostaria de saber porque no MySql tava dando erro com o * ???

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.

×
 Share
Ir para lista de Perguntas


  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...