Q&A

  • 이종디비간의 이동(급)
안녕하세요

엑세스 에 있는 디비를 오라클 디비로 옮겨는 작업중에 궁금한점이 있어 글을 올립니다.

여하튼 리스트박스에 엑세스테이블 필드명이 나오게 하고(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;



필드명 자체도 다 바뀜

너무 난잡하네요...죄송 한번 봐주세요 ^^;

0  COMMENTS