请教一个pro*c问题，怎样在一个线程中连接两个数据库

pinyin

建立两个连接是这样的：
    EXEC SQL DECLARE link1 DATABASE;
      EXEC SQL DECLARE link2 DATABASE;
      EXEC SQL CONNECT :usrname1 IDENTIFIED BY :passwd1 AT link1 USING :db1;
      EXEC SQL CONNECT :usrname2 IDENTIFIED BY :passwd2 AT link2 USING :db2;

请问我后面sql语句该怎么指定一个数据库连接呢？
找了半天资料也没找到，哪位大侠知道，帮帮忙。

pinyin

顶顶

mengwg

参考下面:
  注意 sql_context  用法

1. 
   
2. int TDb_Connect_Ora::DbConnect(char * dbname,char * username,char * password)
   
3. {
   
4. EXEC SQL BEGIN DECLARE SECTION;
   
5.   char * pusername=username;
   
6.   char * ppassword=password;
   
7.   sql_context dbarea;
   
8.   struct sqlca sqlca;
   
9.   char   connect_str[200];
   
10. EXEC SQL END DECLARE SECTION;
    
11. 
    
12.   printf("dbconnect %s %s\n",dbname,username);
    
13.   sqlca.sqlcode=0;
    
14.   EXEC SQL ENABLE THREADS;
    
15.   EXEC SQL CONTEXT ALLOCATE :dbarea;
    
16.   if(sqlca.sqlcode!=0)
    
17.   {
    
18.     printf("dbconnect %s %s fail\n",dbname,username);
    
19.     printf("connect to database error : sqlcode is %d u: %s p: %s\n",sqlca.sqlcode,pusername,ppassword);
    
20.     return 0;
    
21.   };
    
22. 
    
23.   EXEC SQL CONTEXT USE :dbarea;
    
24.   if(sqlca.sqlcode!=0)
    
25.   {
    
26.     printf("dbconnect %s %s fail\n",dbname,username);
    
27.     printf("connect to database error : sqlcode is %d u: %s p: %s\n",sqlca.sqlcode,pusername,ppassword);
    
28.     return 0;
    
29.   };
    
30. 
    
31.   strcpy(mUserName,username);
    
32.   strcpy(mPassWord,password);
    
33.   strcpy(mDbName,dbname);
    
34. 
    
35.   if(password[0]!=0)
    
36.     sprintf(connect_str,"%s/%s",pusername,ppassword);
    
37.   else
    
38.     sprintf(connect_str,"%s",pusername);
    
39. 
    
40.   EXEC SQL CONNECT :connect_str;
    
41.   //EXEC SQL CONNECT :pusername IDENTIFIED BY :ppassword;
    
42.   if(sqlca.sqlcode!=0)
    
43.   {
    
44.     printf("dbconnect %s %s fail\n",dbname,username);
    
45.     printf("connect to database error : sqlcode is %d u: %s p: %s\n",sqlca.sqlcode,pusername,ppassword);
    
46.     return 0;
    
47.   };
    
48.   mDbAreaList=dbarea;      
    
49.   printf("dbconnect %s %s ok\n",dbname,username);
    
50.   return 1;
    
51. }
    
52. 
    
53. void TDb_Connect_Ora::DbDisconnect()
    
54. {
    
55. EXEC SQL BEGIN DECLARE SECTION;
    
56.   sql_context dbarea=mDbAreaList;
    
57.   struct sqlca sqlca;
    
58. EXEC SQL END DECLARE SECTION;
    
59. 
    
60. EXEC SQL CONTEXT USE :dbarea;
    
61.   DbExecuteSql(NULL,"commit");
    
62.   EXEC SQL COMMIT WORK RELEASE;
    
63.   EXEC SQL CONTEXT FREE :dbarea;
    
64. }
    
65. 
    

复制代码

pinyin

谢谢mengwg的热心帮助。
可能是我没说清楚，多线程多个连接我是没问题的。
我是想在一个线程里连两个不同的数据库，从数据库1中取出数据然后存入到数据库2中。

酷酷长大了

可不可以先这样：EXEC SQL DATABASE db1；取数据；EXEC SQL CLOSE DATABASE; 然后再EXEC SQL DATABASE db2；存数据；EXEC SQL CLOSE DATABASE;

pinyin

to:酷酷长大了
不行的，因为db1中是一批数据，数据量非常大，我要用游标取出一条到db2中做对应的动作，然后再取下一条。

mengwg

原帖由 "pinyin" 发表：
谢谢mengwg的热心帮助。
可能是我没说清楚，多线程多个连接我是没问题的。
我是想在一个线程里连两个不同的数据库，从数据库1中取出数据然后存入到数据库2中。

1\ 可以试试工作区切换.
2\ 做dblink最简单,用一个数据库操作.

pinyin

谢谢，已解决了
这样使用sql就行了：
EXEC SQL AT link1 select count(1) into:count1 from tbtest;