Discussion :

[DanaX]

Bonjour,
Je souhaite insérer des données provenant d'un recordset ODBC dans une table de mon programme ACCESS. Le problème étant que les données sont importantes : Je ne souhaite donc pas utiliser de boucle et je ne peux intégrer directement la commande " INTO TEMP " puisque la requête est executée sur un serveur SQL SERVER distant.
Ci-dessous mon code :

Code :

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

1
2
3
4
5
6
Set Wksp = DBEngine.CreateWorkspace("MonWkspODBC", "Admin", "", dbUseODBC)
        strODBCconn = "ODBC;DRIVER=SQL Server;SERVER=XXXX;DSN=XXXX;DATABASE=XXXX;UID=XXXX;PWD=XXXX"
    ' Ouverture connexion ODBC
    Set Conn = Wksp.OpenConnection("sqlserver", dbDriverNoPrompt, False, strODBCconn)
strSQL = "SELECT * FROM USER"
Set rs = Conn.database.OpenRecordset(strSQL, dbOpenDynaset)

Comment puis-je faire?

Merci par avance

Cordialement,
Daniel

[LedZeppII]

Bonjour,

Personnellement, dans ce genre de contexte, je boucle sur le recordset source et je fait des ajouts dans le recordset destination.
Je ne vois pas comment on peut faire autrement pour copier les données d'un recordset dans une table.

Il m'arrive d'utiliser la méthode GetRows pour lire d'un coup, plusieurs enregistrements (quelques centaines).
Sur un très grand nombre d'enregistrements ça peut s'avérer moins coûteux en temps.

Il y a aussi une méthode sans code.
Tu crée une requête type SQL-Direct.
Dans la propriété 'Chaîne de connexion' tu mets la même chaîne que dans ton code (ODBC;DSN=.....)
Dans cette requête tu mets le code de ton instruction Transact-SQL.
Tu la sauves.
Tu peux ensuite utiliser cette requête dans une requête Access en lieu et place d'une table.

Le petit inconvénient c'est que la chaîne de connexion est facilement visible.
On peut donc voir le nom d'utilisateur et le mot de passe en clair.

A+