各位你們好！我想從一個系統內的資料庫抓值出來，做關聯，再放入另一個系統資料庫裡，但是因為做關聯，卻找不到Cname，不曉得為何？？以下是我的程式碼！ while not qr_Source.Eof do begin with qr_NTIS do begin close; sql.clear; qr_Source.sql.clear; sql.add('INSERT STUDENT(STU_CNAME,DEP_ID) VALUES(:VCname,:VDep)');//VALUES(:VCname,:VDep) sql.add('SELECT Cname,Dep FROM ustud,STUDNET WHERE ustud.Stuid=STUDENT.STU_ID;'); Prepare; ParamByName('VCname').AsString:= qr_Source.fieldbyname('Cname').AsString; ParamByName('VDep').AsString:= qr_Source.fieldbyname('Dep').AsString; ExecSQL; end; qr_Source.Next; ShowMessage('學生資料的姓名匯入成功'); end;

SQLServr的語法如下: 使用 SELECT 子查詢來指定一個或多個資料列的資料值。 INSERT INTO MyTable (PriKey, Description) SELECT ForeignKey, Description FROM SomeView 所以你這一句 sql.add('INSERT STUDENT(STU_CNAME,DEP_ID) VALUES(:VCname,:VDep)');//VALUES(:VCname,:VDep) 可能要改成這樣.. sql.add('INSERT INTO STUDENT(STU_CNAME,DEP_ID)'); TRY TRY SEE..^^

引言: 各位你們好！我想從一個系統內的資料庫抓值出來，做關聯，再放入另一個系統資料庫裡，但是因為做關聯，卻找不到Cname，不曉得為何？？以下是我的程式碼！ while not qr_Source.Eof do begin with qr_NTIS do begin close; sql.clear; qr_Source.sql.clear; sql.add('INSERT STUDENT(STU_CNAME,DEP_ID) VALUES(:VCname,:VDep)');//VALUES(:VCname,:VDep) sql.add('SELECT Cname,Dep FROM ustud,STUDNET WHERE ustud.Stuid=STUDENT.STU_ID;'); Prepare; ParamByName('VCname').AsString:= qr_Source.fieldbyname('Cname').AsString; ParamByName('VDep').AsString:= qr_Source.fieldbyname('Dep').AsString; ExecSQL; end; qr_Source.Next; ShowMessage('學生資料的姓名匯入成功'); end;

qy_Source 有 Open ? 建議改寫如下 qr_Source.close; qr_Source.sql.clear; qr_Source.sql.add('SELECT Cname,Dep FROM ustud,STUDNET WHERE ustud.Stuid=STUDENT.STU_ID;'); qr_Source.open; try while not qr_Source.Eof do with qr_NTIS do begin close; sql.clear; sql.add('INSERT STUDENT(STU_CNAME,DEP_ID) VALUES(:VCname,:VDep)');//VALUES(:VCname,:VDep) Prepare; ParamByName('VCname').AsString:= qr_Source.fieldbyname('Cname').AsString; ParamByName('VDep').AsString:= qr_Source.fieldbyname('Dep').AsString; ExecSQL; qr_Source.Next; end; ShowMessage('學生資料的姓名匯入成功'); except ShowMessage('學生資料的姓名匯入失敗'); raise; end;

引言: 各位你們好！我想從一個系統內的資料庫抓值出來，做關聯，再放入另一個系統資料庫裡，但是因為做關聯，卻找不到Cname，不曉得為何？？以下是我的程式碼！ while not qr_Source.Eof do begin with qr_NTIS do begin close; sql.clear; qr_Source.sql.clear; sql.add('INSERT STUDENT(STU_CNAME,DEP_ID) VALUES(:VCname,:VDep)');//VALUES(:VCname,:VDep) sql.add('SELECT Cname,Dep FROM ustud,STUDNET WHERE ustud.Stuid=STUDENT.STU_ID;'); Prepare; ParamByName('VCname').AsString:= qr_Source.fieldbyname('Cname').AsString; ParamByName('VDep').AsString:= qr_Source.fieldbyname('Dep').AsString; ExecSQL; end; qr_Source.Next; ShowMessage('學生資料的姓名匯入成功'); end;

我想你因該發現了 sql.add('INSERT STUDENT(STU_CNAME,DEP_ID) VALUES(:VCname,:VDep)');//VALUES(:VCname,:VDep) sql.add('SELECT Cname,Dep FROM ustud,STUDNET WHERE ustud.Stuid=STUDENT.STU_ID;'); 都是用qr_NTIS 來執行不關qr_Source任何事,因此要由qr_Source抓值給qr_NTIS 你要照Mickey兄的做法!!!!

