A partire da utilissime indicazioni trovate qui su icaa, ho sviluppato
una routine che fa una copia zippata di backup del BE su una directory
condivisa situata su un altro pc, utilizzando le dll zip32 e unzip32:
...
 If MakeZip(origineDati, destinazione) = True Then
...
Vorrei però, prima di fare il backup, verificare se la connessione
alla directory condivisa è attiva.
Dopo un'intera mattinata trascorsa a spulciare il sito comune, quello
di Karl e quello di Ale, oltre che qui su icaa, ho trovato solo
routines per mappare unità di rete, per creare o rimuovere il
collegamento, ma niente che si limiti a verificare se il collegamento
è attivo.
Per ora ho risolto così:
Public Function TestConnessione(unita As String) As Boolean
Dim Rete As String
On Error GoTo Skonness
Rete = Dir(unita, vbDirectory)
If Len(Rete) = 0 Then
Else
TestConnessione = True
End If
Exit Function

Skonness:
    TestConnessione = False
End Function
La routine funziona bene, ma il problema è che se la connessione è
attiva la verifica è rapidissima, ma se non lo è il tempo di verifica
è lunghissimo.
Non c'è qualche altro modo?
Grazie a chi mi vorrà dare una mano.

Ah, ancora una cosa (è una notizia, non una richiesta):
quando creo il file zip come detto all'inizio, succede che se la
creazione viene fatta da due pc diversi sulla stessa directory
condivisa, il file zip finisce per contenere due copie identiche del
BE. Strano!
Ebola