Speichern ohne Common Dialog!

[JackyD]

Hallo @ all,
wie kann ich ein normalses speichern hinbekommen, ohne dass ich immer im dialog den namen wählen muss. Es soll den Namen vom der geöffneten oder schon gespeicherten datei merken und sobald ich auf speichern klicke soll es automatisch ohne nachfragen die datei überschreiben und denn neuen ihnhalt darin speichern.

 

[momoxp]

speichere einfach beim öffnen der datei den namen ´+ pfad in einer textbox oder label, etc..
und beim speichern rufst du das auf

Private Sub speichern_Click()
On Error Resume Next
Dim Inhalt As String
Inhalt = content.Text
Open pfad.Text For Output As #1
Print #1, Inhalt
Close #1
End Sub

so mach ich das ^^

 

[JackyD]

Danke ich probiers mal so.

 

[Filone]

Naja, APIs "GETSAVEFILENAME" wird wohl dann die idealere Lösung sein. Erlaubt einen netten Browserdialog, der den Benutzer nach alter Windowsmanier einen Pfad und Dateinamen auszuwählen. Siehe mentalis.org.