Ich hatte schonmal etwas wegen der
DB gefragt wo das Update nicht funktioniert hatte doch diesesmal haenge ich beim Insert.... das muesste doch genauso funktionieren oder? hier meine Funktion:
Delphi-Quellcode:
function thisInsert(VORNAME, NACHNAME:
string):boolean;
var
s_sql, Constr, ConOptions:
string;
cmd: BdpCommand;
trsa: BdpTransaction;
DBCon: BdpConnection;
begin
//Einstellungen der Datenbank sowie auch bei ConOptions
ConStr := '
Provider=Interbase;' +
'
assembly=Borland.Data.Interbase, Version=2.5.0.0,' +
'
Culture=neutral, PublicKeyToken=91d62ebb5b0d1b1b;' +
'
vendorclient=gds32.dll;pooling=True;' +
'
grow on demand=True;database=localhost:C:\InterbaseDB\TERMINE.IB;' +
'
username=sysdba;max pool size=100;password=masterkey';
ConOptions := '
LoginPrompt=False;SQLDialect=3;RoleName=None;' +
'
CommitRetain=true;ServerCharSet=NONE;RollbackRetain=False;' +
'
TxnIsolation=ReadCommitted;WaitOnLocks=true';
//Einstellungen in die Verbindung implementieren
DBCon:= BdpConnection.Create(ConStr);
DBCon.ConnectionOptions:= ConOptions;
s_sql := '
INSERT INTO MITARBEITER (VORNAME, NACHNAME) VALUES ( ''
'+VORNAME+'
''
, ''
'+NACHNAME+'
''
)';
cmd := BdpCommand.Create(s_sql, DBCon);
try
DBCon.Open;
trsa := DBCon.BeginTransaction;
cmd.Transaction:=trsa;
cmd.ExecuteNonQuery;
trsa.Commit;
DBCon.Close;
result := true;
except
result := false;
end;
end;
woran koennte das liegen?