Club Builder - Foros de discusión Club Builder
Foro de C++Builder en español
 
 FAQFAQ   BuscarBuscar   MiembrosMiembros   Grupos de UsuariosGrupos de Usuarios   RegistrarseRegistrarse 
 PerfilPerfil   Entra para ver tus mensajes privadosEntra para ver tus mensajes privados   EntrarEntrar 

MySql, ODBC, alias, todo en un post

 
Publicar nuevo tema   Responder al tema    Foros de discusión -> Bases de Datos
Ver tema anterior :: Ver tema siguiente  
Autor Mensaje
Mensaje    Asunto: MySql, ODBC, alias, todo en un post Responder citando

Mi pregunta es como puedo hacer para instalar el ODBC de Mysql de forma transparente en caso de no existir este y despues como crear un alias para este ODBC

He visto ejemplos de crear alias para PARADOX, y para ACCESS pero e probado a acerlo con mysql y no puedo

Espero una respuesta de este maginifico foro Rolling Eyes

Gracias
_________________
Los problemas mas dificiles tienen las soluciones mas sencillas
Volver arriba
Ver perfil de usuario Enviar mensaje privado Enviar email Visitar sitio web del autor MSN Messenger
Mensaje    Asunto: Responder citando

Código:

fReg:= TRegistry.Create;
  fReg.OpenKey('\Software\ODBC\ODBC.INI\DocumentsFab', True);
  fReg.WriteString('Database', 'Documents');
  fReg.WriteString('Description', ' ');
  fReg.WriteString('Driver', 'C:\WINNT\System32\myodbc.dll');
  fReg.WriteString('Flag', '1');
  fReg.WriteString('Password', '');
  fReg.WriteString('Port', ' ');
  fReg.WriteString('Server', 'xmark');
  fReg.WriteString('User', 'winuser');
  fReg.OpenKey('\Software\ODBC\ODBC.INI\ODBC Data Sources', True);
  fReg.WriteString('DocumentsFab', 'MySQL');
  fReg.CloseKey;
  fReg.Free;

  Memo1.Lines.Add('DATABASE NAME=');
  Memo1.Lines.Add('USER NAME=');
  Memo1.Lines.Add('ODBC DSN=DocumentsFab');
  Memo1.Lines.Add('OPEN MODE=READ/WRITE');
  Memo1.Lines.Add('BATCH COUNT=200');
  Memo1.Lines.Add('LANGDRIVER=');
  Memo1.Lines.Add('MAX ROWS=-1');
  Memo1.Lines.Add('SCHEMA CACHE DIR=');
  Memo1.Lines.Add('SCHEMA CACHE SIZE=8');
  Memo1.Lines.Add('SCHEMA CACHE TIME=-1');
  Memo1.Lines.Add('SQLPASSTHRU MODE=SHARED AUTOCOMMIT');
  Memo1.Lines.Add('SQLQRYMODE=');
  Memo1.Lines.Add('ENABLE SCHEMA CACHE=FALSE');
  Memo1.Lines.Add('ENABLE BCD=FALSE');
  Memo1.Lines.Add('ROWSET SIZE=20');
  Memo1.Lines.Add('BLOBS TO CACHE=64');
  Memo1.Lines.Add('BLOB SIZE=32');

  AliasEditor.Add('DocumentsFab','MySQL',Memo1.Lines);


Laughing aora solo queda lo del ODBC Very Happy


SE QUEDA ASI PARA QUIEN LE INTERESE
Código:

#include <Registry.hpp>

 char WinDir[144];
  GetWindowsDirectory(WinDir, sizeof(WinDir));
TRegistry *Registry = new TRegistry;
Registry->RootKey = HKEY_CURRENT_USER;

Registry->OpenKey("\\Software\\ODBC\\ODBC.INI\\ALIASMYSQL",true);

Registry->WriteString("Database","Builder");
Registry->WriteString("Description"," ");
Registry->WriteString("Driver",AnsiString(WinDir)+"\\system32\\myodbc3.dll");
Registry->WriteString("PWD","");
Registry->WriteString("Server","localhos");
Registry->WriteString("User","winuser");
Registry->CloseKey();
Registry->OpenKey("\\Software\\ODBC\\ODBC.INI\\ODBC Data Sources", true);
Registry->WriteString("ALIASMYSQL","MySQL ODBC 3.51 Driver");
Registry->CloseKey();
delete Registry;


y para borrar

Código:


TRegistry *Registry = new TRegistry;
Registry->RootKey = HKEY_CURRENT_USER;

Registry->DeleteKey("\\Software\\ODBC\\ODBC.INI\\ALIASMYSQL");
Registry->OpenKey("\\Software\\ODBC\\ODBC.INI\\ODBC Data Sources",true);
Registry->DeleteValue("ALIASMYSQL");
delete Registry;

_________________
Los problemas mas dificiles tienen las soluciones mas sencillas
Volver arriba
Ver perfil de usuario Enviar mensaje privado Enviar email Visitar sitio web del autor MSN Messenger
Mostrar mensajes de anteriores:   
Cambiar a:  
No puedes publicar temas nuevos en este foro
No puedes responder a temas en este foro
No puedes editar tus mensajes en este foro
No puedes borrar tus mensajes en este foro
No puedes votar en las encuestas de este foro


Hosting WordPress Indedmedia desde 3,99 €
© 2002–2026 Club Builder · Funciona con phpBB.