[태그:] DBISAM
DBISAM 동적 쿼리에서 필드명을 자동으로만들기 예제.
Published Date: 2008년 8월 22일
간단히 구성해 본내용입니다. 동적 쿼리에서 필드명을 자동으로만들기 예제입니다. Bold체를 눈여겨 보시면 될듯.
Delphi/Pascal
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 |
with DBISAMQuery2 do begin Close; SQL.Clear; SQL.Text := 'Select * from Clean_Drop'; Open; S := ''; S1 := ''; for I := 0 to FieldCount - 1 do begin S := S + Fields[I].FieldName + ','; S1 := S1 + ':' + Fields[I].FieldName + ','; end; S := Copy(S, 1, length(S) - 1) + ') Values ( '; S1 := Copy(S1, 1, length(S1) - 1) + ') '; DBISAMQuery3.Close; DBISAMQuery3.SQL.Clear; DBISAMQuery3.SQL.Text := 'Insert into Temp_Clean_Drop (' + S + S1; while not Eof do begin for I := 0 to FieldCount - 1 do DBISAMQuery3.Params[I].Assign(Fields[I]); DBISAMQuery3.ExecSQL; next; end; end; |
참고만 하세요.
쿼리 안쓰고, table의 내용을 다른 table에 복사하기.
Published Date: 2008년 8월 22일
뭐 전 간단히 DBISAM을 예를 든거지만, 어떤 방식이던 아래처럼 하면 빠릅니다. 쿼리를 이용하면 더 빠르지만, 쿼리를 이용할수 없을때 사용하세요. Session이 다르거나, Server를 Local디비로 내리거나 올릴때…
DBISAM DBServer Admin설정하기.
Published Date: 2008년 8월 20일
DBISAM의 Server에 Admin을 설정하는 부분의 소스이다. var i: Integer; CurDatabaseUser: string; TempPermissions: TDatabaseRights; begin … DBISAMSession1.GetRemoteUserNames(UserList.Items); // User명 입력. 100명 입력하기. for i := 1…
최신 댓글