Je voudrai tranferer des donn=E9es xls vers une base de=20
donn=E9es Access. Pour cel=E0, j'ai utilis=E9 des fonctions de=20
connexion/deconnexion sur une BD access (des fonctions que=20
j'ai d=E9j=E0 utilis=E9 et qui marche dans d'autre fichier) mais=20
=E7a vb m'affiche une erreur de compilation:=20
"Type d=E9fini par l'utilisateur non-d=E9fini".
J'ai d=E9clar=E9 les objets database et recordset:
Voici une partie de la fonction:
Option Explicit
Dim ObjConn As New ADODB.Connection
Dim ObjRec As New ADODB.Recordset
Public Table As String
'Connexion au serveur ODBC Access
' BD_Campagne a =E9t=E9 cr=E9er dans les drivers ADODB
Sub Connexion()
ObjConn.Open "PROVIDER=3DMSDASQL.1;DSN=3D" "BD_Campagne"
End Sub
'Ouverture d'une table=20
Sub Ouvrir_Recordset(Table As String)
ObjRec.Open Table, ObjConn, adOpenDynamic, adLockoptimistic
End Sub
Si vous avez une petite id=E9e, merci de m'=E9clairer un peu.
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
papou
Bonjour Mirana Il faut ajouter une référence à Microsoft Activex Data Objects 2.5 (chez moi) Library Outils, Références et tu coches cette ligne dans la liste. Cordialement Pascal
"Mirana" a écrit dans le message de news:025e01c3a447$b89c4c30$ Salut!
Je voudrai tranferer des données xls vers une base de données Access. Pour celà, j'ai utilisé des fonctions de connexion/deconnexion sur une BD access (des fonctions que j'ai déjà utilisé et qui marche dans d'autre fichier) mais ça vb m'affiche une erreur de compilation: "Type défini par l'utilisateur non-défini". J'ai déclaré les objets database et recordset: Voici une partie de la fonction:
Option Explicit Dim ObjConn As New ADODB.Connection Dim ObjRec As New ADODB.Recordset Public Table As String
'Connexion au serveur ODBC Access ' BD_Campagne a été créer dans les drivers ADODB Sub Connexion() ObjConn.Open "PROVIDER=MSDASQL.1;DSN=" "BD_Campagne" End Sub
'Ouverture d'une table Sub Ouvrir_Recordset(Table As String) ObjRec.Open Table, ObjConn, adOpenDynamic, adLockoptimistic End Sub
Si vous avez une petite idée, merci de m'éclairer un peu.
Mirana
Bonjour Mirana
Il faut ajouter une référence à Microsoft Activex Data Objects 2.5 (chez
moi) Library
Outils, Références et tu coches cette ligne dans la liste.
Cordialement
Pascal
"Mirana" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:025e01c3a447$b89c4c30$a001280a@phx.gbl...
Salut!
Je voudrai tranferer des données xls vers une base de
données Access. Pour celà, j'ai utilisé des fonctions de
connexion/deconnexion sur une BD access (des fonctions que
j'ai déjà utilisé et qui marche dans d'autre fichier) mais
ça vb m'affiche une erreur de compilation:
"Type défini par l'utilisateur non-défini".
J'ai déclaré les objets database et recordset:
Voici une partie de la fonction:
Option Explicit
Dim ObjConn As New ADODB.Connection
Dim ObjRec As New ADODB.Recordset
Public Table As String
'Connexion au serveur ODBC Access
' BD_Campagne a été créer dans les drivers ADODB
Sub Connexion()
ObjConn.Open "PROVIDER=MSDASQL.1;DSN=" "BD_Campagne"
End Sub
'Ouverture d'une table
Sub Ouvrir_Recordset(Table As String)
ObjRec.Open Table, ObjConn, adOpenDynamic, adLockoptimistic
End Sub
Si vous avez une petite idée, merci de m'éclairer un peu.
Bonjour Mirana Il faut ajouter une référence à Microsoft Activex Data Objects 2.5 (chez moi) Library Outils, Références et tu coches cette ligne dans la liste. Cordialement Pascal
"Mirana" a écrit dans le message de news:025e01c3a447$b89c4c30$ Salut!
Je voudrai tranferer des données xls vers une base de données Access. Pour celà, j'ai utilisé des fonctions de connexion/deconnexion sur une BD access (des fonctions que j'ai déjà utilisé et qui marche dans d'autre fichier) mais ça vb m'affiche une erreur de compilation: "Type défini par l'utilisateur non-défini". J'ai déclaré les objets database et recordset: Voici une partie de la fonction:
Option Explicit Dim ObjConn As New ADODB.Connection Dim ObjRec As New ADODB.Recordset Public Table As String
'Connexion au serveur ODBC Access ' BD_Campagne a été créer dans les drivers ADODB Sub Connexion() ObjConn.Open "PROVIDER=MSDASQL.1;DSN=" "BD_Campagne" End Sub
'Ouverture d'une table Sub Ouvrir_Recordset(Table As String) ObjRec.Open Table, ObjConn, adOpenDynamic, adLockoptimistic End Sub
Si vous avez une petite idée, merci de m'éclairer un peu.
Mirana
Mirana
Un grand merci à Papou mais, j'ai activé la bibliothèque Microsoft ADO et ça ne marche pas encore. J'ai toujours un message d'erreur.
Une autre idée SVP...
Merci d'avance!
Mirana
-----Message d'origine----- Bonjour Mirana Il faut ajouter une référence à Microsoft Activex Data Objects 2.5 (chez
moi) Library Outils, Références et tu coches cette ligne dans la liste. Cordialement Pascal
"Mirana" a écrit dans le message de
news:025e01c3a447$b89c4c30$ Salut!
Je voudrai tranferer des données xls vers une base de données Access. Pour celà, j'ai utilisé des fonctions de connexion/deconnexion sur une BD access (des fonctions que j'ai déjà utilisé et qui marche dans d'autre fichier) mais ça vb m'affiche une erreur de compilation: "Type défini par l'utilisateur non-défini". J'ai déclaré les objets database et recordset: Voici une partie de la fonction:
Option Explicit Dim ObjConn As New ADODB.Connection Dim ObjRec As New ADODB.Recordset Public Table As String
'Connexion au serveur ODBC Access ' BD_Campagne a été créer dans les drivers ADODB Sub Connexion() ObjConn.Open "PROVIDER=MSDASQL.1;DSN=" "BD_Campagne" End Sub
'Ouverture d'une table Sub Ouvrir_Recordset(Table As String) ObjRec.Open Table, ObjConn, adOpenDynamic, adLockoptimistic
End Sub
Si vous avez une petite idée, merci de m'éclairer un peu.
Mirana
.
Un grand merci à Papou mais, j'ai activé la bibliothèque
Microsoft ADO et ça ne marche pas encore. J'ai toujours un
message d'erreur.
Une autre idée SVP...
Merci d'avance!
Mirana
-----Message d'origine-----
Bonjour Mirana
Il faut ajouter une référence à Microsoft Activex Data
Objects 2.5 (chez
moi) Library
Outils, Références et tu coches cette ligne dans la liste.
Cordialement
Pascal
"Mirana" <anonymous@discussions.microsoft.com> a écrit
dans le message de
Je voudrai tranferer des données xls vers une base de
données Access. Pour celà, j'ai utilisé des fonctions de
connexion/deconnexion sur une BD access (des fonctions que
j'ai déjà utilisé et qui marche dans d'autre fichier) mais
ça vb m'affiche une erreur de compilation:
"Type défini par l'utilisateur non-défini".
J'ai déclaré les objets database et recordset:
Voici une partie de la fonction:
Option Explicit
Dim ObjConn As New ADODB.Connection
Dim ObjRec As New ADODB.Recordset
Public Table As String
'Connexion au serveur ODBC Access
' BD_Campagne a été créer dans les drivers ADODB
Sub Connexion()
ObjConn.Open "PROVIDER=MSDASQL.1;DSN=" "BD_Campagne"
End Sub
'Ouverture d'une table
Sub Ouvrir_Recordset(Table As String)
ObjRec.Open Table, ObjConn, adOpenDynamic,
adLockoptimistic
End Sub
Si vous avez une petite idée, merci de m'éclairer un peu.
Un grand merci à Papou mais, j'ai activé la bibliothèque Microsoft ADO et ça ne marche pas encore. J'ai toujours un message d'erreur.
Une autre idée SVP...
Merci d'avance!
Mirana
-----Message d'origine----- Bonjour Mirana Il faut ajouter une référence à Microsoft Activex Data Objects 2.5 (chez
moi) Library Outils, Références et tu coches cette ligne dans la liste. Cordialement Pascal
"Mirana" a écrit dans le message de
news:025e01c3a447$b89c4c30$ Salut!
Je voudrai tranferer des données xls vers une base de données Access. Pour celà, j'ai utilisé des fonctions de connexion/deconnexion sur une BD access (des fonctions que j'ai déjà utilisé et qui marche dans d'autre fichier) mais ça vb m'affiche une erreur de compilation: "Type défini par l'utilisateur non-défini". J'ai déclaré les objets database et recordset: Voici une partie de la fonction:
Option Explicit Dim ObjConn As New ADODB.Connection Dim ObjRec As New ADODB.Recordset Public Table As String
'Connexion au serveur ODBC Access ' BD_Campagne a été créer dans les drivers ADODB Sub Connexion() ObjConn.Open "PROVIDER=MSDASQL.1;DSN=" "BD_Campagne" End Sub
'Ouverture d'une table Sub Ouvrir_Recordset(Table As String) ObjRec.Open Table, ObjConn, adOpenDynamic, adLockoptimistic
End Sub
Si vous avez une petite idée, merci de m'éclairer un peu.
Mirana
.
papou
Mirana Si ton objet ADO est utilisé dans plusieurs procédures, il faut le déclarer public : Public ObjConn As New ADODB.Connection Public ObjRec As New ADODB.Recordset Cordialement Pascal
"Mirana" a écrit dans le message de news:089f01c3a452$8cf6e490$ Un grand merci à Papou mais, j'ai activé la bibliothèque Microsoft ADO et ça ne marche pas encore. J'ai toujours un message d'erreur.
Une autre idée SVP...
Merci d'avance!
Mirana
-----Message d'origine----- Bonjour Mirana Il faut ajouter une référence à Microsoft Activex Data Objects 2.5 (chez
moi) Library Outils, Références et tu coches cette ligne dans la liste. Cordialement Pascal
"Mirana" a écrit dans le message de
news:025e01c3a447$b89c4c30$ Salut!
Je voudrai tranferer des données xls vers une base de données Access. Pour celà, j'ai utilisé des fonctions de connexion/deconnexion sur une BD access (des fonctions que j'ai déjà utilisé et qui marche dans d'autre fichier) mais ça vb m'affiche une erreur de compilation: "Type défini par l'utilisateur non-défini". J'ai déclaré les objets database et recordset: Voici une partie de la fonction:
Option Explicit Dim ObjConn As New ADODB.Connection Dim ObjRec As New ADODB.Recordset Public Table As String
'Connexion au serveur ODBC Access ' BD_Campagne a été créer dans les drivers ADODB Sub Connexion() ObjConn.Open "PROVIDER=MSDASQL.1;DSN=" "BD_Campagne" End Sub
'Ouverture d'une table Sub Ouvrir_Recordset(Table As String) ObjRec.Open Table, ObjConn, adOpenDynamic, adLockoptimistic
End Sub
Si vous avez une petite idée, merci de m'éclairer un peu.
Mirana
.
Mirana
Si ton objet ADO est utilisé dans plusieurs procédures, il faut le déclarer
public :
Public ObjConn As New ADODB.Connection
Public ObjRec As New ADODB.Recordset
Cordialement
Pascal
"Mirana" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:089f01c3a452$8cf6e490$a601280a@phx.gbl...
Un grand merci à Papou mais, j'ai activé la bibliothèque
Microsoft ADO et ça ne marche pas encore. J'ai toujours un
message d'erreur.
Une autre idée SVP...
Merci d'avance!
Mirana
-----Message d'origine-----
Bonjour Mirana
Il faut ajouter une référence à Microsoft Activex Data
Objects 2.5 (chez
moi) Library
Outils, Références et tu coches cette ligne dans la liste.
Cordialement
Pascal
"Mirana" <anonymous@discussions.microsoft.com> a écrit
dans le message de
Je voudrai tranferer des données xls vers une base de
données Access. Pour celà, j'ai utilisé des fonctions de
connexion/deconnexion sur une BD access (des fonctions que
j'ai déjà utilisé et qui marche dans d'autre fichier) mais
ça vb m'affiche une erreur de compilation:
"Type défini par l'utilisateur non-défini".
J'ai déclaré les objets database et recordset:
Voici une partie de la fonction:
Option Explicit
Dim ObjConn As New ADODB.Connection
Dim ObjRec As New ADODB.Recordset
Public Table As String
'Connexion au serveur ODBC Access
' BD_Campagne a été créer dans les drivers ADODB
Sub Connexion()
ObjConn.Open "PROVIDER=MSDASQL.1;DSN=" "BD_Campagne"
End Sub
'Ouverture d'une table
Sub Ouvrir_Recordset(Table As String)
ObjRec.Open Table, ObjConn, adOpenDynamic,
adLockoptimistic
End Sub
Si vous avez une petite idée, merci de m'éclairer un peu.
Mirana Si ton objet ADO est utilisé dans plusieurs procédures, il faut le déclarer public : Public ObjConn As New ADODB.Connection Public ObjRec As New ADODB.Recordset Cordialement Pascal
"Mirana" a écrit dans le message de news:089f01c3a452$8cf6e490$ Un grand merci à Papou mais, j'ai activé la bibliothèque Microsoft ADO et ça ne marche pas encore. J'ai toujours un message d'erreur.
Une autre idée SVP...
Merci d'avance!
Mirana
-----Message d'origine----- Bonjour Mirana Il faut ajouter une référence à Microsoft Activex Data Objects 2.5 (chez
moi) Library Outils, Références et tu coches cette ligne dans la liste. Cordialement Pascal
"Mirana" a écrit dans le message de
news:025e01c3a447$b89c4c30$ Salut!
Je voudrai tranferer des données xls vers une base de données Access. Pour celà, j'ai utilisé des fonctions de connexion/deconnexion sur une BD access (des fonctions que j'ai déjà utilisé et qui marche dans d'autre fichier) mais ça vb m'affiche une erreur de compilation: "Type défini par l'utilisateur non-défini". J'ai déclaré les objets database et recordset: Voici une partie de la fonction:
Option Explicit Dim ObjConn As New ADODB.Connection Dim ObjRec As New ADODB.Recordset Public Table As String
'Connexion au serveur ODBC Access ' BD_Campagne a été créer dans les drivers ADODB Sub Connexion() ObjConn.Open "PROVIDER=MSDASQL.1;DSN=" "BD_Campagne" End Sub
'Ouverture d'une table Sub Ouvrir_Recordset(Table As String) ObjRec.Open Table, ObjConn, adOpenDynamic, adLockoptimistic
End Sub
Si vous avez une petite idée, merci de m'éclairer un peu.
Mirana
.
Denis Michon
Bonjour Mirana,
Utilise la bibliothèque : "Microsoft Activex Data Objects 2.0 Librairy"
Salutations!
"Mirana" a écrit dans le message de news:025e01c3a447$b89c4c30$ Salut!
Je voudrai tranferer des données xls vers une base de données Access. Pour celà, j'ai utilisé des fonctions de connexion/deconnexion sur une BD access (des fonctions que j'ai déjà utilisé et qui marche dans d'autre fichier) mais ça vb m'affiche une erreur de compilation: "Type défini par l'utilisateur non-défini". J'ai déclaré les objets database et recordset: Voici une partie de la fonction:
Option Explicit Dim ObjConn As New ADODB.Connection Dim ObjRec As New ADODB.Recordset Public Table As String
'Connexion au serveur ODBC Access ' BD_Campagne a été créer dans les drivers ADODB Sub Connexion() ObjConn.Open "PROVIDER=MSDASQL.1;DSN=" "BD_Campagne" End Sub
'Ouverture d'une table Sub Ouvrir_Recordset(Table As String) ObjRec.Open Table, ObjConn, adOpenDynamic, adLockoptimistic End Sub
Si vous avez une petite idée, merci de m'éclairer un peu.
Mirana
Bonjour Mirana,
Utilise la bibliothèque : "Microsoft Activex Data Objects 2.0 Librairy"
Salutations!
"Mirana" <anonymous@discussions.microsoft.com> a écrit dans le message de news:025e01c3a447$b89c4c30$a001280a@phx.gbl...
Salut!
Je voudrai tranferer des données xls vers une base de
données Access. Pour celà, j'ai utilisé des fonctions de
connexion/deconnexion sur une BD access (des fonctions que
j'ai déjà utilisé et qui marche dans d'autre fichier) mais
ça vb m'affiche une erreur de compilation:
"Type défini par l'utilisateur non-défini".
J'ai déclaré les objets database et recordset:
Voici une partie de la fonction:
Option Explicit
Dim ObjConn As New ADODB.Connection
Dim ObjRec As New ADODB.Recordset
Public Table As String
'Connexion au serveur ODBC Access
' BD_Campagne a été créer dans les drivers ADODB
Sub Connexion()
ObjConn.Open "PROVIDER=MSDASQL.1;DSN=" "BD_Campagne"
End Sub
'Ouverture d'une table
Sub Ouvrir_Recordset(Table As String)
ObjRec.Open Table, ObjConn, adOpenDynamic, adLockoptimistic
End Sub
Si vous avez une petite idée, merci de m'éclairer un peu.
Utilise la bibliothèque : "Microsoft Activex Data Objects 2.0 Librairy"
Salutations!
"Mirana" a écrit dans le message de news:025e01c3a447$b89c4c30$ Salut!
Je voudrai tranferer des données xls vers une base de données Access. Pour celà, j'ai utilisé des fonctions de connexion/deconnexion sur une BD access (des fonctions que j'ai déjà utilisé et qui marche dans d'autre fichier) mais ça vb m'affiche une erreur de compilation: "Type défini par l'utilisateur non-défini". J'ai déclaré les objets database et recordset: Voici une partie de la fonction:
Option Explicit Dim ObjConn As New ADODB.Connection Dim ObjRec As New ADODB.Recordset Public Table As String
'Connexion au serveur ODBC Access ' BD_Campagne a été créer dans les drivers ADODB Sub Connexion() ObjConn.Open "PROVIDER=MSDASQL.1;DSN=" "BD_Campagne" End Sub
'Ouverture d'une table Sub Ouvrir_Recordset(Table As String) ObjRec.Open Table, ObjConn, adOpenDynamic, adLockoptimistic End Sub
Si vous avez une petite idée, merci de m'éclairer un peu.
