16,747
社区成员




CREATE TABLE tablename(
guid BIGINT NOT NULL,
content VARCHAR(2000),
CONSTRAINT [PK_xxx] PRIMARY KEY CLUSTERED
(
[GUID] ASC
))ON [PRIMARY]
TRY
SqlString := 'SELECT * FROM tablename WHERE (GUID=' + GUID + ')';
P_ADOQuery_data.Close;
P_ADOQuery_data.SQL.Text := SqlString;
P_ADOQuery_data.Open;
if P_ADOQuery_data.RecordCount<=0 then
begin
P_ADOQuery_data.Append;
P_ADOQuery_data.FieldByName('GUID').Value:=GUID;
P_ADOQuery_data.FieldByName('CONTENT').Value:=CONTENT;
P_ADOQuery_data.Post;
WriteNR(0,GUID+'|'+CONTENT );
end;
Except
On e: Exception Do
Begin
WriteNR(1, '处理 信息失败:' + e.message + '(' + SqlString + ')');
End;
End;