Discussion :

[Robert1957]

Bonjour,

La situation:
Back-end = serveur SQL
Front-end = Access-365 64 bytes.
Un formulaire avec une liste déroulante nom = "cmbDemandeur" populer avec ADO lors de l'ouverture du formulaire avec le code suivant:

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
16
17
18
19
20
21
22
23
24
25
26
27
28
Private Sub suMaJ_Usager()
On Error GoTo gestion_err
 
    Dim cnn As ADODB.Connection
    Dim rst As ADODB.Recordset
    Dim strSQL As String
 
    Set cnn = New ADODB.Connection
    strSQL = "SELECT Login_U, Prenom_U + N'  ' + Nom_U AS NomResponsable From dbo.ADM_User " _
    & "WHERE  (Login_U <> N'SA') AND (Perime = 0)"
 
    cnn.Open (ConnexionString)
 
    Set rst = New ADODB.Recordset
    rst.CursorLocation = adUseClient
    rst.Open strSQL, cnn, adOpenKeyset, adLockOptimistic
    Set Me.cmbDemandeur.Recordset = rst
    rst.Close
    cnn.Close
    Set rst = Nothing
    Set cnn = Nothing
sortie:
    Exit Sub
 
gestion_err:
    MsgBox err.Description & Chr(13) & "Erreur # : " & err.Number & " dans la sub suMaJ_Usager"
    Resume sortie
End Sub

Tout fonctionne normalement lorsque le formulaire est en mode "Formulaire unique". Si je bascule le formulaire en mode "Formulaire double affichage" tout fonctionne normalement à l'ouverture du formulaire mais dès qu'on ferme le formulaire, Access cesse de fonctionner (plante complètement) et sauvegarde la Bd avec l'appellation de la Bd + "_Sauvegarde".

Est-ce que quelqu'un a une idée du problème ou est-ce simplement impossible de populer une liste déroulante de cette façon en mode double affichage?

Merci

[Zekraoui_Jakani]

Est-ce que la fermeture est manuelle ?, sinon,
Dans la commande de fermeture, y a-t-il autre chose que :

Code :

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

docmd.close,""

Pouvez-vous essayer:

Code :

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

1
2
On Error resume Next
docmd.close,""

[Robert1957]

Bonjour Zekraoui_Jakani,

Dans tout mon code, il y a toujours la gestion d'erreur donc ce n'est pas ça le problème. En fermant manuellement le formulaire j'obtient le même résultat, c'est à dire qu'Access plante et fait une copie de sauvegarde.



Merci de ton intérêt.

[ONTAYG]

Bonjour,

Est-ce que l'erreur se produit aussi si tu shuntes toute la partie connexion, c'est juste pour savoir si cela vient du formulaire ou de la connexion.

De plus si cela ne change rien, il faudrait essayer avec des tables liées à la base SQL et pas une connexion en VBA pour voir ce que cela donne.

ONTAYG

[Robert1957]

Bonjour ONTAYG,

Le formulaire fonctionne très bien si je ne popule pas la liste déroulante avec ADO. J'ai testé avec une table liée et le formulaire fonctionne très bien.

C'est vraiment la combinaison d'un formulaire double affichage et de la connexion de la liste déroulante sous ADO qui fait planter pas juste le formulaire mais toute l'application.

Bonne journée

[ONTAYG]

Re,

C'est les seules idées que je voyais, désolé


ONTAYG

[Zekraoui_Jakani]

Autre piste:
Remplacer la liste déroulante (comboBox) par une ListBox avec ADO (pour essayer), car apparemment, c'est la liste déroulante qui est à incriminer