vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Brandneu! sevEingabe v3.0 - Das Eingabecontrol der Superlative!  
 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

Visual-Basic Einsteiger
Re: Laufzeitfehler 13 
Autor: sst_edwin
Datum: 17.06.03 10:15

nachfolgend mein code:
aRS.Open "select * from tblPatienten where PATID like '" & Me.Text13 & "'", con, adOpenStatic, adLockReadOnly
Me.DTPicker1.Value = aRS("PATGebDatum") & ""
Me.Text3.Text = aRS("PATStrasse") & ""
Me.Text10.Text = aRS("PATHsNr") & ""
Me.Text9.Text = aRS("PATPLZ") & ""
Me.Text4.Text = aRS("PATWohnort") & ""
Me.Option1.Value = aRS("AOK") & ""
Me.Option2.Value = aRS("LKK") & ""
Me.Option3.Value = aRS("BKK") & ""
Me.Option4.Value = aRS("IKK") & ""
Me.Option5.Value = aRS("VdAK") & ""
Me.Option6.Value = aRS("AFV") & ""
Me.Option7.Value = aRS("KKasse") & ""
Me.Text11 = aRS("PATArbeitgeber") & ""
Me.Text6 = aRS("PATSozVersNr") & ""
Me.Text5 = aRS("FKeyKVID") & ""
Me.Text7 = aRS("PATStatus") & ""
Me.DTPicker2.Value = aRS("VKDatum") & ""
Me.DTPicker3.Value = aRS("Datum") & ""
die Optionfelder wurden neu eingefügt, ab da tritt der Fehler auf!
Danke für die Hilfe!
Gruß Edwin
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Laufzeitfehler 13180sst_edwin17.06.03 09:55
Re: Laufzeitfehler 13277Wolfgang17.06.03 09:58
Re: Laufzeitfehler 1354sst_edwin17.06.03 10:15
Re: Laufzeitfehler 13275Wolfgang17.06.03 10:30
Re: Laufzeitfehler 1347sst_edwin17.06.03 10:56

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