[VB]Dateien im festgelegten Ordner speichern

[JuergenW]

Würde es dringend für die Firma brauchen!!

Wie kann ich vom Benutzer ausgewählte Dateien unter einen vom User gewälten Pfad speichern(Also ohne das irgendetwas geöffnet wird, sondern still und leise in dem gewählten Ordner gespeichert wird).

Danke im Voraus!!
Jürgen

 

[Schattenkanzler]

Das kommt ganz darauf an, würde ich sagen...

Angenommen, du hast den Benutzer seinen Ordner in der Variable "Pfad" speichern lassen.
Dann kannst du deine Daten folgendermaßen speichern:

Private Sub Speichern()
 Open Pfad & "\datei.000" For [B]Output[/B] As #1
  Print #1, Daten
 Close #1
End Sub

Wenn du aber nur deine Daten an eine File anhängen willst:

Private Sub Speichern()
 Open Pfad & "\datei.000" For [B]Append[/B] As #1
  Print #1, Daten
 Close #1
End Sub

Wenn du mit mehreren Dateien rumhantierst, dann kannst du auch folgendes tun:

Private Sub Speichern()
 Dateinummer = FreeFile
 Open Pfad & "\datei.000" For Output As #Dateinummer
  Print #Dateinummer, Daten
 Close #Dateinummer
End Sub

So, ich denke mal, das sollte für's erste reichen.

Du musst dem User aber auch gar keinen Pfad entlocken:

Mit App.Path kommt man schon recht weit!

MFG - Schattenkanzler

 

[JuergenW]

Danke für Deine Antwort. Hat mir sehr geholfen!!