Filepicker

[Hansi]

Hallo,

also einen FilePicker zum öffnen einer Datei hab ich.Der funktioniert auch super.Schönes Ding.Wie lautet den aber der Code zu Speichern einer Datei ?

Gruß Hansi

[DPunch]

Aloha

Siehe dazu StarBasic FAQ: Wie kann man Dokumente speichern?

[Hansi]

Hi,

mmm,hab mich bestimmt nicht richtig ausgedrückt,ich meinte den Code zum Speichern auf Basis des Filepicker.

[DPunch]

Aloha

ich meinte den Code zum Speichern auf Basis des Filepicker.

Naja, was den Filepicker angeht, funktioniert das genauso wie das Öffnen von Dateien, der Filepicker liefert Dir ja nur den Pfad zurück.

Was Dir noch fehlen dürfte, ist die Möglichkeit, komplett neue Dateien anzulegen, das machst Du mit der 2. Zeile in diesem Codebeispel.

Code: Alles auswählen

oFilePicker = createUnoService("com.sun.star.ui.dialogs.FilePicker")
oFilePicker.Initialize(Array(com.sun.star.ui.dialogs.TemplateDescription.FILESAVE_SIMPLE))
oFilePicker.appendFilter("Alle Dateien","*.*")
oFilePicker.setDisplayDirectory("C:")
nResult = oFilePicker.execute
If nResult <> 0 Then MsgBox oFilePicker.Files(0)

[Hansi]

Hallo,

ich danke euch erst mal für die Hilfe.Ich habmich nach etwas längere Zeit jetzt wiedr mal damit beschäftigt.Der untenstehende Code funktioniert so erst mal,bringt mir aber wenn es ums speichern geht ne Fehlermeldung.

Wist Ihr warum ???

Code: Alles auswählen

sub speichern4 

    dim dummy()
    odoc = thiscomponent
SFileDialog=createunoservice("com.sun.star.ui.dialogs.FilePicker") 
SFileDialog.Initialize(Array(com.sun.star.ui.dialogs.TemplateDescription.FILESAVE_SIMPLE))
SFileDialog.appendFilter("Windberechnung (*.wsb)", "*.wsb")
SFileDialog.setDisplayDirectory("file:///C:/Dokumente und Einstellungen/Rene/Eigene Dateien/Winddaten/" )
SFileDialog.setTitle("Daten speichern")

iAccept = SFileDialog.Execute()
If iAccept = 1 Then
   mDatei = SFileDialog.getFiles() + SFileDialog.Appendfilter()
   oDoc.storeasURL(mDatei,dymmy())
  else
   exit sub  
end if

        
end sub 

[DPunch]

Aloha

Wist Ihr warum ???

Diese Zeile z.B.

Code: Alles auswählen

mDatei = SFileDialog.getFiles() + SFileDialog.Appendfilter()

macht von vorne bis hinten keinen Sinn.

Code: Alles auswählen

SFileDialog.getFiles()

gibt Dir ein Array aller selektierten Dateinamen zurück.
Wenn Du keine Mehrfachselektion zulässt, kriegst Du den gerade eben ausgewählten Dateinamen per

Code: Alles auswählen

SFileDialog.Files(0)

Code: Alles auswählen

SFileDialog.Appendfilter()

Du versuchst an dieser Stelle, dem FilePicker noch einen Filter mitzugeben... nachdem er schon ausgeführt und geschlossen wurde (abgesehen davon, dass der anzuhängende Filter als Parameter fehlt).

oDoc.storeasURL(mDatei,dymmy())

Du hattest Dein Array als "dummy" deklariert, hier verwendest Du "dymmy".