Con l'API GetModuleFileName si ottiene il percorso completo del programma.
lpszFilename = Space$(260)
lpszFilename = Left$(lpszFilename, GetModuleFileName(GetModuleHandle(0), lpszFilename, 260))
Poi si deve solo verificare se nel percorso appare, ad esempio, '\\SERVER\', e quindi si sa che è remoto. Se c'è scritto 'C:\Programmi\', è in locale.
Giovanni
---
Ducunt fata volentem, nolentem trahunt