Comment récupérer de grandes données à partir de la base de données Oracle à l'aide de vbscript

Question

Je travaille maintenant sur vbscript pour faire un test. Actuelly, je veux récupérer une grande quantité de données à partir d'une base de données Oracle, donc j'écrire le code comme ceci:

sql = "Select * from CORE_DB where MC = '" & mstr & "' " 
Set myrs = db_execute_query(curConnection, sql) 

Ensuite, je compte les lignes myrs, il y a 248 lignes. Alors, je fais une boucle Pour pour récupérer des champs de chaque ligne.

For k = 0 To db_get_rows_count(myrs) 

Mais je trouve que le contenu de la ligne k lorsque k> 133 était toujours égal à k = 133. Donc, cela fait une erreur.

La db_execute_query fonction est comme

Function db_execute_query (byRef curSession , SQL) 
set rs = curSession.Execute(SQL) 
set db_execute_query = rs 
End Function 

La db_get_rows_count fonction est comme

Function db_get_rows_count(byRef curRS) 
    dim rows 
    rows = 0 
    db_get_rows_count = rows 
    curRS.MoveFirst 
    Do Until curRS.EOF 
    rows = rows+1 
    curRS.MoveNext 
    Loop 
    db_get_rows_count = rows 
End Function 

Comme je pense, il peut y avoir une taille limite de mrys? Quelqu'un pourrait-il m'éclairer à ce sujet? Merci beaucoup à l'avance

Answer 1

Il serait utile de savoir ce qu'il y a réellement dans la base de données. Pouvez-vous vous connecter à votre base de données en utilisant un autre outil (SQLPlus, Développeur PL/SQL, Toad, etc) et exécuter votre requête? Et si vous le faites, les résultats correspondent-ils à ceux que vous obtenez lorsque vous exécutez votre requête via VBScript?

En outre, obtenez-vous une erreur de la base de données? Cela pourrait aider à déterminer ce qui se passe.