Estou tentando
conectar com um mdb sem proteção de senhas (parece que o CTD ainda apresenta
problemas utilizando mdb com proteção) e no caso do SqlServer um DB normal com
senhas, usuários...
Conexão com
Access:
Set
SqlDatabase='SiesCotacao2'
Set SqlUser = 'Admin'
Set SqlPassword = ''
Set strSessionProperties = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\\Working\\SiesCotacao2.mdb;Persist Security Info=False;'
ou
Set SqlUser = 'Admin'
Set SqlPassword = ''
Set strSessionProperties = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\\Working\\SiesCotacao2.mdb;Persist Security Info=False;'
ou
Conexão com
SqlServer:
Set
SqlDatabase='SIESCOT'
Set SqlUser = 'ADMSAB'
Set SqlPassword = 'ADMSAB'
Set strSessionProperties = 'Provider=SQLOLEDB; Initial Catalog='||SqlDatabase||';Data Source=ESTAMP26;User ID='||SqlUser||';Password='||SqlPassword||';'
Set SqlUser = 'ADMSAB'
Set SqlPassword = 'ADMSAB'
Set strSessionProperties = 'Provider=SQLOLEDB; Initial Catalog='||SqlDatabase||';Data Source=ESTAMP26;User ID='||SqlUser||';Password='||SqlPassword||';'
If SqlCreateSession
( Session_Handle, strSessionProperties)
If SqlCreateStatement ( Session_Handle, Sql_Handle )
Call SalMessageBox( 'Conectado OLEDB','Atenção', MB_Ok )
Call SalTblPopulate( TBL1, Sql_Handle, 'SELECT * FROM Clausula', TBL_FillNormal )
If SqlCreateStatement ( Session_Handle, Sql_Handle )
Call SalMessageBox( 'Conectado OLEDB','Atenção', MB_Ok )
Call SalTblPopulate( TBL1, Sql_Handle, 'SELECT * FROM Clausula', TBL_FillNormal )
Nas duas opções a
TBL1 apresenta somente 3 colunas e sem os dados, via ODBC funciona nos dois
bancos de dados.
Alguém ja trabalhou
com o CTD2000 acessando Access ou SqlServer via OLEDB e poderia me dar
algumas dicas ?
Grato