Restituzione percorso corrente

**nanu_90** · 22-07-2006, 17:41

ciao a tutti
vi spiego subito qual'e il mio problema.
ho un vbs in una directory x e devo far si che restituisca x.
ad esempio: se questo file si trova in C: restituirà C:, se si trova sul desktop restituira C:\doments and settings\utente\desktop. GetSpecialFolder non va bene in quanto deve poter essere eseguito in qualsiasi cartella.

**Emulator ®** · 22-07-2006, 17:49

Tramite la funzione App.Path naturalmente.

codice:

Dim Percorso As String
Percorso = App.Path

ciao

**nanu_90** · 22-07-2006, 17:59

deve essere un file eseguibile da vbs

**Emulator ®** · 22-07-2006, 18:04

ah... ehehe scusami allora!

**nanu_90** · 22-07-2006, 18:43

figurati... nessuno ha un'idea?

**MItaly** · 23-07-2006, 11:48

Puoi usare il metodo CurrentDirectory dell'oggetto WScript.Shell:

codice:

Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
MsgBox WshShell.CurrentDirectory 'Visualizza la directory corrente

**nanu_90** · 23-07-2006, 11:56

Grazie 1000!

**MItaly** · 23-07-2006, 12:13

Non c'è di che.

Discussione: Restituzione percorso corrente

Strumenti discussione

Ricerca discussione

Visualizza

Restituzione percorso corrente

Permessi di invio