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

Fortgeschrittene Programmierung
Recordset als Rückgabewert 
Autor: Isha
Datum: 25.04.03 08:33
Hi,
Ich rufe die Funktion GetRecord auf und möchte eine Recordset zurückerhalten.
In der Funktion öffne ich die Connection, lese den Datensatz aus dem Access, und schliesse die Connection wieder. Durch meine Programmstruktur ist es notwendig, die Connection in der Funktion wieder zu schliessen. Lasse ich die Connection und den Recordset offen funktioniert mein Code und sonst nicht.

Der Code sieht wie folgt aus: 
Dim rs As ADODB.Recordset  
 
Set rs = GetRecord()
Public Function GetRecord() As ADODB.Recordset
Dim MyRecordSet As ADODB.Recordset
 
'Connection öffnen
........
'Daten lesen und in MyRecordSet speichern
........
 
Set GetRecord = MyRecordSet
 
'Recordset schliessen
MyRecordSet.close
 
'Connection schliessen
.......
End Function
Warum kann ich nach der Zuweisung des Recordsets an die Funktion (Set GetRecord = MyRecordSet) das Recordset "MyRecordSet" nicht schliessen ohne auch die Daten im Rückgabeparameter der Funktion zu verlieren ?
Wie kann ich den Recordset an die aufrufende Funktion übergeben ?

Gruss
Isha
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Recordset als Rückgabewert108Isha25.04.03 08:33
Re: Recordset als Rückgabewert298SL25.04.03 09:37
Re: Recordset als Rückgabewert58Isha25.04.03 10:23
Re: Recordset als Rückgabewert299SL25.04.03 13:47

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