[VBS] Salvare nella current directory

[fenny]

Ciao a tutti, ho da farvi una domanda stupida purtroppo

Ho creato un file vbs che punta all'Active Directory e mi scrive su un file di Excel l'elenco degli utenti presenti.

Il mio problema è che non riesco a salvare questo file nello stesso posto dove è presente il vbs.

Vi riporto il mio codice.

objExcel.ActiveWorkbook.SaveAs "Export.xls"
objExcel.ActiveWorkbook.Close
objExcel.Application.Quit

Così facendo mi salva il file Export.xls sotto "Documenti".

Sò che probabilmente è una cosa stupida ma non essendo programmatore non ne capisco molto.

Grazie anticipatamente per il vostro aiuto.
Ciao

[MdE2005]

Devi fare così:

dim fobj 

set fobj = createobject("scripting.filesystemobject")

path = fobj.getabsolutePathname("") 

msgbox path

set fobj = nothing

Praticamente il percorso del tuo file.vbs è nella variabile "path"

Ciao

[fenny]

Sei un grande!
Funziona!
Eheh scusate se ho aperto un thread per una cosa così banale!

[MdE2005]

Originariamente inviato da fenny
Sei un grande!
Funziona!
Eheh scusate se ho aperto un thread per una cosa così banale!

Grazie

Cmq chiedere aiuto è sintomo di umiltà, che non va mai male, e cmq dal momento che il tuo thread rispetta a pieno il regolamento, stai tranquillo/a e non scusarti..

A presto