FONTE DE DADOS ODBC

TALISOF 25/12/2014 12:08:29
#443404
Pessoal preciso que minha aplicação crie de forma automática um DNS, ou seja uma fonte de dados ODBC de usuário para banco de dados mysql, alguém pode me auxiliar com essa tarefa?

Obs. o driver odbc que eu uso é o MYSQL ODBC 5.2W Driver
ACCIOLLY 26/12/2014 13:32:20
#443422
oi vc quer uma fonte odbc para manipular dados ou somente para impressão
TALISOF 29/12/2014 18:24:28
#443474
Impressão do Crystal Reports
SINCLAIR 29/12/2014 23:58:24
#443476
Resposta escolhida
Colega,

Você poderá criar um .BAT, executar e depois apagar.Use o odbcconf.exe que nas versões 32 bits fica em %windir%\system32\ e nas versões 64 bits ficam em %windir%\sysWow64\

Exemplo criando um driver ODBC para o PostgreSQL:

Dim intBuffer as integer
Dim strComandoQueCriaDNS as string

strComandoQueCriaDNS = [Ô]%windir%\system32\odbcconf.exe /a {CONFIGSYSDSN [Ô]PostgreSQL Unicode[Ô] [Ô]DSN=|Description=ConexaoComodoro|SERVERNAME=127.0.0.1|PORT=5432|DATABASE=NomeSuaBaseDeDados|UID=postgres|PWD=SenhaBancoDeDados[Ô]}[Ô]

intBuffer=FreeFile()
Open App.Path & [Ô]\criaDSN.bat[Ô] for output as #intBuffer
print #intBuffer,strComandoQueCriaDNS
close #intBuffer
shell (App.Path & [Ô]\criaDNS.bat[Ô])


Tudo de bom.
Tópico encerrado , respostas não são mais permitidas