Also ich habe eine Funktion, die momentan so aussieht, aber nicht läuft.
Function lese_kunden(cn) As ADODB.Recordset
Dim SQLStatement As String
SQLStatement = "select * from Kunde"
lese_kunden.Open SQLStatement, cn, adOpenForwardOnly, adLockReadOnly
End Function
Die Idee war, durch diese Funktion ein Recordset zu erzeugen, welches dann zurückgegeben werden soll.z.B. so: Ergebnis = lese_kunden(cn)
Ich weiß einfach nicht, wie ich den Return bewerkstelligen muss. Kann mir hier bitte jemand helfen?
Vielen Dank
Jan