none
Query builder = Aniversariantes RRS feed

  • Pergunta

  • Ola , eu constriu um sistema em vb2005 + sql2005  ( no modo wizard )

    no banco de dados tem uma tabela contatos no formato (smalldatetime ) armazenando a data de nascimento dos respectivos contatos .

     

    eu preciso montar um pesquisa para achar os aniversariantes do periodo :

     

    SELECT     Cont_Codigo, Cont_Cod_Cli, Cont_Nome, Cont_Email, Cont_Data, Cont_Celular, Cont_Fax, Cont_Fone, Cont_Ramal, Cont_Cli_Razao
    FROM         Contatos
    WHERE     (Cont_Data BETWEEN @DataInicio AND @DataFinal) 

     

    a funcao a cima esta funcinando assim = 01/01/2007  a  01/02/2007

     

     EU PRECISO TIRAR O ANO DA PESQUISA .

    eu tentei o format como eu usava no vb 60 mas deu certo.

     

    obrigado

    Renato

     

    sexta-feira, 2 de novembro de 2007 12:34

Respostas

  • Achei uma " Solução " talves nao seja a melhor mas funcionou !!!

     

    SELECT     Cont_Codigo, Cont_Cod_Cli, Cont_Nome, Cont_Email, Cont_Data, Cont_Celular, Cont_Fax, Cont_Fone, Cont_Ramal, Cont_Cli_Razao
    FROM         Contatos
    WHERE     (MONTH(Cont_Data) BETWEEN @MesInicio AND @MesFinal) AND (DAY(Cont_Data) BETWEEN @DiaInicio AND @DiaFinal)

     

    No Form inclui 4 obj.text  " MesInicio,MesFinal,DiaInicio,Diafinal"

     

    e o botao pesquisa ficou  assim

     

    Me.ContatosTableAdapter.FiltroAniversario(BD_representaDataSet.Contatos, MesInicio.Text, MesFinal.Text, diaInicio.Text, diaFinal.Text)

    If ContatosAniversarioBindingSource.Count > 0 Then

    Me.Aniversariantes.SetDataSource(Me.BD_representaDataSet)

    CrystalReportViewer1.ReportSource = Aniversariantes

    End If

     

    se alguem tiver sujestao ou correcao , por favor coloque aqui .

     

    Renato

    sábado, 3 de novembro de 2007 13:22