vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 NEU! sevCoolbar 3.0 - Professionelle Toolbars im modernen Design!  
 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
Laufzeitfehler '3265' 
Autor: Surfine2001
Datum: 30.06.03 09:41
Guten Morgen,

Kann mir jemand weiterhelfen? Bin schon langsam am Verzweifeln.

Wo liegt hier der Fehler? frmMieter öffnet sich und wenn ich "Test" per MsgBox eingebe, dann wird in jeder Textbox der Eintrag "Test" angezeigt. Genauso ist es mit rstR_Mieter_Id.Fields(x), in der MsgBox werden alle Einträge angezeigt. Das seltsame ist auch, ich habe noch ein Button und dort funktioniert ist einwandfrei. 

Public Sub CmdBearbeiten2_Click()
    strQuelle = "Mieter"
 
 Set rstR_Mieter_Id = New Recordset
 
 If rstR_Mieter_Id.State = adStateOpen Then rstR_Mieter_Id.Close
 rstR_Mieter_Id.Open "SELECT * FROM Mieter WHERE Mieter_Id =" & _
   WohnungR_Mieter_Id, ADOcn, adOpenStatic
 
 '  das Recordset weitergeben
  frmMieter.text1(0).Text = rstR_Mieter_Id.Fields(1)    'Anrede
  frmMieter.text1(1).Text = rstR_Mieter_Id.Fields(2)    'Titel
  frmMieter.text1(2).Text = rstR_Mieter_Id.Fields(3)    'Vorname
  frmMieter.text1(3).Text = rstR_Mieter_Id.Fields(4)    'Nachname
  frmMieter.text1(4).Text = rstR_Mieter_Id.Fields(5)    'Firma
  frmMieter.text1(5).Text = rstR_Mieter_Id.Fields(6)    'Strasse
  frmMieter.text1(6).Text = rstR_Mieter_Id.Fields(7)    'PLZ
  frmMieter.text1(7).Text = rstR_Mieter_Id.Fields(8)    'Ort
  frmMieter.text1(8).Text = rstR_Mieter_Id.Fields(9)    'Telefon
  frmMieter.text1(9).Text = rstR_Mieter_Id.Fields(10)   'Mobilfunk
  frmMieter.text1(10).Text = rstR_Mieter_Id.Fields(11)  'Fax
  frmMieter.text1(11).Text = rstR_Mieter_Id.Fields(12)  'email
  frmMieter.text1(12).Text = rstR_Mieter_Id.Fields(13)  'Geburtsdatum
  frmMieter.text1(13).Text = rstR_Mieter_Id.Fields(14)  'Geburtsort
  frmMieter.text1(14).Text = rstR_Mieter_Id.Fields(15)  'Familienstand
  frmMieter.text1(15).Text = rstR_Mieter_Id.Fields(16)  'Beruf
 
  ADOrs.AbsolutePosition = 1
 
  ' Form anzeigen
  '  frmMieter.Show
    Unload Me
End Sub
Fehlermeldung:
 
Laufzeitfehler '3265'
Ein Objekt, das dem angeforderten Namen oder dem Ordinalverweis entspricht, _
  kann nicht gefunden werden.
Danke schon mal für eure Hilfe.

Gruss
Agnes

------------------------------------
Wenn wir heut gemeinsam starten
und wir alle viel erwarten,

denken wir an jedem Tag daran,
dass man es nur schaffen kann,

wenn wir fest zusammen stehen
und den Weg gemeinsam gehen.

alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Laufzeitfehler '3265'1.858Surfine200130.06.03 09:41
Re: Laufzeitfehler '3265'670ModeratorDieter30.06.03 09:50
Re: Laufzeitfehler '3265'704Surfine200130.06.03 10:50
Re: Laufzeitfehler '3265'571ModeratorDieter30.06.03 11:03
Re: Laufzeitfehler '3265'571Surfine200130.06.03 11:36
Re: Laufzeitfehler '3265'738ModeratorDieter30.06.03 12:02
Re: Laufzeitfehler '3265'771Surfine200130.06.03 15:16
Re: Laufzeitfehler '3265'714ModeratorDieter30.06.03 15:21
Vielen Dank614Surfine200101.07.03 09:04

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