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

[JLV]

Bonjour

Merci pour ton aide , j'ai résolu le problème d'une autre maniére j'ai téléchargé sybase anywhere 9 j'ai récuperé le driver ODBC j'ai créé un alias et avec
le BDE tout roule.... Merci de ton aide je viendrais + souvent sur ce forum
j'allais sur servers.ami.... mais le forum developpez.com semble avoir + de connexion..
Pour Sybase c'était un accident je bosse avec DELPHI 7 + FB 2+tmssoftware+
corelab pour taper fb (trés bonne VCl ).
je bosse en pda (Palm surtout..et Pocket Pc initialement) j'ai travaillé avec VS2005 et cela rame j'attends avec impatient l'integration des Pda avec delphi et je risque d'attendre longtemps...
Cordialement JLV

[anapurna]

salut

je suis sur les deux donc y'a pas de soucis

@+ Phil