Newsgroup: it.comp.appl.access
Titolo: Comando ricerca in tutti i campi

ciao a tutto il ng,
è possibile creare un comando che effettui la ricerca
in tutte le maschere del mio db e poi mi faccia vedere il risultato?
grazie
Tiziano
--------------------------------
Inviato via 
http://usenet.iol.it



dim a as form
for each a in forms
	fai quello che vuoi
next
Saluti.
Emanuele.

 Emanuele.
Ciao,
ti chiedo una delucidazione... devo "dichiarare anche tutti i campi della
forms o con quel "for aech a in forms" automaticamente prende tutti i valori
della forms?!
Grazie ancora
Tiziano



for each a in forms di cicla tutte le forms
poi devi sapere tu cosa cercare nelle form
ad esempio piou fare un ciclo sul controls della form
cercando i campi....
dipende da cosa vuoi fare...
tempo fa sul NG era stato postato qualcosa a riguardo se non ricordo
male
Saluti.
Emanuele.

 Emanuele.
Ciao grazie comunque delle informazioni che mi stai dando...
ciò che vorrei forse creare è una maschera non associata e in un controllo
non associato combobox potrebbe far vedere i nomi delle maschere, in un'
altra combobox selezionare i campi e in campo testo fargli fare la
ricerca...
poi altro problema potrebbe essere far richiamare la maschera ma qui mi stò
addentrando in un mondo a me sconosciuto...
Ciao e grazie
Tiziano

ciao,
vediamo se cosě potrebbe essere fattibile..
mi creo una tabella con due campi:
 1 con un valore numerico
2 nomi delle maschere piů un campo asterisco per fare ricerche in tutte le
maschere
poi creo un altra
con i nomi dei campi sempre nello stesso modo della tabella sopra
e nel campo testo della maschera non associata faccio fare la ruotine?
Puň funzionare sono sulla strada giusta?
Ciao Tiziano

Ciao Tiziano
forse è meglio che tu mi dica prima cosa vuoi ottenere..
cosa devi fare?
Saluti.
Emanuele.

Emanuele.
Ciao ciň che vorrei creare č una ricerca globale in
tutto il db che prenda in considerazione tutti i campi di tutte le tabelle
del db, e poi possa visualizzare i risultati di questa ricerca.
secondo
tipo di ricerca č legato alla stessa maschera/e che l'utente usa per
l'implementazione e su quella fare le ricerche...
 per il secondo caso
credo debba creare una query in cui non sia possibile modificare i dati ma
solo filtrarli...e darla come origine della maschera.
Ancora nebuloso il
discorso?!
Grazie per la considerazione.
Tiziano
uguale a quella che
l'utente usa per implementare i dati


Ciao,
forse avrei trovato un modo per ovviare a quesa modalità di ricerca.
Questa è una parte della routine che ho trovato nel db(dal sito
comune)Ricercaparolachiave.mdb
come vedi effettua la ricerca nel campo "DescrAppuntamento" è possibile
inserire il nome della tabella al posto del record specifico?
così dovrebbe effettuare la ricerca in tutta la tabella...
Sbaglio?
GRazie Tiziano
Dim ChiaveRic As String
ChiaveRic = "[DescrAppuntamento] Like " & Chr$(34) & Me!Prima & Chr$(34)
If Not IsNull(Me!Seconda) Then
    ChiaveRic = ChiaveRic & " " & Me!ANDOR & " [DescrAppuntamento] Like " &
Chr$(34) & Me!Seconda & Chr$(34)
End If
If Not IsNull(Me!Terza) Then
    ChiaveRic = ChiaveRic & " " & Me!ANDOR & " [DescrAppuntamento] Like " &
Chr$(34) & Me!Terza & Chr$(34)
End If
If Not IsNull(Me!Quarta) Then
    ChiaveRic = ChiaveRic & " " & Me!ANDOR & " [DescrAppuntamento] Like " &
Chr$(34) & Me!Quarta & Chr$(34)
End If
    Me.Visible = False
    DoCmd.Hourglass True
    Forms!Appuntamenti.SetFocus
    DoCmd.ApplyFilter , ChiaveRic
    If Forms!Appuntamenti.RecordsetClone.RecordCount = 0 Then
        DoCmd.Hourglass False
        strTitolo = "Ricerca con esito negativo"
        strMsg = "Non esistono appuntamenti che soddisfano questi criteri"
        IntFinestraMsg = vbExclamation
        IntNuovo = MsgBox(strMsg, IntFinestraMsg, strTitolo)
        DoCmd.ShowAllRecords
    End If
    DoCmd.Hourglass False
    Me.Visible = True
    Me!Comando18.SetFocus
    Me!Comando20.Visible = False
    DoCmd.Close
End If
End Sub

del db, e poi possa visualizzare i risultati di questa ricerca.
dovresti quindi cercare in ogni campo di ogni tabella di tutto il
database...
quindi nell'ordine...
scorrere tutte le tabelle
  scorrere tutti i campi di singola tabella
    a seconda tipo dati da cercare
       controllare tipo dati campo
          se uguali cercare nel campo
             se trovato visualizzare dove sono
	continua
          continua
       continua
   continua
continua
fine ricerca
questo dovrebbe essere in metacodice, la realizzazione č un pň lunga,
sei sicuro che ne valga la pena o č solo uno sfizio di programmazione?
Saluti.
Emanuele.

l'implementazione e su quella fare le ricerche...
tipo il filtro in base a maschera? per ogni singola maschera?
Saluti.
Emanuele.