Quantcast
Channel: Visual Basic Tips and Tricks
Viewing all articles
Browse latest Browse all 2212

Visual Studio 2017

$
0
0

Salve a tutti,

ho un problema con Like di sql, in generatore di query di visual studio funziona correttamente mentre quando provo a visualizzare il risultato della query in un datagrid non mi visualizza niente, potete dirmi dove sbaglio. 

 

 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        Dim Desc As String
        Dim data1 As String
        Dim data2 As String

        Desc =  UCase(TextBox1.Text)

        If Desc <>"" Then
            data1 = Mid(Date.Today, 7, 4) & Mid(Date.Today, 4, 2) & Mid(Date.Today, 1, 2)
            data2 = Mid(Date.Today, 7, 4) & Mid(Date.Today, 4, 2) & Mid(Date.Today, 1, 2)


            Me.DataTable6TableAdapter.Fill(Me.EssepiuDataSet.DataTable6, Desc, data1, data2)
        Else
            MsgBox("Inserire Descrizione Articolo")
        End If
    End Sub

la query:

 

SELECT ARTICOLI.cod__articolo, ARTICOLI.variante_articolo, ARTICOLI.descrizione_articolo, LPUBRIG.tipo_listino_pubblico, LPUBRIG.numero_listino_pubblico, LPUBRIG.data_decorrenza_pubb_, LPUBRIG.data_scadenza_pubb_, LPUBRIG.prezzo_al_pubblico
FROM     ARTICOLI INNER JOIN LPUBRIG ON ARTICOLI.cod__articolo = LPUBRIG.cod__articolo
WHERE  (ARTICOLI.descrizione_articolo LIKE '%' + @Desc + '%') AND (LPUBRIG.data_decorrenza_pubb_ <= @InData) AND (LPUBRIG.data_scadenza_pubb_ >= @FiData)

 

Grazie

 


Viewing all articles
Browse latest Browse all 2212