FAQ DelphiConsultez toutes les FAQ

Nombre d'auteurs : 123, nombre de questions : 918, dernière mise à jour : 4 avril 2019  Ajouter une question

 

Cette FAQ a été réalisée à partir des questions fréquemment posées sur les forums Delphi et Delphi et bases de données de www.developpez.com et de l'expérience personnelle des auteurs.

Nous tenons à souligner que cette FAQ ne garantit en aucun cas que les informations qu'elle propose soient correctes. Les auteurs font le maximum, mais l'erreur est humaine. Cette FAQ ne prétend pas non plus être complète. Si vous souhaitez y apporter des corrections ou la compléter, contactez un responsable (lien au bas de cette page).

Nous espérons que cette FAQ saura répondre à vos attentes. Nous vous en souhaitons une bonne lecture.

L'équipe Delphi de Developpez.com.

Commentez


SommaireBases de donnéesODBC (3)
précédent sommaire suivant
 

Les sources de données ODBC sont stockées dans la base de registre, à l'exception des sources Fichiers, qui sont stockées dans des fichiers (et que je ne traiterai pas ici).

Il existe deux types de sources : les sources « utilisateur » et les sources « système ». Les sources utilisateur sont propres à chaque utilisateur et stockées dans HKEY_CURRENT_USER tandis que les sources système sont accessibles à tous les utilisateurs du PC et sont stockées dans HKEY_LOCAL_MACHINE.

  1. chaque source de données est recensée sous la clé : [HKLM | HKCU] / Software / ODBC / ODBC.INI / ODBC Data Sources par une valeur chaîne qui a pour nom la source de données et pour valeur le nom du driver ;
  2. les paramètres de la source de données se trouvent dans [HKLM | HKCU] / Software / ODBC / ODBC.INI / "Nom de la source de données".

Exemple : création d'une source MaSourceSQLServer basée sur le driver SQL Server :
Code delphi : Sélectionner tout
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
  
with TRegistry.Create do 
  try 
    { Recensement de la source de données (1) } 
    RootKey := HKEY_LOCAL_MACHINE; 
    OpenKey('\Software\ODBC\ODBC.INI\ODBC Data Sources',false); 
    WriteString('MaSourceSQLServer','SQL Server'); 
    { Ecriture des paramètres (2) } 
    if not OpenKey('\Software\ODBC\ODBC.INI\MaSourceSQLServer',true) then 
      raise Exception.Create('impossible de créer la clé : '+ 
      '<\Software\ODBC\ODBC.INI\MaSourceSQLServer>'); 
    WriteString('Driver','C:\WINNT\System32\sqlsrv32.dll'); 
    WriteString('Description','Source créée par programme'); 
    WriteString('Server','SRVSQL'); 
    WriteString('LastUser','SA'); 
    WriteString('Trusted_Connection','Yes'); 
  finally 
    Free; 
  end;
Ce code ne fait aucune vérification et est basé sur une source de données ne comportant pas beaucoup de paramètres. Afin de faciliter la création de ce genre de code, j'ai créé un utilitaire qui génère le code Delphi nécessaire à la création d'une source ODBC, avec en plus la vérification de la non-existence de cette source, de la présence du driver et de la version du driver. Vous pouvez le télécharger ci-dessous.

Mis à jour le 18 octobre 2013 Bloon

Les alias ODBC sont ajoutés dans l'administrateur BDE en fonction des sources ODBC définies dans le panneau de configuration. C'est donc dans le panneau de configuration qu'il faut supprimer les sources ODBC.

Mis à jour le 18 janvier 2014 Nono40

Avec une connexion ODBC à une base de données, il est possible d'utiliser le format ODBC DateTime. Une définition de ce format est disponible ici sur le site msdn de Microsoft.

Nous allons tout de même commenter ce format ODBC DateTime : {type 'valeur_constante'}
La valeur type est un caractère qui peut prendre les valeurs suivantes :

  • d : date seule
  • t : heure seule
  • ts : date + heure

