Erro Delete

[AlexCT]

Estou com problema com o Delete e como usar, vou postar todas coisas que tentei e os respectivos erros:

como poderia fazer e dar certo!

Conexão

Set Conn = Server.CreateObject("ADODB.Connection")
strCon="DRIVER={Microsoft Access Driver (*.mdb)};"  
strCon = strCon & "DBQ=" & Server.MapPath("../database/db_jogo.mdb")

Set RS4 = Server.CreateObject("ADODB.Recordset")

Set RS4 = Server.CreateObject("ADODB.Recordset")

SQL = "DELETE DISTINCTROW 

id_enquete,questao,selecao_1,selecao_2,selecao_3,selecao_4,votos_1,votos_2,votos_3,votos_4 FROM 

enquete WHERE id = "&(id_enquete)&""
RS4.Open SQL, strCon, 3                                      LINHA 229

Tipo de erro: Microsoft OLE DB Provider for ODBC Drivers (0x80040E10) [Microsoft][Driver ODBC para Microsoft Access] Parâmetros insuficientes. Eram esperados 1. /jogos/admin/enquete.asp, line 229 #################################

Set RS4 = Server.CreateObject("ADODB.Recordset")

SQL = "DELETE DISTINCTROW 

id_enquete,questao,selecao_1,selecao_2,selecao_3,selecao_4,votos_1,votos_2,votos_3,votos_4 FROM 

enquete WHERE id = "&(id_enquete)&""
RS4.Open SQL, strCon, 1                                      LINHA 229

Tipo de erro: Microsoft OLE DB Provider for ODBC Drivers (0x80040E21) O driver ODBC não oferece suporte para as propriedades solicitadas. /jogos/admin/enquete.asp, line 229 #################################

SQL = "DELETE DISTINCTROW 

id_enquete,questao,selecao_1,selecao_2,selecao_3,selecao_4,votos_1,votos_2,votos_3,votos_4 FROM 

enquete WHERE id = "&(id_enquete)&""
Set RS4 = strCon.Execute(SQL)               LINHA 230

Tipo de erro: Erro de tempo de execução do Microsoft VBScript (0x800A01A8) Objeto necessário: 'strCon' /jogos/admin/enquete.asp, line 230 #################################

SQL = "DELETE DISTINCTROW 

id_enquete,questao,selecao_1,selecao_2,selecao_3,selecao_4,votos_1,votos_2,votos_3,votos_4 FROM 

enquete WHERE id = "&(id_enquete)&""
Set RS4 = Conn.Execute(SQL)               LINHA 230

Tipo de erro:

ADODB.Connection (0x800A0E78)

Operação não permitida quando o objeto está fechado.

/jogos/admin/enquete.asp, line 230

#################################

obs: não estou sabendo quando usar, e porque usr um ou outro.

RS4 = Server.CreateObject("ADODB.Recordset")

RS4.Open SQL, strCon, 3

ou

Set RS4 = strCon.Execute(SQL)

[pgmador]

Tipo de erro:

ADODB.Connection (0x800A0E78)

Operação não permitida quando o objeto está fechado.

/jogos/admin/enquete.asp, line 230

Neste caso, você também precisa instanciar o objeto.

Set RS4 = Server.CreateObject("ADODB.Recordset")
SQL = "DELETE DISTINCTROW id_enquete,questao,selecao_1,selecao_2,selecao_3,selecao_4,votos_1,votos_2,votos_3,votos_4 FROM enquete WHERE id = "&(id_enquete)&""
Set RS4 = Conn.Execute(SQL)

Não tenho certeza, mas acho que no Access voce não consegue usar o DELETE DISTINCTROW

Veja com o pessoal do Forum

[]'s

Nelson Soares

http://www.ondagospel.com.br

[resopi]

Olá!!! tipo Cara FAz o Seguinte pega o HAbito de fazer somente SELECT pelo objeto do tipo Recordset!!! e paa fazer delet use a propria coneção!!!

assim:

Set conn = Server.CreateObject("ADODB.Recordset")

conn.open "string"

SQL = "DELETE from enquete  WHERE id = " & id_enquete

Conn.Execute (SQL)

e assim por diante para fazer seu delete!

falou!

:D