vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
sevDataGrid - Gönnen Sie Ihrem SQL-Kommando diesen krönenden Abschluß!  
 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
Laufzeitfehler 3167 
Autor: SimaS
Datum: 15.04.03 14:54

hmm, den Quelltext, was im Quelltext könnte dies verursachen? Ich finde da aba nichts im Quelltext.
Hia der Quelltext zum Formular mit Memo-Feld:

Public Vertragsnotiz_current As String

'Abbrechen-Button

Private Sub Befehl2_Click()
On Error GoTo Err_Befehl2_Click
If Not IsNull(Vertragsnotiz_current) Then
Me.Notiz = Vertragsnotiz_current
End If
DoCmd.Close
Exit_Befehl2_Click:
Exit Sub
Err_Befehl2_Click:
MsgBox Err.Description
Resume Exit_Befehl2_Click
End Sub


'Übernehmen-Button

Private Sub Befehl3_Click()
On Error GoTo Err_Befehl3_Click
Me.Refresh
If Not IsNull(Me.Notiz) Then
Me.NotizVorh = True
Else
Me.NotizVorh = False
End If
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
DoCmd.Close
Exit_Befehl3_Click:
Exit Sub
Err_Befehl3_Click:
MsgBox Err.Description
Resume Exit_Befehl3_Click
End Sub

Private Sub Form_Close()
DoCmd.Save
End Sub

Private Sub Form_Current()
If Not IsNull(Me.Notiz) Then
Vertragsnotiz_current = Me.Notiz
End If
End Sub
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Laufzeitfehler 31671.269SimaS15.04.03 14:35
Re: Laufzeitfehler 3167796Heiko15.04.03 14:41
Laufzeitfehler 3167757SimaS15.04.03 14:54
Re: Laufzeitfehler 3167728Heiko15.04.03 15:51
Laufzeitfehler 3167786SimaS15.04.03 16:03
Re: Laufzeitfehler 3167719Heiko15.04.03 16:06
Re: Laufzeitfehler 3167757Heiko16.04.03 12:29
Laufzeitfehler 3167753SimaS17.04.03 09:49

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