salve a TUTTI... programmatori incalliti...
Io sono "tuono_2000"...
Avrei bisogno di conoscere i "comandi" per dichiarare una cartella, definita "FILE", condivisa in una rete LAN...
Io impiego questo controllo per creare la cartella ma nella creazione mi manca la condivisione...
Lo scopo di questo è per poter "trasferire" all'accensione del mio programma un "gruppo di file" che vengono aggiornati ogni ora.
Grazie in anticipo per aver cercato di aiutarmi...codice:Rem controllo se la directory esiste o la creo Dim X, C, S C = FILE rem creazione oggetto di di gestione Set X = CreateObject("Scripting.FileSystemObject") If (X.FolderExists(FILE)=true) Then 'controllo esistenza cartella rem cartella esistente msgbox "Cartella " & UCase(file) & " - " 'nome completo cartella,vbinformation,"cartella esistente" Else rem cartella non esistente MkDir (FILE) 'realizzazione cartella rem # condivisione cartella in LAN # End If

Rispondi quotando