Discussion :

[gambi]

Bonjour,
Je sais affecter comme source d'un formulaire une requête qui attaque une base SQL Server dans Access avec :
Set MyForm.Recordset = rst (ou rst est le recordset sur une requête sur ma base SQL server).
Cela marche trés bien.
Je voudrais faire la même chose pour un état.
J'ai essayé pleins de choses et rien ne marche.

Merci de vos éclaircissements.

[LedZeppII]

Bonjour,

Si tu es bien dans un mdb ou mde,
crée une requête 'SQL Direct' et utilise la comme source de l'état.

Chaîne de connexion ODBC pour la requête :
ODBC;Driver={SQL Server};Server=NomDuServeur;Database=nombd; Uid=NomUtilisateur;Pwd=MotDePasse;

La requête sera du style :
SELECT * FROM NomView

où NomView est une vue du serveur SQL Serveur.

A+

[gambi]

Merci LedZeppII pour ta réponse rapide.
Je vais préciser le contexte d'utilisation.
La base utilisée est une base SAGE gestion commerciale.
La base peut-êtr e une base propriétaire ou sql server.
Dans les deux cas j'utilise dans mon code vba une connection sur un lien ODBC.
J'ai pas de pbl. de connection, je ne peux pas utiliser une vue puisque cela n'existe pas pour les bases propriétaires.
Donc je fais une requête du style "Select * from Nom_Table".

Voici un exemple de code que j'utilise pour définir la source d'un formulaire et cela marche trés bien.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
     Dim SQL$
 
    SQL$ = "SELECT * FROM TABLE"
 
 
        Set Me.Recordset = rst
        If Not (rst.EOF) Then
            Me.CHAMP1.ControlSource = "DO_PIECE"
            Me.DO_DATE.ControlSource = "DO_DATE"
            Me.DO_DOMAINE.ControlSource = "DO_DOMAINE"
            Me.DO_TYPE.ControlSource = "DO_TYPE"
            Me.RE_NO.ControlSource = "RE_NO"
            Me.DO_EXPEDIT.ControlSource = "DO_EXPEDIT"
            Me.LI_NO.ControlSource = "LI_NO"
        End If

[gambi]

Je vais préciser le contexte d'utilisation.
La base utilisée est une base SAGE gestion commerciale.
La base peut-être une base propriétaire ou sql server.
Dans les deux cas j'utilise dans mon code vba une connection sur un lien ODBC.
J'ai pas de pbl. de connection, je ne peux pas utiliser une vue puisque cela n'existe pas pour les bases propriétaires.
Donc je fais une requête du style "Select * from Nom_Table".

Voici un exemple de code que j'utilise pour définir la source d'un formulaire et cela marche trés bien.

Code :

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

1
2
3
4
5
6
7
8
     Dim SQL$, rst as new adodb.recordset
 
    SQL$ = "SELECT DO_PIECE FROM TABLE"
    ' Ici je fais la connection et j'affecte mon recordset que je nomme rst
 
        Set Me.Recordset = rst ' ici j'affecte le résultat à mon formulaire.
             Me.Texte1.ControlSource = "DO_PIECE"
            ' .... Reste du code

J'essaye de faire la même chose pour un état.
Set MyRpt.recordset = rst ' plante
Donc j'utilise MyRpt.recordsource = rst ' plante
j'ai aussi essayé myrp.SourceObject = rst ' plante
Dans tous les cas j'ai l'erreur :
"Erreur définie par l'application ou par l'objet"

Si j'utilise la chaine sql comme source de l'état, j'ai la réponse "la table x n'existe pas". Bien sûr il cherche la table dans la base mdb.

Je suis sur Access 2000.

[LedZeppII]

Pour les Etats il n'y a pas de membre RecordSet disponible, contrairement aux formulaires.
On ne peut utiliser que RecordSource qui est de type String.
On peut lui affecter un nom de table, un nom de requête, ou une instruction SQL SELECT.

La seule solution que je vois, à par lier les tables par ODBC, est une requête 'SQL Direct'.
C'est une requête pour laquelle on définit une chaîne de connection ODBC (un peu comme pour la connexion ADODB).
La requête se définit en créant une nouvelle requête à laquelle on n'ajoute aucun table, puis
Menu principal->Requête->Spécifique SQL->SQL Direct.
Là, tu peux reprendre exactement le même SELECT ... FROM ... que tu utilises avec le recordset ADODB.
Reste à définir dans les propriétés de la requête la bonne chaîne de connexion ODBC.

Bon courage.

[gambi]

Ok j'essaye merci !

[Tofalu]

Pourquoi ne pas créer un projet adp plutot qu'une base de données mdb ? Les projets ADP sont conçus pour SQL Server