Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

CommonDialog - Speichern unter
Autor: edi1985
Datum: 05.07.03 11:02
Hi ich habe ein Problem. Kann mir jemand sagen, was an folgendem Quellcode falsch ist? Private Sub mnuSpeichernUnter_Click() CommonDialog.InitDir = funktion_stspeichern 'Funktionsaufruf CommonDialog.DialogTitle = "Speichern eines Textdokuments" CommonDialog.FileName = mdiHaupt.ActiveForm.txtDateiname.Text CommonDialog.ShowSave If mdiHaupt.ActiveForm.txtEndung.Text = ".rtf" Or mdiHaupt.ActiveForm.txtEndung.Text = ".RTF" Then 'Wenn die Endung der Datei ="*.rtf" oder "*.RTF" mdiHaupt.ActiveForm.rtfText.SaveFile CommonDialog.FileName, rtfRTF Else mdiHaupt.ActiveForm.rtfText.SaveFile CommonDialog.FileName, rtfText End If mdiHaupt.ActiveForm.txtGedrückt.Text = 0 End Sub Die Endung des jeweiligen Dokuments wird beim Öffnen in txtEndung.text gespeichert. Beim speichern soll VB anhand der Information aus txtEndung.text eine Routine entscheiden. Wenn ich mit diesem Quellcode speichere, dann speichert VB immer als rtfText ab. Es handelt sich hier um ein MDI-Formular und ein MDI-Kindfenster. MFG Edi1985 Bin am proggen, merkt man, ne

CommonDialog - Speichern unter	178	edi1985	05.07.03 11:02
Re: CommonDialog - Speichern unter	553	Dieter	05.07.03 11:31
Re: CommonDialog - Speichern unter	119	edi1985	05.07.03 11:35
Re: CommonDialog - Speichern unter	580	Dieter	05.07.03 12:06
Re: CommonDialog - Speichern unter	117	edi1985	06.07.03 12:45

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übersicht

Suchen