RES: [sqlwin] Select em dois BD

Thu, 20 Sep 2001 07:20:35 -0700 

Amigo Jo�o,

        � poss�vel sim.
        Primeiramente vc tem que criar duas conec��es em odbc ( no seu caso
de exemplo abaixo ). Ex. ACCESS e SQLSERVER
        Ap�s as duas conec��es, configur�-las no SQL.ini
        ex.

[odbcrtr]
remotedbname=ACCESS,dsn=ACCESS
remotedbname=SQLSERVER,dsn=SQLSERVER

        No Seu Programa quando vc for conectar aos bancos. Crie dois Sql
Handles( hSqlAccess e hSqlServer ) fica a seu crit�rio. Ex

Call SalWaitCursor( TRUE )
Set SqlResultSet = TRUE 
Set SqlDatabase = 'ACCESS'
Set SqlUser = ????
Set SqlPassword = ????
call SqlConnect( hSqlAccess ) 

Set SqlDatabase = 'SQLSERVER'
Set SqlUser = ????
Set SqlPassword = ????
call SqlConnect( hSqlServer ) 
Call SalWaitCursor( FALSE )

        Ai sim vc vai conectar em dois bancos diferentes.

Ricardo

-----Mensagem original-----
De: Joao Batista Sesconetto [mailto:[EMAIL PROTECTED]]
Enviada em: Quinta-feira, 20 de Setembro de 2001 09:37
Para: [EMAIL PROTECTED]
Assunto: [sqlwin] Select em dois BD


 Caros amigos da lista, bom dia.

 N�o sei se � possivel, mas alguem pode me dizer se a conec��o com dois
bancos
de dados diferentes (Access e SqlServer, exemplo abaixo), � possivel em
um "SELECT" apenas, 
fazer um merge de informa��es de tabelas dos dois Bancos ao mesmo tempo.
Se for possivel 
mande-me algumas linhas como exemplo.

  Antecipadamente, muito obrigado a todos.

  Jo�o B. Sesconetto.

!!CB!! 28
On SAM_AppStartup

    **** Conec��o com o primeiro Banco de Dados:

        Set SqlDatabase = "BD_ACCESS"
        Set SqlUser = ""
        Set SqlPassword = "BD1"
        Set Nome_Usuario = "SESCONETTO"
        If NOT SqlConnect( hSqlAccess )
                Call SalMessageBox( "Problemas de conex�o.", "Aten��o",
MB_Ok )
        Call SqlSetParameter ( hSqlAccess, DBP_AUTOCOMMIT, FALSE,
strNull)

    **** Conec��o com o segundo Banco de Dados:

        Set SqlDatabase = "BD_SQLSERVER"
        Set SqlUser = ""
        Set SqlPassword = "BD2"
        Set Nome_Usuario = "SESCONETTO"
        If NOT SqlConnect( hSqlServer )
                Call SalMessageBox( "Problemas de conex�o.", "Aten��o",
MB_Ok )
        Call SqlSetParameter ( hSqlServer, DBP_AUTOCOMMIT, FALSE,
strNull)


=============================================Lista de Centura SQLWindows
Administrador : [EMAIL PROTECTED]
[ http://www.centuraexplorer.com ]
Para sair desta lista mande mensagem para:
[EMAIL PROTECTED] sem nada no Subject e
com o comando a seguir no corpo da msg:
"unsubscribe sqlwin" (sem as aspas)
=============================================
=============================================Lista de Centura SQLWindows
Administrador : [EMAIL PROTECTED]
[ http://www.centuraexplorer.com ]
Para sair desta lista mande mensagem para:
[EMAIL PROTECTED] sem nada no Subject e
com o comando a seguir no corpo da msg:
"unsubscribe sqlwin" (sem as aspas)
=============================================

Responder a