Newsgroup: it.comp.appl.access
Titolo: errore che non capisco

ho una combobox Marca, una Modello ed una Specifiche
per semplicita' mettiamo che tutte facciano parte della stessa tabella
ho scritto quanto segue:
Private Sub Marca_AfterUpdate()
Me!Modello.RowSource = "SELECT Modello FROM Magazzino WHERE Marca LIKE 
'*" & Me!Marca & "*';"
Me!Modello.Requery
End Sub
Private Sub Modello_AfterUpdate()
Me!Specifiche.RowSource = "SELECT Specifiche FROM Magazzino WHERE 
Modello LIKE '*" & Me!Modello & "*';"
Me!Specifiche.Requery
End Sub
la prima sub marca funziona correttamente
la seconda (da modello a specifiche) no
mi dice *"proprieta' o metodo non supportate dall'oggetto"*
la query, analizzandola, da i valori corretti a Modello LIKE Me!Modello 
(i valori nel debug sono corretti) ma a Specifiche mi mette NULLO per 
quanto, a mano, in sql, la query torni i risultati corretti
come mai?
-- 
Umin
n. p.: DAVID BOWIE - Track 17

 wrote in message
news:mn.a2f67d594...@libero.it

Sinceramente è strano, ma trovo poco utile nel tuo caso
l'utilizzo di LIKE essendo la scelta obbligata.
Condiziona il tutto al controllo di Null restituito dalla Combo...!
 Private Sub Marca_AfterUpdate()
 Me!Modello.RowSource = "SELECT Modello " & _
                        "FROM Magazzino " & _
                        "WHERE Marca = '" & Me!Marca & "'"
                        "ORDER BY Modello;"
 Me!Modello.Requery
 End Sub
Mi immagino che le 3 Combo siano in cascata pertanto con
l'After Update della 1° tu debba annullare e disabilitare 
quelle in cascata in modo opportuno....!
Pertanto io metterei nell'Evento dopo aggiornamento di Marca:
Me!Specifica=Null
Me!Specifica.Enabled=False
Questo perchè altrimenti la RowSource di Specifica
sarebbe errata, Specifica infatti deve essere composta da
2 Criteri come sotto, ma io gestirei anche l'ENABLED
per non complicarti la vita:
Private Sub Modello_AfterUpdate()
 If IsNull(Me!Marca) OR IsNull(Me!Modello) Then Exit Sub
 Me!Specifiche.RowSource = "SELECT Specifiche " & _
                           "FROM Magazzino " & _
                           "WHERE Marca = '" & Me!Marca & "' "
                           "AND " & _
                           "Modello='*" & Me!Modello & "*' "
                           "ORDER BY Specifiche;" 
 Me!Specifiche.Requery
 End Sub
Facci un pensiero ed ottimizzalo come ritieni meglio.
Saluti
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Facci un pensiero ed ottimizzalo come ritieni meglio.
grazie mille per la dritta, pero' non funziona lo stesso!
:(
-- 
Umin
n.p.: Sigur Rós - Avalon [stop]

 :(
qualcuno bestemmi per me, please
avevo impostato due colonne nel campo della combobox di specifiche
per questo mi dava sempre NULL!!!!
aaaaaaaaaaaaaaaaaaaaaaaaaaaaaah!
-- 
Umin
n. p.: Radiohead - Dollars And Cents

 aaaaaaaaaaaaaaaaaaaaaaaaaaaaaah!
Sai che chi è causa del suo mal deve piangere se stesso..!
;-)
In ogni caso è più facile che l'errore venga da noi che da
Access.


> qualcuno bestemmi per me, please
Fatto. Serve altro?
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Access.
beh, oggi per esempio ho dovuto scontrarmi con il fatto che vb 
insistesse nel chiamare (cioe' nel correggere automaticamente) con il 
vecchio nome campo che avevo rinominato
e' stata dura sistemarlo a dovere >:|
:)
-- 
Umin
n. p.: Dave Matthews Band - The Best Of What's Around

 Fatto. Serve altro?
... sapessi! ma e' meglio che non inizi con la lista delle richieste... 
tra le quali metterei anche, al momento, una donna... :D
-- 
Umin
n. p.: Dave Matthews Band - What Would You Say

 :)
Togli correzione automatica del nome e non usare parole riservate
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it