Ir para conteúdo
Fórum CódigoFonte.net
Entre para seguir isso  
luciano2002

gravar session

Recommended Posts

Olá algum poderia me dar uma luz

faço uma consulta no access retorna 5 registros, preciso gravar em uma session com fazer ?

estou fazendo assim, só que só grava o primeiro registro

<%
cnpath="DBQ=" & Server.MapPath("dados/banco.mdb")
DataSource = "Driver={Microsoft Access Driver (*.mdb)}; " & cnpath
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open DataSource
Set RS = Server.CreateObject( "ADODB.Recordset" )
RS.ActiveConnection = conn
RS.open "SELECT top 5 * FROM carta order by Rnd(Int(Now()*[id_carta])-Now()*[id_carta]); "

Set fso = CreateObject("Scripting.FileSystemObject")
Set textStreamObject = fso.CreateTextFile(Server.Mappath("log.txt"),true,false)

textStreamObject.WriteLine (rs("titulo") )
textStreamObject.Close
%>
<%
if not rs.eof then
while not rs.eof


Set textStreamObject = Nothing
Set fso = Nothing


%>
titulo: <%=rs("titulo")%><br>

<%
rs.Movenext
wend
end if
%>

Obrigado

Compartilhar este post


Link para o post
Compartilhar em outros sites

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
Entre para seguir isso  

×
×
  • Criar Novo...