Discussion :

[pinpin44]

Bonjour,
Dans un script VB, j'essaye d'accéder à une vue d'une base de données SYBASE.
Je réalise pour cela une connexion ADODB puis après avoir créé mon recordset je récupère les données de chaque colonne. Jusque là tout est classique.

Je n'utilise pas le même driver ODBC suivant ce que dispose l'ordinateur du client : soir "Sybase System 11" soit "Sybase ASE ODBC Driver". Tout fonctionne pour le mieux lorsque j'utilise le driver "Sybase ASE ODBC Driver".
Alors que pour le driver "Sybase System 11", certaines données sont tronquées. Lorsque je récupère un numéro de dossier, les numéro terminant par un zéro sont tronqués.
Voici le code :

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
 
Set rstTable = New ADODB.Recordset
 
'Requête SQL récupérant les éléments engagés dont les dossiers ne sont pas clos et dont
'les actions sont fixes
str_sql = "select distinct DOSCTE_CDN, ELT_ENGA_RFA from V_CTRL_ELENGA" _
    & " where ETAT_DOSS_RFA='V' and ACT_FIX_RFA='F' and CTE_EFFET_DT<'" & _
    Annee_element & "/01/01'"
 
'Execution de la requête
rstTable.Open str_sql, cnx
 
nb_objets = 0
While Not (rstTable.EOF)
  resultat = resultat & rstTable("DOSCTE_CDN").Value & "/" & rstTable("ELT_ENGA_RFA").Value & ";"
  rstTable.MoveNext
  nb_objets = nb_objets + 1
Wend
 
Liste_objets = resultat

======> "rstTable("DOSCTE_CDN").Value" me renvoie par exemple "3007" au lieu de "30070".

Merci de votre aide

[Xo]

As-tu regardé du côté des propriétés des drivers ODBC, il y a parfois des options pas très visibles, et qui pourraient être à l'origine de ton souci ?

[pinpin44]

As-tu regardé du côté des propriétés des drivers ODBC, il y a parfois des options pas très visibles, et qui pourraient être à l'origine de ton souci ?

Parles-tu des propriétés du driver ODBC ou des propriétés d'un data source (DSN) pour une connexion ODBC?
Car les propriétés d'un driver ODBC, je ne sais pas où je peux les trouver.
De plus ma connexion, je l'ai faite via une chaîne de connexion sans DSN :

Code :

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

cnx.ConnectionString = "Driver={SYBASE System 11};Srvr=DS_LINDA_PRD;Uid=digactconsult;Pwd=*****"

[Xo]

Pardon, problème de vocabulaire, je parlais des sources de données ODBC.

Je ne sais pas te répondre, désolé. Comme ta question est relativement pointue, essaye de la poser sur le forum Autres SGBD si tu n'obtiens pas de répoonses ici

[Edit]
trouve ce post :
http://www.developpez.net/forums/viewtopic.php?t=324792&highlight=sybase+11

PS : la 11.0.3 n'est officiellement pas compatible Y2K (à par si c'est une 11.0.3.3), et plus supportée depuis près de 4 ans. ne pensez-vous pas qu'il serait judicieux de passer à une version plus récente (ceci dit, cela ne changera en rien votre pproblématique actuelle)

Je ne sais pas si ça pourra t'aider à résoudre ton souci, mais ça fait un solide argument de MAJ de version !
[/Edit]

[pinpin44]

Oki merci je vais voir vers le forum que tu m'as indiqué...