不好意思，我之前的問題沒有說清楚， 現在我想從 系統：code系統 資料庫：code 資料表：[ustsxxy(xx:學年，y:上學期(a),下學期(b)-->usts91a] 欄位：Stuid、Grade、Cclass 資料表：ustud 欄位：Cname，Dep，Ctid此表主鍵Stuid 匯入 系統：TES系統 資料庫：TeacherGrade 資料表：STUDENT 欄位：STU_ID、STU_CNAME、STU_CTID、DEP_ID、GRADE、CLASS -->我想應該就是要將code系統做關聯後再匯入tes系統的STUDENT表，所以我寫的程式，好像方向錯了！^^|| 目前對於關聯後，資料需放哪？再行匯入呢？請問各位高手，這個問題，我煩了很久了！不好意思，之前題意不清

因為mysql沒有提供view的功能，否則我想使用View會比較好解決我的問題，還是得將select的值放入字串，或是二維陣列等，才比較好匯入呢？？

Query1.Close;//Query1是code,ustud二個Table連結 Query1.sql.Clear; Query1.sql.ADD('SELECT * FROM code,ustud WHERE ustud.Stuid=code.Stuid'); Query1.Open; Query1.First; While not Query1.eof do begin //將資料轉入STUDENT qr_Source.sql.clear; qr_Source.sql.clear; qr_Source.sql.add( 'INSERT INTO STUDENT(STU_ID、STU_CNAME、STU_CTID、DEP_ID、GRADE、CLASS) VALUES ' '(' #39 Query1STU_ID.Value #39 ',' #39 Query1STU_CNAME.Value #39 ',' #39 Query1STU_CTID.Value #39 ',' #39 Query1DEP_ID.Value #39 ',' #39 Query1GRADE.Value #39 ',' #39 Query1CLASS.Value #39 ')'); qr_Source.ExecSQL; Query1.Next end; TRY TRY SEE..^^

引言: 不好意思，我之前的問題沒有說清楚， 現在我想從 系統：code系統 資料庫：code 資料表：[ustsxxy(xx:學年，y:上學期(a),下學期(b)-->usts91a] 欄位：Stuid、Grade、Cclass 資料表：ustud 欄位：Cname，Dep，Ctid此表主鍵Stuid 匯入 系統：TES系統 資料庫：TeacherGrade 資料表：STUDENT 欄位：STU_ID、STU_CNAME、STU_CTID、DEP_ID、GRADE、CLASS -->我想應該就是要將code系統做關聯後再匯入tes系統的STUDENT表，所以我寫的程式，好像方向錯了！^^|| 目前對於關聯後，資料需放哪？再行匯入呢？請問各位高手，這個問題，我煩了很久了！不好意思，之前題意不清

發表人 - chih 於 2002/12/13 22:29:27

chih您好，您可能誤會我的意思了！我是想將code資料庫裡的ustud,與ustsxxy做關聯，再insert到tes系統的TeacherGrade資料庫裡。所以不好意思修改了一下您的程式： qr_Source.Close;//qr_Source是ustxxy,ustud二個Table連結 qr_Source.sql.Clear; qr_Source.sql.ADD('SELECT * FROM ustud,ustxxy WHERE ustud.Stuid=ustxxy.Stuid'); qr_Source.Open; qr_Source.First; While not qr_Source.eof do begin //將資料轉入STUDENT qr_NTIS.sql.clear; qr_NTIS.sql.clear; qr_NTIS.sql.add('INSERT INTO STUDENT(STU_ID、STU_CNAME、STU_CTID、DEP_ID、GRADE、CLASS) VALUES ' '(' #39 qr_Source.Stuid.Value #39 ',' #39 qr_Source.Cname.Value ' ' #39 ',' #39 qr_Source.Ctid.Value #39 ',' #39 qr_Source.Dep.Value #39 #39 qr_Source.Grade.Value #39 ',' #39 qr_Source.Cclass.Value #39 ')'); qr_NTIS.ExecSQL; qr_Source.Next end; -->但是不曉得您寫的#39 是何意，還有它會發生錯誤，就是qr_Source.Stuid.Value 等，說我的Stuid,Ctid....沒有定義之類的好怪？？

不號意思因為再趕時間沒有詳細看.. #39就是', qr_Source的DataSource要指向code系統.. qr_NTIS的DataSource要指向TES系統.. 更正如下...^^ qr_Source.Close;//qr_Source是ustxxy,ustud二個Table連結 qr_Source.sql.Clear; qr_Source.sql.ADD('SELECT * FROM ustud,ustxxy WHERE ustud.Stuid=ustxxy.Stuid'); qr_Source.Open; qr_Source.First; While not qr_Source.eof do begin //將資料轉入STUDENT qr_NTIS.sql.clear; qr_NTIS.sql.clear; qr_NTIS.sql.add('INSERT INTO STUDENT(STU_ID、STU_CNAME、STU_CTID、DEP_ID、GRADE、CLASS) VALUES ' '(' #39 qr_SourceStuid.Value #39 ',' #39 qr_SourceCname.Value #39 ',' #39 qr_SourceCtid.Value #39 ',' #39 qr_SourceDep.Value #39 ',' #39 qr_SourceGrade.Value #39 ',' #39 qr_SourceCclass.Value #39 ')'); qr_NTIS.ExecSQL; qr_Source.Next end;

引言: chih您好，您可能誤會我的意思了！我是想將code資料庫裡的ustud,與ustsxxy做關聯，再insert到tes系統的TeacherGrade資料庫裡。所以不好意思修改了一下您的程式： qr_Source.Close;//qr_Source是ustxxy,ustud二個Table連結 qr_Source.sql.Clear; qr_Source.sql.ADD('SELECT * FROM ustud,ustxxy WHERE ustud.Stuid=ustxxy.Stuid'); qr_Source.Open; qr_Source.First; While not qr_Source.eof do begin //將資料轉入STUDENT qr_NTIS.sql.clear; qr_NTIS.sql.clear; qr_NTIS.sql.add('INSERT INTO STUDENT(STU_ID、STU_CNAME、STU_CTID、DEP_ID、GRADE、CLASS) VALUES ' '(' #39 qr_Source.Stuid.Value #39 ',' #39 qr_Source.Cname.Value ' ' #39 ',' #39 qr_Source.Ctid.Value #39 ',' #39 qr_Source.Dep.Value #39 #39 qr_Source.Grade.Value #39 ',' #39 qr_Source.Cclass.Value #39 ')'); qr_NTIS.ExecSQL; qr_Source.Next end; -->但是不曉得您寫的#39 是何意，還有它會發生錯誤，就是qr_Source.Stuid.Value 等，說我的Stuid,Ctid....沒有定義之類的好怪？？

呵沒關係，我把它改成以下的程式，即可以成功！您的方法我也會試看看！謝謊的回答。 程式如下： //將code資料庫的ustsxxy,ustud做關聯; qr_Source.Close;//qr_Source是ustxxy,ustud二個Table連結 qr_Source.sql.Clear; qr_Source.sql.ADD('SELECT * FROM ustud,ustsxxy WHERE ustud.Stuid=ustsxxy.Stuid'); qr_Source.Open; qr_Source.First; //清空TeacherGrade的student資料; with qr_NTIS do begin close; sql.clear; sql.Add('TRUNCATE TABLE STUDENT'); Prepare; ExecSQL; ShowMessage('學生資料刪除成功'); end; //將資料轉入STUDENT While not qr_Source.eof do begin with qr_NTIS do begin close; sql.clear; sql.add('INSERT INTO STUDENT(STU_ID,STU_CNAME,STU_CTID,DEP_ID,GRADE,CLASS) VALUES(:VStuid,:VCname,:VCtid,:VDep ,:VGrade,:VCclass)'); ParamByName('VStuid').AsString:= qr_Source.fieldbyname('Stuid').AsString; ParamByName('VCname').AsString:= qr_Source.fieldbyname('Cname').AsString; ParamByName('VCtid').AsString:= qr_Source.fieldbyname('Ctid').AsString; ParamByName('VDep').AsString:= qr_Source.fieldbyname('Dep').AsString; ParamByName('VGrade').AsString:= qr_Source.fieldbyname('Grade').AsString; ParamByName('VCclass').AsString:= qr_Source.fieldbyname('Cclass').AsString; qr_NTIS.ExecSQL; end; qr_Source.Next; showmessage('學生資料輸入成功！'); end;

你們好，亦是匯入的問題， 系統：COURSE 資料庫：course 資料表：crsdep 欄位：Crsno,Dep,Grade,Class,Mdep 與 系統：code 資料庫：code 資料表：depcod 欄位：Dep,Sub_code 以上crsdep與depcod做關聯，再匯入資料庫TeacherGrade的資料表COUSRSE裡！ 系統：TES 資料庫：TeacherGrade 資料表：Course 欄位：CRS_ID,DEP_ID,SUB_CODE,GRADE,CLASS,MDEP 想做兩個資料庫的關聯，之前再將關聯的資料匯入另一個資料庫， 但是不曉得怎麼做才好！？請高手們，幫忙一下！謝謝！^^

做法就跟上面一樣阿..Table再改一下就可以了阿.. 不會連這都要別人幫妳改吧??

引言: 你們好，亦是匯入的問題， 系統：COURSE 資料庫：course 資料表：crsdep 欄位：Crsno,Dep,Grade,Class,Mdep 與 系統：code 資料庫：code 資料表：depcod 欄位：Dep,Sub_code 以上crsdep與depcod做關聯，再匯入資料庫TeacherGrade的資料表COUSRSE裡！ 系統：TES 資料庫：TeacherGrade 資料表：Course 欄位：CRS_ID,DEP_ID,SUB_CODE,GRADE,CLASS,MDEP 想做兩個資料庫的關聯，之前再將關聯的資料匯入另一個資料庫， 但是不曉得怎麼做才好！？請高手們，幫忙一下！謝謝！^^

發表人 - chih 於 2002/12/14 22:38:43

引言:做法就跟上面一樣阿..Table再改一下就可以了阿.. 不會連這都要別人幫妳改吧?? 引言: -------------------------------------------------------------------------------- 你們好，亦是匯入的問題， 系統：COURSE 資料庫：course 資料表：crsdep 欄位：Crsno,Dep,Grade,Class,Mdep 與 系統：code 資料庫：code 資料表：depcod 欄位：Dep,Sub_code 以上crsdep與depcod做關聯，再匯入資料庫TeacherGrade的資料表COUSRSE裡！ 系統：TES 資料庫：TeacherGrade 資料表：Course 欄位：CRS_ID,DEP_ID,SUB_CODE,GRADE,CLASS,MDEP 想做兩個資料庫的關聯，之前再將關聯的資料匯入另一個資料庫， 但是不曉得怎麼做才好！？請高手們，幫忙一下！謝謝！^^ --------------------------------------------------------------------------------

chih您好，因為我覺得是不太一樣的做法，這次是不同的資料庫的關聯，需將關聯後的資料select出來，放入另一個資料庫的table裡，共三個資料庫在動作，想說有view的功能就好辦了，但是mysql沒有提供，所以我覺得跟上面的方式好像不一樣耶！我想是不是需用到delphi的暫存資料表存關聯後的東西再放入另一個資料庫呢？？不好意思好像又說的不清楚，讓您誤會了！下次會注意的！抱歉

while not qr_course.eof do begin with qr_Source do begin close; sql.clear; sql.add('SELECT Crsno,Dep,Sub_code,Grade,Class,Mdep FROM depcod,' qr_course.crsdep 'where depcod.Dep = ' qr_course.Dep.value); Prepare; Open; first; end; end; --->此程式有錯誤，出現 [Error] Dbset_Import.pas(380): Undeclared identifier: 'crsdep' [Error] Dbset_Import.pas(380): Undeclared identifier: 'dep' 上一篇問題，很不好意思，由於我的觀念不清，導致各位要一直幫我解決問題，真的很抱歉，因為這個專題很趕，所以會一心想急著知道解答，有時一卡住沒有想好，就po 問題上來，經過再思考，發現自己實在要好好想想再問問題才對！仍然謝謝幫忙我的高手們！謝謝！

這一句改成這樣.. sql.add('SELECT crsdep.Crsno,crsdep.Dep,depcod.Sub_code,crsdep.Grade,crsdep.Class,crsdep.Mdep ' 'FROM depcod,crsdep ' 'where depcod.Dep = ' #39 qr_course.Dep.value #39);

引言: while not qr_course.eof do begin with qr_Source do begin close; sql.clear; sql.add('SELECT Crsno,Dep,Sub_code,Grade,Class,Mdep FROM depcod,' qr_course.crsdep 'where depcod.Dep = ' qr_course.Dep.value); Prepare; Open; first; end; end; --->此程式有錯誤，出現 [Error] Dbset_Import.pas(380): Undeclared identifier: 'crsdep' [Error] Dbset_Import.pas(380): Undeclared identifier: 'dep' 上一篇問題，很不好意思，由於我的觀念不清，導致各位要一直幫我解決問題，真的很抱歉，因為這個專題很趕，所以會一心想急著知道解答，有時一卡住沒有想好，就po 問題上來，經過再思考，發現自己實在要好好想想再問問題才對！仍然謝謝幫忙我的高手們！謝謝！

所謂的View...你可以把他想成Query的屬性DataBaseName.. 你要把二各Table關聯..那是不是需要1各Queryㄋ?? 匯入資料..需要另外1各Queryㄋ?? 想看看...如果觀念還有不清楚再POST上來...

引言: chih您好，因為我覺得是不太一樣的做法，這次是不同的資料庫的關聯，需將關聯後的資料select出來，放入另一個資料庫的table裡，共三個資料庫在動作，想說有view的功能就好辦了，但是mysql沒有提供，所以我覺得跟上面的方式好像不一樣耶！我想是不是需用到delphi的暫存資料表存關聯後的東西再放入另一個資料庫呢？？不好意思好像又說的不清楚，讓您誤會了！下次會注意的！抱歉