• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

Chamuanza

Select que não funciona

5 mensagens neste tópico

Boas Pessoal

Estou com uma situação e agradeço ajuda

Tenho um Form que abre com uma datagridview criada atraves do wizard, e pretendo fazer um select para saber quem faz anos no mes currente.

Estou a utilizar o codigo abaixo descrito, mas não consigo por o select a funcionar.

Obrigado desde já pela atenção

 Private Sub Button14_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button14.Click

        Label2.Text = "Aniversários do Mês"
        Label2.Visible = True
        Label2.ForeColor = Color.Red

    
        Dim conn As New OleDbConnection()
        conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\AgendaAnosVB6\AgendaAnosNova\AgendaAnos.mdb"
        Dim ds As New DataSet
        Dim cmd As OleDbCommand = conn.CreateCommand
        Dim DataMes As Date = Today


        cmd.CommandText = "Select Nome, Sobrenome, Endereco, Nascimento " & _
                          "From Amigos " & _
                          "Where Nascimento = DatePart(DateInterval.Month, DataMes) "

        conn.Open()

        Dim leitor As OleDbDataReader = cmd.ExecuteReader()

        Try
            AmigosDataGridView.DataSource = ds.Tables("Amigos")

            leitor.Close()
            conn.Close()

        Catch erro As Exception
            MsgBox("Erro " & vbCrLf & erro.ToString, MsgBoxStyle.Critical, "Erro")
        End Try

    End Sub

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Por lapso coloquei mal este topico agradeço a movimentação do mesmo para o sitio certo

Obrigado

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

cmd.CommandText = "Select Nome, Sobrenome, Endereco, Nascimento " & _

                          "From Amigos " & _

                          "Where Nascimento = DatePart(DateInterval.Month, DataMes) "

Não podes usar aqui o DateInterval.Month, n é reconhecido pelo SQL.

Pesquisa sobre como adicionar parametros nas querys sql em vb.net

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora