[vb.net]combobox and query

[Mircodj]

raga ho un problema.forse banale per voi ma io non riesco a risolverlo.
quando faccio la query,con il mio codice, secondo voi ho specificato bene il codice per farmi cercare l'elementi selezionati nei combobox?
questo è il codice

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim sc As String
        sc = ComboBox1.SelectedItem
        Dim sc2 As String
        sc2 = ComboBox2.SelectedItem
        m_cnConnessioneADO.CursorLocation = ADODB.CursorLocationEnum.adUseClient
        m_cnConnessioneADO.Open("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=C:\Documents and Settings\Mirco Web Master\Documenti\Coktail.mdb.mdb")
        Dim sql As String
        sql = "SELECT * FROM Alcolici WHERE (Ingredienti= sc)and (ingredienti=sc2) "
        NomeCok.Text = ""
        m_rsAlcolici.Open(sql, m_cnConnessioneADO, ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockOptimistic)
        ' A questo punto hai il record  
        ' ma (prima) lo chiudevi subito  
        ' Questa istruzione, poi, la facevi sempre prima 
        ' della Open 
        If m_rsAlcolici.RecordCount > 0 Then
            NomeCok.Text = m_rsAlcolici.Fields("Nome").Value

        End If
        m_rsAlcolici.Close()
        m_cnConnessioneADO.Close()
    End Sub
End Class

non so se va bene così solo penso di no perchè nella casella di testo NomeCok non mi visualizza nulla.

[Brainjar]

Scusa, ma la tabella Alcolici, ha sempre la stessa struttura ?
Il campo Ingredienti contiene sempre una serie di ingredienti
separata da virgole ?

Ciao,

[Mircodj]

si sempre la stessa struttura e il campo ingredienti ingredienti separati da virgole

[Brainjar]

Allora la query, così, non ti funzionerà mai. Devi usare la soluzione
che andava bene la settimana scorsa, quella con le LIKE.
Devi sostituire il valore che trovi nella combo nella query,
esattamente nel punto dove prima avevi "tequila" ecc.... .

L'unico intervento che adesso devi fare è quello di eliminare le If.
Che peraltro hai già fatto.

Dim sc As String
Dim sc2 As String

sc = ComboBox1.SelectedItem.Text
sc2 = ComboBox2.SelectedItem.Text

.....
.....

sql = "SELECT * FROM Alcolici WHERE (Ingredienti LIKE '%" & sc & "%' ) And (Ingredienti LIKE '%" & sc2 & "%')"

Ciao,

[Mircodj]

brainjar ecco il mio codice del bottone cerca ma non va?

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        m_cnConnessioneADO.CursorLocation = ADODB.CursorLocationEnum.adUseClient
        m_cnConnessioneADO.Open("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=C:\Documents and Settings\Mirco Web Master\Documenti\Coktail.mdb.mdb")
        Dim sc As String
        sc = ComboBox1.SelectedItem.text
        Dim sc2 As String
        sc2 = ComboBox2.SelectedItem.text
        Dim sql As String
        sql = "SELECT * FROM Alcolici WHERE (Ingredienti LIKE '%" & sc & "%' ) And (Ingredienti LIKE '%" & sc2 & "%') "
        NomeCok.Text = ""
        m_rsAlcolici.Open(sql, m_cnConnessioneADO, ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockOptimistic)
        ' A questo punto hai il record  
        ' ma (prima) lo chiudevi subito  
        ' Questa istruzione, poi, la facevi sempre prima 
        ' della Open 
        If m_rsAlcolici.RecordCount > 0 Then
            NomeCok.Text = m_rsAlcolici.Fields("Nome").Value
        End If
        If Not m_rsAlcolici.ActiveConnection Is Nothing Then m_rsAlcolici.Close()
        m_cnConnessioneADO.Close()
    End Sub

End Class

ho fatto come hai detto tu ma mi da un errore e mi evidenzia una riga del codice in giallo

[Brainjar]

Quale riga ?
Scommetto questa :

sc = ComboBox1.SelectedItem.text

Caio,

[Mircodj]

no questa
m_cnConnessioneADO.Open("Provider=Microsoft.Jet.OL EDB.4.0;" & "Data Source=C:\Documents and Settings\Mirco Web Master\Documenti\Coktail.mdb.mdb")

[Brainjar]

C'è un .mdb di troppo alla fine della riga.

Ciao,

[Mircodj]

che stupidoooooooooooooooooooooooooooooooooooo!!!!!
funziona!!!!!!!!!!!!!!!!!
scusami ma sono proprio scemo!!!
non me ne ero accorto. adesso funziona.
grazie mille.
se non esistessi ti dovrebbero inventare
grazie

[Brainjar]

Grazie.
Quello che vorrei sapere è: perchè hai eliminato le LIKE dalla query?

Ciao,