Declara Array

[modernel]

Pessoal oque está acontecendo é o seguinte, estou usando a variavel rs, para efetuar a exclusão, mas só consigo faze-la quando escolho somente um registro, quando escolho mais de um da erro:

[Microsoft][ODBC Microsoft Access Driver] Syntax error (comma) in query expression 'CODIGO=(7, 8)'.

Qual a forma que devo fazer para concertar esse problema?????

<%
Dim rs,arr
  Set conn = Server.CreateObject("ADODB.Connection")
  Set rs = Server.CreateObject("ADODB.Recordset")
  conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=d:\webplus\Rafael\Jornal.mdb") 

  If Request.Form("ck1") <> "" Then
        Set arr = conn.Execute ("DELETE FROM NOTICIAS WHERE CODIGO=(" & Request.Form("ck1") & ")" )
  Response.Redirect("conf_ex.asp")
  Else
%>
  <script language="JavaScript">
    alert("Selecione a(s) Notícia(s) que deseja excluir")
	history.back()
  </script>
<%
End If
conn.Close
Set conn = Nothing
%>

[dark0]

você vai precisar criar o seu SQL dentro de um FOR, para poder excluir multiplos registros..

Já trabalhou com Loops?

[André Gusmão]

Tenta assim:

If Request.Form("ck1") <> "" Then

    For Each codigo In Request.Form("ck1")

      Set arr = conn.Execute ("DELETE FROM NOTICIAS WHERE CODIGO=(" & codigo & ")" )

    Next

Response.Redirect("conf_ex.asp")

Else