Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Zweidimensionales Array mit Bubblesort sortieren
Autor: rasmel
Datum: 28.11.02 12:02
Funktioniert leider auch nicht: Das Objekt wird nicht mehr gefunden. Hier ist mein Code: Public Function ReadAddresses(switch As Integer) Dim FileNum As Integer Dim Pers As Person Dim dbAddress As Database Dim rstRecAddress As DAO.Recordset Dim dbFile As String Dim numrows As Integer Dim arrRecAddress As Variant Dim key As Long If (switch = 1) Then Set List = Nothing Set List = New Collection On Error GoTo failReadDB dbFile = App.Path + "\address.mdb" Set dbAddress = OpenDatabase(dbFile, True, False) Set rstRecAddress = dbAddress.OpenRecordset("SELECT [Address].[Name], [Address].[VName] FROM Address ORDER BY [Address].[Name]", dbOpenTable) 'pointer moves to the fist record in the recordset If (rstRecAddress.RecordCount > 0 And Not rstRecAddress.BOF) Then rstRecAddress.MoveFirst While Not rstRecAddress.EOF 'run until the end of the file is reached Set Pers = New Person numrows = 1 arrRecAddress = rstRecAddress.GetRows(numrows) 'get data from the current row and jump to the next Pers.Generate (arrRecAddress) 'get values out of the table fields key = arrRecAddress(0, 0) 'key is the value of the table's index field Add Pers, key 'add person with key to collection Wend lastKey = arrRecAddress(0, 0) failReadDB: If (err.Number <> 0) Then MsgBox err.Description, vbMsgBoxHelpButton, "Fehler", err.HelpFile, err.HelpContext End If rstRecAddress.Close dbAddress.Close In meiner Datenbank sind Personendaten (Name, Vorname, Tel usw.) gespeichert. Die Tabelle heißt "Address". Über das Array lese ich die Daten aus und ordne sie jeweils einem PersonenObjekt zu. Diese Personenobjekte werden in einer Collection zusammen gefasst. Mein Ziel ist es, die Personen in der Collection alphabetisch zu ordnen, damit sie auch in einer List box sortiert angezeigt werden können. Meine Aufgabe ist es, die Collection irgendwie mit Bubblesort zu ordnen. Ist das überhaupt möglich?

Zweidimensionales Array mit Bubblesort sortieren	129	rasmel	28.11.02 10:46
Re: Zweidimensionales Array mit Bubblesort sortieren	1.860	Dieter	28.11.02 11:19
Re: Zweidimensionales Array mit Bubblesort sortieren	1.826	David M	28.11.02 11:22
Re: Zweidimensionales Array mit Bubblesort sortieren	54	rasmel	28.11.02 11:33
Re: Zweidimensionales Array mit Bubblesort sortieren	1.770	David M	28.11.02 11:43
Re: Zweidimensionales Array mit Bubblesort sortieren	60	rasmel	28.11.02 12:02
Re: Zweidimensionales Array mit Bubblesort sortieren	1.710	David M	28.11.02 12:23
Re: Zweidimensionales Array mit Bubblesort sortieren	48	rasmel	28.11.02 13:13
Re: Zweidimensionales Array mit Bubblesort sortieren	1.748	David M	28.11.02 13:22
Re: Zweidimensionales Array mit Bubblesort sortieren	45	rasmel	28.11.02 13:37
Re: Zweidimensionales Array mit Bubblesort sortieren	1.797	David M	28.11.02 13:48
Re: Zweidimensionales Array mit Bubblesort sortieren	44	rasmel	28.11.02 14:04
Re: Zweidimensionales Array mit Bubblesort sortieren	1.747	David M	28.11.02 14:17
Re: Zweidimensionales Array mit Bubblesort sortieren	48	rasmel	28.11.02 15:14

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übersicht

Suchen