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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  ###COMO GERAR UM REL. NO DATAREPORT BASEADO NO....
Dário Cardoso
não registrado
Postada em 18/09/2006 11:36 hs   
BOM DIA
 
Tenho que gerar um relatorio de aniversáriantes, é o seguinte: No Form de cadastro de membros tenho um cambo que informo o mes do aniversário (ex: JANEIRO) que é gravado no BD: CADASTRO, TABELA: TAB1, CAMPO: D2_mes, pois bem, e em outro form Aniversariantes_mes, tenho um COMBO com os meses, ai que tá, EU QUERIA SABER COMO FAÇO PARA GERAR UM RELATORIO NO DATAREPORT BASEADO NO MES QUE EU ESCOLHER NA COMBO...
Eu já coloquei no Enviromment o comando: SELECT * FROM CADASTRO WHERE D2_mes = 'JANEIRO' , Funciona! pois informei o mes na unha!!!!
 
Se alguem tem um exemplo, favor posta aí!
 
DESDE JA AGRADEÇO
 
DÁRIO CARDOSO
"Nada de bom vem facil"
     
CSRocha
BRASILIA
DF - BRASIL
Postada em 18/09/2006 11:52 hs            
Pega o valor da combo numa variavel: qMes

"Select * From Cadastro Where D2_mes = '" & qMes & "'"


     
Dário Cardoso
não registrado
Postada em 18/09/2006 12:20 hs   
Olá CSRocha!
 
Mas isso seria no Enviromment ou no evento click do botão que abri o relatorio?????
     
CSRocha
BRASILIA
DF - BRASIL
Postada em 18/09/2006 13:20 hs            
Não sei, pois não o utilizo. Só corrigi a tua chamada SQL... deve ser alterada lá onde você já testou, OK?

Agora, a variável deverá ser gerada no evento click, pois pegará o que foi escolhido na combo. E atenção: essa variável deverar ser declarada no inicio do Form, como Private e não apenas no botão.

     
Dário Cardoso
não registrado
Postada em 19/09/2006 12:29 hs   
Alguem tem um exemplo pra mim!!!
 
Por favor!!!
     
PH1959
Pontos: 2843
SÃO JOSÉ DOS CAMPOS
SP - BRASIL
Postada em 19/09/2006 12:37 hs            
no evento click do combo
private sub comboMes_click
qMes= comboMes.text
 
     
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-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página