🚀 go-pugleaf

Witajcie,

Zaznaczam, że googlałem i szukałem na MSDN-ie, ale jakoś nie natrafiłem na
rozwiązanie mojego problemu. A więc opisuję, o co chodzi:
Mam aplikację, która sprawdza plik tekstowy i wyszukuje w nim błędy. Struktura
każdego rekordu jest identyczna. Stworzyłem klasę clLinia, której metody
szatkują linie z pliku na poszczególne pola, a następnie badają zawartość pól wg
jakiś tam reguł poprawności. Jeśli w jakimś polu wykryję błąd, to tworzę nową
instancję klasy clBlad, która ma za zadanie zapisać w bazie danych rekord z
parametrami znalezionego błędu.
Robię to następującym kodem:
przy starcie aplikacji tworzę dla zdefiniowanego wcześniej połączenia DataSet
(dsZIFC) i wypełniam go zawartością tablicy rejestr_bledow:
 If myConnection.State <> ConnectionState.Open Then
                myConnection.Open()
                oledbAdapter = New OleDbDataAdapter(strSQL, myConnection)
                oledbAdapter.Fill(dsZIFC, "rejestr_bledow")
                oledbAdapter.Dispose()
 End If

W klasie clBlad mam metodę add_blad, która wygląda mniej więcej tak:
			
			Dim tbRejestrBledow As DataTable
            Dim rwRekord As DataRow

            tbRejestrBledow = dsZIFC.Tables("rejestr_bledow")

            rwRekord = tbRejestrBledow.NewRow
            rwRekord("id_importu") = _id_importu
            rwRekord("id_wiersza") = _id_wiersza
            rwRekord("id_bledu") = _id_bledu
            rwRekord("id_pola") = _id_pola
            rwRekord("opis_bledu") = _opis
            rwRekord("wartosc") = _wartosc
            tbRejestrBledow.Rows.Add(rwRekord)
            dsZIFC.AcceptChanges()
			
I mimo użycia metody AcceptChanges dla DataSet-u, nie mam zapisów w bazie
danych. Czy ktoś z szanownych kolegów jest mi w stanie łopatologicznie
powiedzieć, co robię źle? 

Z góry dzięki
Jacek

-- 
Wysłano z serwisu OnetNiusy: http://niusy.onet.pl