Test Foro de elhacker.net SMF 2.1

Programación => Scripting => Mensaje iniciado por: tonilogar en 16 Diciembre 2009, 22:41 PM

Título: (VBScript) "abrir ventana en el ultimo directorio seleccionado"
Publicado por: tonilogar en 16 Diciembre 2009, 22:41 PM
Un saludo a todos de nuevo.
He echo un pequeño script, y lo primero que hace es abrir una ventana para seleccionar un directorio.
La pregunta es.
¿Hay forma de ejecutar el scrip y la ventana se  habrá en el ultimo directorio que seleccione?

Código (vb) [Seleccionar]
Set fso = CreateObject("Scripting.FileSystemObject")
Set ws = CreateObject("WScript.Shell")
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.BrowseForFolder(0, "SELECCIONEU UN DIRECTORI:", 0, 0)
If objFolder Is Nothing Then
MsgBox("L'aplicacio s'ha cancelat")
Wscript.Quit
    else
        FolderExists = fso.FolderExists (objFolder.self.path )
    end if


Un saludo y gracias por vuestro tiempo.
Título: Re: (VBScript) "abrir ventana en el ultimo directorio seleccionado"
Publicado por: Novlucker en 16 Diciembre 2009, 22:44 PM
Por defecto no :-\ , pero puedes utilizar un archivo temporal a modo de "configuración"

Saludos
Título: Re: (VBScript) "abrir ventana en el ultimo directorio seleccionado"
Publicado por: tonilogar en 17 Diciembre 2009, 01:10 AM
Gracias Novlucker.
Supongo que la teoría es esta....Guardar la variable de la dirección en un fichero c:/temp/direccion.txt (por ejemplo) y de este fichero leer donde se tiene que abrir la ventana.

¿O hay alguna forma mas simple?
Un saludo y gracias por tu tiempo.
Título: Re: (VBScript) "abrir ventana en el ultimo directorio seleccionado"
Publicado por: Novlucker en 17 Diciembre 2009, 02:53 AM
Siento no haber respondido antes, ... eso mismo, no es para nada "bonito", pero es funcional :-\

Saludos