%Set conexao=server.createobject("ADODB.Connection") conexao.open "Servipe" Set rsFundo=Server.CreateObject("ADODB.RecordSet") sqlstr2 = "Select * from site" rsFundo.open sqlstr2, conexao, 3,3 Set rsMarquee=Server.CreateObject("ADODB.RecordSet") sqlstr = "Select * from marquee" rsMarquee.open sqlstr, conexao, 3,3 %>
![]() |
![]() |
![]() |
||
![]() |
![]() |
![]() |
|
|
![]() |
![]() |
![]() |
||
![]() |
![]() |
![]() |
||