[RESUELTO] Folderpicker q boton se clickeo: Cancel o Aceptar

[arivas_2005]

Saludos

Requiero saber cuando se ha clickeado el botón cancelar en la ventana del folderpicker en elcódigo siguiente

Código: Seleccionar todo

sub Extrae_Carpeta
	Dim FilePicker As Object
	Dim FilePath() As String
	'Globalscope.BasicLibraries.LoadLibrary( "MRILib" )
	nombrearchivo=Thiscomponent.getlocation()
	ruta=""
	largo=len(nombrearchivo)
	for m=largo to 1 step -1
		letra=mid(nombrearchivo,m,1)
		separador="/"		
		if letra=separador then
			ruta=converttoURL(mid(nombrearchivo,8,m-1))
			exit for
		endif
	next
	
	FolderPicker=createUnoService("com.sun.star.ui.dialogs.FolderPicker")
	'mri FolderPicker
	FolderPicker.setDisplayDirectory(ruta)
	FolderPicker.setTitle("Seleccione la carpeta a listar")	
	FolderPicker.execute
	FolderPath=FolderPicker.getDirectory() & getPathSeparator
	MsgBox ConvertToURL(FolderPath)
	'https://forum.openoffice.org/en/forum/viewtopic.php?f=20&t=7407
End Sub

Intenté usar FolderPath pero siempre aparece lleno ya que se inserta la ruta con setDisplayDirectory(ruta)
Hay forma de saber si se ha clickeado el boton cancelar ?
Gracias

[mauricio]

Si mal no recuerdo

Código: Seleccionar todo

If FolderPicker.execute() Then

End If

pero... creo que si se selecciona cancelar getDirectory debe regresarte una cadena vacía.

Saludos

[arivas_2005]

Gracias mauricio.

En este caso getDirectory no da vacio porque se ha insertado una ruta con setDirectory() y esa ruta insertada es la que aparece en el getDirectory. De ahí que tenia la necesidad de mejor detectar si se clickea el boton cancelar y ya tengo la solucion. Nuevamente gracias.