Code from hanya:

Sub Main
  oOfficeFP = CreateUnoService("com.sun.star.ui.dialogs.OfficeFilePicker")
  oFP = CreateUnoService("com.sun.star.ui.dialogs.FilePicker")
  oSystemFP = CreateUnoService("com.sun.star.ui.dialogs.SystemFilePicker")

  oOfficeFP.execute()
  oFP.execute()
  oSystemFP.execute()
End Sub

Regards,
-- 
Pierre-André Galmes
Free Software consultant
StarXpert - www.starxpert.fr
6, rue Eugène Varlin - 75010 Paris

Reply via email to