odbc automatico _ msaccess 97

[Mauricio Silva 0]

TURMA! meu projeto ta caminhando..mas esbarrei no ODBC. Para evitar q, toda vez quando se faz a instalação do sistema em uma maquina diferente, tenha que se criar uma fonte de dados no painel de controle, tentei o seguinte num módulo:Sub CriaODBC() Dim Attrib, DBDriver As String Attrib = "DBQ=C:\Adolescentes\Banco\Cadastro.mdb" DBDriver = "Microsoft Access Driver (*.mdb)" DBEngine.RegisterDatabase "Cadastro", DBDriver, True, AttribEnd Submas simplesmente... não funciona!!! preciso muito descobrir como fazer (via cód) a criação do ODBC.. grato galera!

[alexandrehdk 0]

Acho que dá pra fazer isso com o objeto ODBCTool. A referência dele é "ODBC Driver & Data Source Name Functions".

[luiz humberto 0]

Pode fazer de duas maneiras:1 - Adicionar em tempo de execussão a Conexão ODBC, ou seja, toda vêz que acessarem o seu sistema irá verificar se a estação possui a conexão.2 - Utilizar uma string de conexão, a qual considero mais viável, segue abaixo:"provider = microsoft.jet.oledb.4.0;"data source="Caminho_Banco+Nome_Banco";jet oledb:database password=" & Senha_Banco

[Mauricio Silva 0]

Pode fazer de duas maneiras:1 - Adicionar em tempo de execussão a Conexão ODBC, ou seja, toda vêz que acessarem o seu sistema irá verificar se a estação possui a conexão.2 - Utilizar uma string de conexão, a qual considero mais viável, segue abaixo:"provider = microsoft.jet.oledb.4.0;"data source="Caminho_Banco+Nome_Banco";jet oledb:database password=" & Senha_Banco

Amigo! se não for incomodo, poderia me passar um exemplo? pois não faço idéia de como funciona! muito obrigado!