Hallo zusammen,
nachdem mir hier beim ConnectionString schon toll geholfen wurde, habe ich hier ein andres Problem.
Ändern einer Spalte/Zelle in einer DB
mein code sieht in etwa so aus
Code:
procedure updateField;
var
aDataSet : TAdoDataSet;
begin
aDataSet := TAdoDataSet.Create(nil);
aDataSet.ConnectionString := 'Provider=MSDASQL;User Id=user;Password=passwort;Data Source=rhdbd_16;Driver=iSeries Access ODBC Driver;Initial Catalog=VWWE400;Mode=ReadWrite;'
aDataSet.CommandText := 'update rhdbd_16.WAKO set WAAUMG ='+quotedStr(edtBadParts.Text)
+' where WAFIRM='+quotedStr(firm)
+' and WAWKNR='+quotedStr(edtWerkNummer.Text)
+' and WAAUNR='+quotedStr(edtAuftragsNummer.Text)
+' and WAAUPO='+quotedStr(edtIndex.Text);
aDataSet.Active := True;
aDataSet.close;
aDataSet.free;
end;
So wie es hier steht stürzt das Programm AB! (zugriffsverletzung in 'cwbodbc.dll')
wenn ich den connection string mit mode= read benutze um aus der Datenbank zu lesen funtioniert das prima mit dem Kommando
Code:
aDataSet.CommandText := 'select WAAUMG from rhdbd_16.WAKO'
+' where WAFIRM='+quotedStr(firm)
+' and WAWKNR='+quotedStr(edtWerkNummer.Text)
+' and WAAUNR='+quotedStr(edtAuftragsNummer.Text)
+' and WAAUPO='+quotedStr(edtIndex.Text);
Bin ich überhaupt auf dem richtigen weg?
Ich hoffe mal das ist wieder nur ein Anfängerfehler und mir wird hier geholfen 
Grüße
Stefan
Bookmarks