Discussion :

[JLV]

Je dois faire des extractions sur une Base de données SYBASE à priori verison
9 ou puis je trouver un driver ODBC ou il y a t'il de meilleures solutions
(VCL) je developpe avec Delphi 7

Merci de vos réponses JLV

[anapurna]

salut

bde avec des tquery ça roule tout seul

@+ Phil

[JLV]

Merci Ananpurna mias je me fais planter il me met Echec lors de l' initialisation
est ce qu'il y a des choses specifiques à parametrer dans le BDE

Merci

[anapurna]

salut

utilise un compo database
ensuite dans le bde il faut changer la dll de sybase


voici comment j'initialise le database

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
 
const
  CSTR_APP_NAME      = 'APPLICATION NAME';
  CSTR_HOST_NAME     = 'HOST NAME';
  CSTR_DEFAULT_ALIAS = 'MYALIAS';
var
   ParamIndex : Integer;
   ComputerName : Array[0..MAX_COMPUTERNAME_LENGTH] of char;
   ComputerNameLength : DWORD;
begin
   dbPROG.Connected := FALSE;// parametre 'APPLICATION NAME'
   ParamIndex := dbPROG.Params.IndexOfName(CSTR_APP_NAME);
  if (ParamIndex <> -1)then
    dbPROG.Params[ParamIndex] := CSTR_APP_NAME+'='+Application.Title
  else
    dbPROG.Params.Add(CSTR_APP_NAME+'='+Application.Title);
  // parametre 'HOST NAME'
  ComputerNameLength := MAX_COMPUTERNAME_LENGTH + 1;
  GetComputerName(ComputerName, ComputerNameLength);
  ParamIndex := dbPROG.Params.IndexOfName(CSTR_HOST_NAME);
  if (ParamIndex <> -1) then
    dbPROG.Params[ParamIndex] := CSTR_HOST_NAME+'='+StrPas(ComputerName)
	else
  dbPROG.Params.Add(CSTR_HOST_NAME+'='+StrPas(ComputerName));
  // parametre ALIAS
  if (System.ParamCount > 0)  then 
    dbPROG.AliasName := System.ParamStr(1)
  else 
     dbPROG.AliasName := CSTR_DEFAULT_ALIAS;
  try
    dbPROG.Connected := TRUE;
  except
     ShowMessage('La base identifiée par '''+dbPROG.AliasName+''' est introuvable.');
     Halt(1);
   end;
end;

ensuite dans chaque query le databasename tu met le databasename du Tdatabase. dans mon exemple dbPROG.databasename


@+ Phil

[JLV]

Je ne veux pas abuser anapurna...

Je ne comprends pas la notion de changer la dll dans le bde..
Dans le bde je crée un allias avec type SYBASE ???
je ne dois pas avoir tout saisi...

Merci anapurna

[anapurna]

salut


dans l'administrateur BDE tu créer un alias de type SYBASE
il faut aussi aller dans l'onglet configuration dans drivers native sybase
propriété DLL32 tu met sqlsyb32.dll si tu utilise des champs de type blob (fichier,image...)
il est prudent de modifier la taille du blobsize

@+ Phil