Newsgroup: it.comp.appl.access
Titolo: Vai a con valori multipli

In una maschera continua come posso fare in modo che, selezionando i valori
da tre combobox non associate, Access si sposti al record che coincide con
la combinazione dei tre valori selezionati precedentemente (non filtrando)?
-- 
Grazie in anticipo.
Alexx

 ha scritto nel messaggio
news:2reaegF...@uni-berlin.de...

Usa l'AUTOCOMPOSIZIONE della ComboBox per fare questo
poi nel criterio inserito nel Metodo FindFirst unisci invece
del criterio singolo l'AND o l'OR delle 3 Combo....!!
Fai un tentativo se non riesci posta il Codice che hai tentato
di usare.....!
Ciao.
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------

 ha scritto nel messaggio
news:cissd8$4f9$1...@lacerta.tiscalinet.it...

Ciao, ho fatto cosě e mi sembra funzionare:
Private Sub VaiA_Click()
    ' Trova il record corrispondente al controllo
    Dim rs As Object
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[id artista] = " & Str(Nz(Me![cboArtista], 0)) & " AND [id
supporto] = " & Str(Nz(Me![cboSupporto], 0))
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
Tuttavia ho notato che l'utente č obbligato a mettere tutti i criteri di
ricerca, altrimenti la ricerca non parte...

 ricerca, altrimenti la ricerca non parte...
Già ho scordato di dirtelo.....!!!
Un'altra cosa non dichiarare variabili di tipo Object
se sai cosa stai usando...!
Presumo ti stia usando ADO, con DAO non avrebbe senso
l'assegnazione del Recordset quando gestisce il Clone in modo diretto....!
Ho notato che hai convertito in Stringa, ho pensato ad un errore, nel caso
fossero stringhe aggiungi i doppi apici.....!
Private Sub VaiA_Click()
     ' Trova il record corrispondente al controllo
     Dim rs As ADODB.Recordset
    Dim strC1 as string
    dim strC2 as String
    Dim strC3 as string
     Set rs = Me.Recordset.Clone
    strC1="[id artista] = "  &  Me![cboArtista]  & " OR "  & Me![cboArtista]
& " IS Null"
    strC2="[id supporto] = "  & Me![cboSupporto]  & " OR "  &
Me![cboSupporto]  & " IS Null"
    '//    Dov'è la 3° condizione...... ti è scappata...?
    strC3="[id artista] = "  &  Me![cboArtista]  & " OR "  & Me![cboArtista]
& " IS Null"
     rs.FindFirst strC1 & " AND "  & strC2 & " AND " & strC3
     If Not rs.EOF Then Me.Bookmark = rs.Bookmark
 End Sub
Ciao



il codice che mi hai suggerito non va, in particolare non riconosce il
metodo findfirst.
Ho aggiunto i riferimenti alle librerie ado 2,7, ma non va lo stesso.

 wrote in message 
news:2rehdhF...@uni-berlin.de
[CUT]
Private Sub VaiA_Click()
     ' Trova il record corrispondente al controllo
     Dim strC1 as string
     dim strC2 as String
     Dim strC3 as string
     strC1="[id artista] = "  &  Me![cboArtista]  & " OR "  &
 Me![cboArtista]
 & " IS Null"
     strC2="[id supporto] = "  & Me![cboSupporto]  & " OR "  &
 Me![cboSupporto]  & " IS Null"
     '//    Dov'è la 3° condizione...... ti è scappata...?
     strC3="[id artista] = "  &  Me![cboArtista]  & " OR "  &
 Me![cboArtista]
& " IS Null"
      With Me.RecordsetClone
        .FindFirst strC1 & " AND "  & strC2 & " AND " & strC3
        If Not .EOF Then Me.Bookmark = .Bookmark
      End With  
End Sub
Io speravo usassi DAO....!
Deseleziona ADO e seleziona DAO.
Verifica la Stringa strC1 strC2 e strC3 con gli accapo
e la formattazione stringa....!
Ciao
@Alex.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG