Erro Consulta Sql

[danyort]

Bom dia, olha só...

tenho o código abaixo:

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & server.mappath("mailing.mdb")

tabelas = Array("tabela1","tabela2","tabela3")

for x = 0 to ubound(tabelas)

    set rs = conn.execute("select * from " & tabelas(x) & " order by mail")

next

E me retorna o seguinte erro:

0x80004005)

Erro não especificado

A linha onde diz que tem erro é a "set rs = conn.execute("select * from " & tabelas(x) & " order by mail")"

Não sei o que está acontecendo....

[bareta]

você quer consultar mais de uma tabela com o mesmo rs???

crie rs diferentes.... rs1,rs2,rs3....

[.Andreia.]

Com access acho que não é possivel, mas com SQl server voce pode montar um lote de SQl unico e fora do FOR você executa tudo

[danyort]

É que são 27 tabelas, e para não precisar criar o mesmo código (que é grandinho) 27 vezes, pensei em facilitar.

Mas acho que assim ele não aceita... :( :unsure: :angry: