vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Zippen wie die Profis!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
Re: Nur bestimmte Dateien speichern und öffnen. 
Autor: tischler
Datum: 18.01.07 21:10

Hallo BAStler,

wie kann ich es erreichen, das ich eine über showopendlg geöffnete Datei,
die ich weiter bearbeitet habe, unter showsavedlg mit gleichen namen ab-
speichern kann. Der Name soll schon im Dialogfenster unter Dateiname ange-
zeigt werden.

Public Function ShowSaveDlg(F As Form, strFilter As String, _
strTitel As String, strInitDir As String) As String

Dim lngOpenFileName As OPENFILENAME
Dim lngAnt As Long
Dim strDateiname As String
strDateiname = Space(255)
strDateiname = "Beispiel.qpy" 'hier wird im Dialog Dateiname: Beispiel angezeigt
With lngOpenFileName
.lStructSize = Len(lngOpenFileName)
.hwndOwner = F.hWnd
.hInstance = App.hInstance
If Right$(strFilter, 1) <> "|" Then _
strFilter = strFilter + "|"
For lngAnt = 1 To Len(strFilter)
If Mid$(strFilter, lngAnt, 1) = "|" Then _
Mid$(strFilter, lngAnt, 1) = Chr$(0)
Next
.lpstrFilter = strFilter
.lpstrFile = strDateiname ' Hier übergebe ich den o.a. Namen der Datei .nMaxFile = 256
.nMaxFileTitle = Len(strDateiname)
.lpstrTitle = strTitel
.flags = OFN_HIDEREADONLY Or OFN_OVERWRITEPROMPT Or OFN_CREATEPROMPT

lngAnt = GetSaveFileName(lngOpenFileName)
ShowSaveDlg = .lpstrFileTitle
'End If
End With
End function

Besten Dank.
mfg bruno
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Nur bestimmte Dateien speichern und öffnen.1.437Brauner25.12.06 10:55
Re: Nur bestimmte Dateien speichern und öffnen.860BAStler25.12.06 11:08
Re: Nur bestimmte Dateien speichern und öffnen.792Brauner25.12.06 11:29
Re: Nur bestimmte Dateien speichern und öffnen.820Brauner25.12.06 11:37
Re: Nur bestimmte Dateien speichern und öffnen.768TTSAddict25.12.06 15:40
Re: Nur bestimmte Dateien speichern und öffnen.789Brauner25.12.06 18:38
Re: Nur bestimmte Dateien speichern und öffnen.869Brauner25.12.06 20:03
Re: Nur bestimmte Dateien speichern und öffnen.822BAStler25.12.06 20:38
Re: Nur bestimmte Dateien speichern und öffnen.856Brauner26.12.06 16:32
Re: Nur bestimmte Dateien speichern und öffnen.980BAStler27.12.06 09:11
Re: Nur bestimmte Dateien speichern und öffnen.781BAStler27.12.06 10:42
Re: Nur bestimmte Dateien speichern und öffnen.789Brauner27.12.06 18:59
Re: Nur bestimmte Dateien speichern und öffnen.787Brauner27.12.06 19:26
Re: Nur bestimmte Dateien speichern und öffnen.808BAStler27.12.06 21:22
Re: Nur bestimmte Dateien speichern und öffnen.717Brauner28.12.06 20:00
Re: Nur bestimmte Dateien speichern und öffnen.731tischler02.01.07 21:41
Re: Nur bestimmte Dateien speichern und öffnen.852BAStler03.01.07 13:21
Re: Nur bestimmte Dateien speichern und öffnen.808Brauner03.01.07 15:34
Re: Nur bestimmte Dateien speichern und öffnen.765BAStler04.01.07 09:02
Re: Nur bestimmte Dateien speichern und öffnen.789Brauner04.01.07 16:22
Re: Nur bestimmte Dateien speichern und öffnen.762BAStler05.01.07 07:59
Re: Nur bestimmte Dateien speichern und öffnen.741tischler20.01.07 23:21
Re: Nur bestimmte Dateien speichern und öffnen.728tischler18.01.07 21:10
Re: Nur bestimmte Dateien speichern und öffnen.803BAStler19.01.07 11:03

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel