Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Christiano Nunes

Consulta ao banco de dados

Recommended Posts

Pessoal..

é possível fazer uma consulta no banco de dados da forma abaixo?

como fazer? do jeito q está nao vai..

 

 

vemdobd = "conexaobd"
Set ML = Server.CreateObject("ADODB.Recordset")
ML.CursorLocation = 3
ML.Open "SELECT * FROM tabela", vemdobd

já tentei d todo jeito..

 

Valeu

Abraços

Compartilhar este post


Link para o post
Compartilhar em outros sites

olha ete exemplo

 

<!--#include file="conn/conexao1.asp"--> 
<% call abreconexao
			
  'crio o rs
  set rs=Server.CreateObject("ADODB.Recordset")
  'crio o SQL
  SQL="SELECT * FROM login ORDER BY login"
  rs.open SQL,conexao,1,3

onde conexao1.asp

 

<% '----------------------
'    este arq. serve para estabelecer a conexao com o BD em Access
'    de nome quaddra.mdb - para o arquivo login_action.asp

sub abreconexao
constring="provider=microsoft.JET.OLEDB.4.0;Data Source=" & Server.MapPath("db/quaddra.mdb")
Set conexao=Server.CreateObject("ADODB.Connection")
conexao.open constring
end sub

sub fechaconexao
set conexao=nothing
end sub
%>

Compartilhar este post


Link para o post
Compartilhar em outros sites

olha ete exemplo

 

<!--#include file="conn/conexao1.asp"--> 
<% call abreconexao
			
  'crio o rs
  set rs=Server.CreateObject("ADODB.Recordset")
  'crio o SQL
  SQL="SELECT * FROM login ORDER BY login"
  rs.open SQL,conexao,1,3

onde conexao1.asp

 

<% '----------------------
'    este arq. serve para estabelecer a conexao com o BD em Access
'    de nome quaddra.mdb - para o arquivo login_action.asp

sub abreconexao
constring="provider=microsoft.JET.OLEDB.4.0;Data Source=" & Server.MapPath("db/quaddra.mdb")
Set conexao=Server.CreateObject("ADODB.Connection")
conexao.open constring
end sub

sub fechaconexao
set conexao=nothing
end sub
%>

 

O colega o problema é q esta palavra "conexao" na consulta pode mudar dependendo do registro selecionado.. ou seja, a tabela consultada serão sempre iguais.. mas o banco de dados é outro para cada registro. Entendeu?

 

preciso criar algo assim:

BRASIL = RsAnterior("conexao")
'crio o rs
  set rs=Server.CreateObject("ADODB.Recordset")
  'crio o SQL
  SQL="SELECT * FROM login ORDER BY login"
  rs.open SQL,BRASIL,1,3
[/code]

 

Será q é possivel fazer desta forma?

 

De qualquer forma..

valeuuuu

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.