hola bueno tengo un vbs que lo que hace es explorar carpetas, abre y corre bien
pero el problema es que se lo abro y despues lo quiero cerrar osea le doy
al boton cancelar me lanza error el vbs.
no lo he podido solucionar intente con el comando else pero tampoco funciono.
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.BrowseForFolder _
(WINDOW_HANDLE, "Selecciona una carpeta:", NO_OPTIONS)
Set objFolderItem = objFolder.Self
strPath = objFolderItem.Path
objShell.Explore strPath
en pocas palabras lo que quiero es cuando abra el vbs pero no selecione
nada sino que le de a cancelar se cierre y no me aparezca el mensaje
error.
en realidad como querés usar else sino hay un if?
y es lo que falta,basicamente:
etc
Set objFolder = objShell.BrowseForFolder _
(WINDOW_HANDLE, "Selecciona una carpeta:", NO_OPTIONS)
if (not objFolder is nothing) then
etc.
end if