USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Modificar uma consulta em ADO
ED - Clarett
não registrado
Postada em 26/07/2006 13:44 hs   
Como faço para mudar uma consulta usando ADO?
Em DAO Fazia assim:
 
    Set Qd = bd.QueryDefs("ConsForm")
    Qd.SQL = "SELECT Conf.* From Conf WHERE Conf.Título Like ""InfGerais"""
e em ADO como faço?
Por faço me passem o codigo passo-a-passo
 Muito obrigado...abraços
 
 
     
Cardoso G
Pontos: 2843 Pontos: 2843
PATOS DE MINAS
MG - BRASIL
Postada em 26/07/2006 14:21 hs            
dim rs as adodb.recordset
 
set rs = new rs.adodb.recordset
 
rs.open "select * from tabela", conexao
     
ED - Clarett
não registrado
Postada em 26/07/2006 15:13 hs   
Cardoso...
O exemplo que deu não retorna a nada... vou explicar melhor...
É como o exemplo DAO que mostrei acima..
Preciso consultar algo na Query já criada de nome "ConsForm"
Entendeu?
 
Obrigado pelo apoio
 
     
ghost_jlp
Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843
SÃO PAULO
SP - BRASIL
Postada em 26/07/2006 17:00 hs            
vc quer fazer um filtro da sua query?
Tipo vc seleciona todos os clientes:
 
Select *from clientes
 
Depois vc quer filtrar os clientes com nomes q comecem com B,C etc...
Isso sem abrir outro recordset, usando o mesmo recordset.
 
É isso?
     
Elieser Topassi
Pontos: 2843 Pontos: 2843
SÃO JOSÉ DO RIO PRETO
SP - BRASIL
Postada em 26/07/2006 17:10 hs            
dim rs as adodb.recordset
set rs = new rs.adodb.recordset
set rs.ActiveConnection = bd ' aqui vc poe sua conexao...
rs.open "SELECT Conf.* From Conf WHERE Conf.Título Like ""InfGerais & """


Elieser Carlos Topassi
Analista de Sistemas - Desenvolvedor VB/ASP/.Net

e-mail/msn:
elieser_topassi@yahoo.com.br
São José do Rio Preto,SP - Brasil
_____________________________________________________
Emoções "O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)

     
Cardoso G
Pontos: 2843 Pontos: 2843
PATOS DE MINAS
MG - BRASIL
Postada em 26/07/2006 17:14 hs            
dim rs as adodb.recordset
 
set rs = new rs.adodb.recordset
 
rs.open "select * from consulta", conexao
     
Página(s): 1/2      PRÓXIMA »


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2026   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página