Bonjour
une petit question sur la rapidité d'exécution des objets ci-dessous. quelle
est la méthode la plus rapide au niveau de l'accès à la base et des temps de
réponse
Merci à tous
1er methode
---------------
dim cn as new adodb.connection
dim rst as new Adobd.Recordet
cn.provider = "MSDASQL.1"
cn.open "DSN=MysourceODBC", UID, Password
rst.open "Select * From Client", cn, adOpenForwardOnly
do while not rst.EOF
... Traitement
Loop
rst.close
set rst = Nothing
...
2eme methode : via command
-----------------
dim cmd as new AdoDB.Command
dim rst as new adodb.recordset
cmd.activeconnection = "DSN=MySourceODBC"
cmd.commandText = "SELECT * FROM Client"
cmd.CommandType = adCmdText
set rst = cmd.execute
do while not rst.EOF
... Traitement
Loop
rst.close
set rst = Nothing
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Teddy
Pour : Set rst = cmd.execute je ne sais pas si c'est mieux que : Set rst=MyConnexion.Execute("texte requête SQL")
Par contre, pour l'accès à la base, la connexion via DSN n'est pas des + rapides. J'ai pu le vérifier sur un serveur IIS + appli ASP.
"Eric" a écrit dans le message de news:
Bonjour une petit question sur la rapidité d'exécution des objets ci-dessous. quelle est la méthode la plus rapide au niveau de l'accès à la base et des temps de réponse
Merci à tous
1er methode --------------- dim cn as new adodb.connection dim rst as new Adobd.Recordet cn.provider = "MSDASQL.1" cn.open "DSN=MysourceODBC", UID, Password rst.open "Select * From Client", cn, adOpenForwardOnly do while not rst.EOF ... Traitement Loop rst.close set rst = Nothing ...
2eme methode : via command ----------------- dim cmd as new AdoDB.Command dim rst as new adodb.recordset cmd.activeconnection = "DSN=MySourceODBC" cmd.commandText = "SELECT * FROM Client" cmd.CommandType = adCmdText set rst = cmd.execute do while not rst.EOF ... Traitement Loop rst.close set rst = Nothing
Pour : Set rst = cmd.execute je ne sais pas si c'est mieux que : Set rst=MyConnexion.Execute("texte
requête SQL")
Par contre, pour l'accès à la base, la connexion via DSN n'est pas des + rapides. J'ai pu le
vérifier sur un serveur IIS + appli ASP.
"Eric" <Eric@discussions.microsoft.com> a écrit dans le message de news:
FE767F47-940C-4606-8B2E-5ED1A7965F52@microsoft.com...
Bonjour
une petit question sur la rapidité d'exécution des objets ci-dessous. quelle
est la méthode la plus rapide au niveau de l'accès à la base et des temps de
réponse
Merci à tous
1er methode
---------------
dim cn as new adodb.connection
dim rst as new Adobd.Recordet
cn.provider = "MSDASQL.1"
cn.open "DSN=MysourceODBC", UID, Password
rst.open "Select * From Client", cn, adOpenForwardOnly
do while not rst.EOF
... Traitement
Loop
rst.close
set rst = Nothing
...
2eme methode : via command
-----------------
dim cmd as new AdoDB.Command
dim rst as new adodb.recordset
cmd.activeconnection = "DSN=MySourceODBC"
cmd.commandText = "SELECT * FROM Client"
cmd.CommandType = adCmdText
set rst = cmd.execute
do while not rst.EOF
... Traitement
Loop
rst.close
set rst = Nothing
Pour : Set rst = cmd.execute je ne sais pas si c'est mieux que : Set rst=MyConnexion.Execute("texte requête SQL")
Par contre, pour l'accès à la base, la connexion via DSN n'est pas des + rapides. J'ai pu le vérifier sur un serveur IIS + appli ASP.
"Eric" a écrit dans le message de news:
Bonjour une petit question sur la rapidité d'exécution des objets ci-dessous. quelle est la méthode la plus rapide au niveau de l'accès à la base et des temps de réponse
Merci à tous
1er methode --------------- dim cn as new adodb.connection dim rst as new Adobd.Recordet cn.provider = "MSDASQL.1" cn.open "DSN=MysourceODBC", UID, Password rst.open "Select * From Client", cn, adOpenForwardOnly do while not rst.EOF ... Traitement Loop rst.close set rst = Nothing ...
2eme methode : via command ----------------- dim cmd as new AdoDB.Command dim rst as new adodb.recordset cmd.activeconnection = "DSN=MySourceODBC" cmd.commandText = "SELECT * FROM Client" cmd.CommandType = adCmdText set rst = cmd.execute do while not rst.EOF ... Traitement Loop rst.close set rst = Nothing