La valeur_constante peut être formatée selon le type définit ci-dessus et de la manière suivante :
  • d : yyyy-mm-dd
  • t : hh :mm :ss[.ff]
  • ts : yyyy-mm-dd hh :mm :ss[.ff]

Pour les exemples se reporter à la page de Microsoft.

L'utilisation de ce format peut être un avantage lors de la construction de requêtes SQL. En effet cela permet de gérer les champs au format dateTime sans faire appel aux paramètres dans les requêtes. Pour mettre cela en œuvre nous allons définir la fonction 'dateTimeToODBCDatetime' qui formate l'objet TDateTime fournie par DateTime en utilisant l'ODBCDateTimeFormats indiqué par format.
Les spécificateurs de format sont les suivants :
  • formatDate : { d 'yyyy-mm-dd' }
  • formatHeure : { t 'hh:nn:ss' }
  • formatHeureMil : { t 'hh:nn:ss.zz' }
  • formatDateHeure : { ts ' yyyy-mm-dd hh:nn:ss' }
  • formatDateHeureMil : { ts ' yyyy-mm-dd hh:nn:ss.zz' }

Code delphi : Sélectionner tout
1
2
3
4
5
6
7
8
9
10
11
12
13
14
type 
  ODBCDateTimeFormats = (formatDate, formatHeure, formatHeureMil, 
                         formatDateHeure, formatDateHeureMil); 
  
function dateTimeToODBCDatetime(dateTime: TDateTime; format: ODBCDateTimeFormats):string; 
begin 
  case format of 
    formatDate  : result := #123' d '+quotedStr(FormatDateTime('yyyy-mm-dd',dateTime))+'}'; 
    formatHeure  : result := #123' t ' +quotedStr(FormatDateTime('hh:nn:ss',dateTime))+'}'; 
    formatHeureMil : result := #123' t ' +quotedStr(FormatDateTime('hh:nn:ss.zz',dateTime))+'}'; 
    formatDateHeure : result := #123' ts '+quotedStr(FormatDateTime('yyyy-mm-dd hh:nn:ss',dateTime))+'}'; 
    formatDateHeureMil: result := #123' ts '+quotedStr(FormatDateTime('yyyy-mm-dd hh:nn:ss.z',dateTime))+'}'; 
  end; 
end;
Maintenant nous pouvons directement gérer le format DateTime dans une requête de la façon suivante en utilisant par exemple un TADOQuery et sans définir aucun paramètre :
Code delphi : Sélectionner tout
1
2
ADOQuery1.SQL.add('SELECT * FROM TOTO' 
       +' WHERE DATE_FIELD = '+dateTimeToODBCDatetime(now,formatDate));
ou encore
Code delphi : Sélectionner tout
ADOQuery1. sql.Add('UPDATE TOTO SET DATE_FIELD = '+dateTimeToODBCDatetime(now,formatHeure)+' WHERE CODE = 11');

Mis à jour le 18 janvier 2014 Pascal Jankowski

Proposer une nouvelle réponse sur la FAQ

Ce n'est pas l'endroit pour poser des questions, allez plutôt sur le forum de la rubrique pour ça


Réponse à la question

Liens sous la question
précédent sommaire suivant
 

Les sources présentées sur cette page sont libres de droits et vous pouvez les utiliser à votre convenance. Par contre, la page de présentation constitue une œuvre intellectuelle protégée par les droits d'auteur. Copyright © 2019 Developpez Developpez LLC. Tous droits réservés Developpez LLC. Aucune reproduction, même partielle, ne peut être faite de ce site et de l'ensemble de son contenu : textes, documents et images sans l'autorisation expresse de Developpez LLC. Sinon vous encourez selon la loi jusqu'à trois ans de prison et jusqu'à 300 000 € de dommages et intérêts.

 
Responsables bénévoles de la rubrique Delphi : Gilles Vasseur - Alcatîz -

Partenaire : Hébergement Web