Ciao ragazzi. Ecco il mio nuovo dilemma.
Devo gestire la condizione che un db sia pieno o vuoto in una form.
Mi spiego meglio: ho un db, nel momento in cui questo è vuoto, quando carico il form, da cui carico le informazioni del db, devo poter avere un msg "DB VUOTO". Quando successivamente accedo nuovamente allo stesso form, ma nel db ho inserito dei dati, mi deve lasciar accedere alle info del db.
Il mio problema è dove mettere la condizione.
Io ho fatto così:
codice:
Private Sub Form_Activate()

   If (RsOrdNFor.BOF = True And RsOrdNFor.EOF = True) Then
       MsgBox "Nessun Fornitore esistente per creare un ordine"
    Else
       Inizializza_Combo 'Questa attività se esistono fornitori
       ControlloDB = False
   End If

End Sub

Private Sub Form_Load()

   CnOrdNCli.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data " & _
                  "Source=GetsMag.mdb;"
   CnOrdNCli.CursorLocation = adUseClient
   qOrdNFor = "SELECT * FROM Fornitori"
 
   RsOrdNFor.Open qOrdNFor, CnOrdNCli, adOpenDynamic, _
              adLockOptimistic
  
End Sub

Il problema insomma è in quale evento mettere il controllo.
L'ho messo nell' "Activate", perchè questo form perde il focus, quando bisogna inserire un fornitore.Poi lo riacquista a fornitore inserito.

Mi aiutate?



****************
Nota del moderatore: invece delle righe bastava utilizzare i tag appositi per il codice: [*code][*/code] (senza *)