Que Passa Com Esse Codigo

[Guest brasy]

Tenho o codigo assim:

<%
dim rs, SQL
conn.open conexao
SQL = "select top 10 *  from coluna order by data desc"
set rs = conexao.Execute(SQL)
%>
<script language="JavaScript1.2"> 
var message= new Array() 
var bucle=0
for(bucle=0;bucle<10;bucle++){
message[bucle]="<%=rs("data")%>|texto.........|http://www.link.com.br" 
}

o codigo da conexao esta assim

<%
Set Conn = Server.CreateObject("AdoDb.Connection") 
conexao = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;PWD=;Initial Catalog=meupais;Data Source=BRI"
Set RS = Server.CreateObject("ADODB.Recordset")
Conn.open conexao%>

você esta tando erro?

ADODB.Connection (0x800A0E79)

La operación no está permitida si el objeto está abierto. e ainda esta dando esse erro: Se requiere un objeto: 'Provider=SQLOLEDB.1;'

t+

[Reginaldo ASP]

Geralmente esse erro ocorre quando você tenta abrir duas vezes um RecordSet sem fechar o 1º.

[Guest Briner]

Era isso mesmo o que você falou...

Consegui fazer funcionar mais não dar forma que eu quero, tem como fazer um bucle desta forma?

<!--#include file="conexaoSQL.asp"-->
<script language="JavaScript1.2"> 
var p=0
</script> 
<%
set rs= conn.execute("select top 10 * from coluna  order by data desc")
do while not rs.eof
vardata=rs("data")
vartitulo=rs("titulo")
%>
<script language="JavaScript1.2"> 
var message= new Array() 
message[p]="<%response.Write vardata %>| <%response.Write vartitulo %>|http://www.seulink.com.br" 
<%
rs.movenext
p=p+1
loop
%>

[Guest briner]

já dei um jeito

valeu

t+

[Tork]

se der fala aí como você fez... pra se alguém tiver a mesma dúvida...