안녕하세요
엑세스 에 있는 디비를 오라클 디비로 옮겨는 작업중에 궁금한점이 있어 글을 올립니다.
여하튼 리스트박스에 엑세스테이블 필드명이 나오게 하고(listbox2) 오라클테이블 필드명도 나오게 하였음(listbox4)..
근데 이걸루 batchmove mappings 속성을 이용할려구 하는데 잘 안되네요..(이건 추가하고싶은 내용)
그리구 실행을 하면 왜 오라클에 있는 필드명 자체도 액세스에 있는 필드명으로 다바뀌어 버립니다..고수님들 해결좀 해주세요..
예) mdb | 오라클
기업명 텍스트 (14) | code char(7)
procedure Tform1.Button2Click(Sender: TObject);
var
i:integer;
begin
if (radiobutton1.Checked) or (radiobutton2.Checked) or(radiobutton3.Checked) or
(radiobutton4.Checked) or (radiobutton5.Checked) then
begin
with Table1 do begin
Active:=False;
//Databasename:=adoacess ;
TableName := listbox1.items[listbox1.itemindex];
Active:= True;
end;
with Table2 do begin
Active:= False;
// Databasename:=''; //B.db가 들어 있는 알리어스나 경로.
//TableName:= listbox3.items[listbox3.itemindex];
end;
for i:=0 to listbox4.Columns -1 do
batchmove1.Mappings.add(listbox2.Items[i] +'='+listbox4.Items[i]);
if radiobutton1.Checked then
Table2.BatchMove(Table1, batupdate)
else if radiobutton2.Checked then
Table2.BatchMove(Table1, batcopy)
else if radiobutton3.Checked then
Table2.BatchMove(Table1, batappend)
else if radiobutton4.Checked then
Table2.BatchMove(Table1, batdelete)
else if radiobutton5.Checked then
Table2.BatchMove(Table1, batappendupdate);
end
else showmessage('옵션을 선택하세요');
dbgrid2.Refresh;
end;
필드명 자체도 다 바뀜
너무 난잡하네요...죄송 한번 봐주세요 ^^;