[R] Problème $oRs.RecordCount à -1 et curseur

[scorp84]

Bonjour,

Me revoila avec mon petit problème de base de données.

Grâce à Garydelamer (merci +++ , j'ai pu réussir à me connecter à un alias ODBC qui se connecte à une base SQL.

Jusque là, tout va bien

Par contre, j'obtiens des données mais un $oRs.RecordCount à -1.

Après avoir cherché sur le forum et sur Internet, j'ai trouvé ceci :
http://www.adopenstatic.com/Faq/recordcounterror.asp

Si j'ai bien compris, il y a un problème au niveau du curseur.

Voici mon code :

► Afficher le texte

Code : Tout sélectionner

#include <Array.au3>
Local $oConn = ObjCreate("ADODB.Connection")
$oConn.ConnectionString = "DSN=XXX;Uid=YYY;Pwd=ZZZ;"
$test=$oConn.Open

Local $SQL = "SELECT CODE,PRENOM,NOM FROM UTI WHERE NOM NOT LIKE 'test%' AND NOM NOT LIKE 'Z %' ORDER BY PRENOM"
Local $oRs = ObjCreate("ADODB.Recordset")
[b];$oRs.Open($SQL, $oConn, $adOpenDynamic, $adLockReadOnly)
$oRs.Open($SQL, $oConn)[/b]

ConsoleWrite("Source: " & $oRs.Source & @LF)
ConsoleWrite("  RecordCount: " & $oRs.RecordCount & ", Fields.Count: " & $oRs.Fields.Count & @LF)
ConsoleWrite("  Position: " & $oRs.AbsolutePosition & ", PageSize: " & $oRs.PageSize)
ConsoleWrite(", Page/PageCount: " & $oRs.AbsolutePage & "/" & $oRs.PageCount & @LF)
 

Si j'active la ligne :

Code : Tout sélectionner

$oRs.Open($SQL, $oConn, $adOpenDynamic, $adLockReadOnly)

La console me sort :

Code : Tout sélectionner

R:\Scripts\Autoit - BM'Tools\_Fonctions\Accès bdd\Bdd.au3(8,39) : WARNING: $adOpenDynamic: possibly used before declaration.
R:\Scripts\Autoit - BM'Tools\_Fonctions\Accès bdd\Bdd.au3(8,56) : WARNING: $adLockReadOnly: possibly used before declaration.
R:\Scripts\Autoit - BM'Tools\_Fonctions\Accès bdd\Bdd.au3(8,39) : ERROR: $adOpenDynamic: undeclared global variable.
 

Si j'active la ligne :

Code : Tout sélectionner

$oRs.Open($SQL, $oConn)

sans préciser le curseur, j'obtiens bien des valeurs dans mon recordset mais le $oRs.RecordCount est à -1

Mon problème vient-il bien du curseur ou d'ailleurs ?

Merci d'avance pour votre aide.

Amicalement.

BM

[GaRydelaMer]

Bonjour

alors les variables sont définis dans le fichiers Constantes ADO. Joint dans le Post.

Pour le curseur j'ai remarqué suivant le driver utiliser qu'il faut l'initialiser comme ca:

Code : Tout sélectionner

Local $oConn = ObjCreate("ADODB.Connection")
$oConn.ConnectionString = "ici ta chaine de connection"
$oConn.CursorLocation = $adUseClient
$oConn.Open

Voila pour le RecordSet comme je te l'avais donné c'est bon si tu ajoute dans les includes le fichier des Constantes.

[scorp84]

Trop fort une fois de plus

Merci +++++++

Amicalement.

BM