Datensatz finden und ausgeben

[bobbydigital]

Habe doch die zip im Anhang mitgeschickt.

Ich dachte so wäre es richtig:

Public Class maske1
    Public strDaten(0, 6) As String
    Dim strDatensatz As Integer
    Dim pfad As String = "C:/Dokumente und Einstellungen/Administrator/Desktop/support.txt"

    Private _CustomerList As List(Of CustomerDefinition)
    Private _isLoaded As Boolean = False



    Public Property CustomerList() As List(Of CustomerDefinition)
        Get

            If _isLoaded = False Then
                loadCustomerData(pfad)
                _isLoaded = True
            End If

            Return _CustomerList
        End Get
        Set(ByVal value As List(Of CustomerDefinition))
            _CustomerList = value
        End Set
    End Property

    Private Sub loadCustomerData(ByVal fileName As String)

        _CustomerList = New List(Of CustomerDefinition)

        'Auslesen der Textdatei in einer Schleife und die Daten in die Liste eintragen
        'KNR;Name;Telefonnummer;Problem;Seriennummer

        _CustomerList.Add(New CustomerDefinition("id", "name", "phone", "problem", "snr", "dz"))

    End Sub

 

[bobbydigital]

Ich hab einfach keine Ahnung :-(

 

[M4st3r]

Hab nochmal ein bißchen Mitleid walten lassen - beim nächsten Upload gibts ne Rechnung von mir!

Das zip enthält alles was du brauchst - inkl eine Testdatei die ich mir mal gebastelt hab.

Wichtig ist jetzt: Wenn du das Projekt öffnest und deine Textdatei verwenden willst, schau mal in die Datei app.config! Da habe ich den Pfad zu der Datei hinterlegt - momentan c:\temp\DataSource.txt - den musst du auf deine Datei umschreiben

 

[bobbydigital]

Grüß dich,

danke für deine Hilfe, aber leider hab ich nun immer noch eine Fehlermeldung:

Der Index war außerhalb des Arraybereichs.

 

[M4st3r]

Hast du mal nen Screenshot? So allein aus der Meldung raus kann man da sehr schwer eine Aussage treffen...

 

[bobbydigital]

Ja hier mal ein Bild im Anhang:

Sobald ich die fünfte Ziffer der KNR eingebe kommt der Fehler...

 

[M4st3r]

Nimmst du die Textdatei die ich dir mitgeschickt hatte oder eine mit identischem Aufbau? Ist das Trennzeichen ein Semikolon? Wird das Array richtig gefüllt?

 

[bobbydigital]

OK, ich hab es geschafft und danke dir für deine Unterstützung! )))
habe es mit Komma getrennt gehabt und jetzt mit Semi....

 

[bobbydigital]

Und wie müsste die Schleife aussehen, um mehrere Datensätze mit der gleichen KNR auszulesen und anzuzeigen?

 

[M4st3r]

Das ist doch schon drin, oder

An der Stelle "FROM blablub SELECT blablub... WHERE blablub = " (Hab den Code vergessen, schaut aber so ähnlich aus) wird aus der Liste alle Einträge gesammelt welche die eingegebene Kundennummer aufweist. Darunter wird meiner Erinnerung nach doch schon in einer Schleife die Datensätze durchlaufen - also bei mir war's zumindest so...