Passage de Access 2007 à Access 2010 - Fonction ne marche plus [Résolu]

[oreoolep]

Bonjour,

J'ai tenté de passer ma base de données d'Access 2007 à Access 2010. La plupart des fonctionnalités ont migré sans problèmes, sauf celle-ci :

J'ai un bouton qui lance une requête ensuite une autre fonction :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub Commande0_Click()
On Error GoTo Commande0_Click_Err
 
    DoCmd.OpenQuery "Verific_to_0", acViewNormal, acEdit 'cette requête n'a a priori aucun impact sur la fonction suivante
 
    Call import_BCM_Shell 'fonction d'import - voir plus bas
 
 
Commande0_Click_Exit:
    Exit Sub
 
Commande0_Click_Err:
    MsgBox Error$
    Resume Commande0_Click_Exit
 
End Sub

La fonction suivante ouvre une autre base de données (je lance un autoexec à l'intérieur) :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Function import_BCM_Shell()
 
On Error GoTo gest_err
'je lis les chemins de répertoires stockés dans une table liée
 
Set Rs = CurrentDb.OpenRecordset("_Chemins", dbOpenDynaset)
 chem1 = Rs.Fields(2)
 chem2 = Rs.Fields(0)
 
Shell (chem1 & "Msaccess.exe " & chem2 & "\Keynotes.accdb"), vbHide
 
 
gest_err:
 
Resume Next
 
 
End Function

Le problème est le suivant : rien ne se passe sous Access 2010. J'ai l'impression qu'il n'arrive même pas à lancer la fonction shell (puisque sous Access 2007 je vois un splash screen quand ça se lance). Quand je retourne à Access 2007, cela fonctionne à merveille.

Quelqu'un voit-il ce qui ne marche pas ?

Cordialement,

Ore

[marot_r]

Pas de solution mais des pistes.

1) Vérifie que ton code compile bien en 2010.

2) Essaye d'exécuter en pas à pas la fonction toute seule à partir d'un module par exemple.

A+

[oreoolep]

Merci beaucoup René.

En fait, j'ai effectivement suivi tes conseils, et je viens enfin de trouver ce qui cloche : c'est le chemin vers Access. C'est C:\Program Files\Microsoft Office\Office14\ au lieu de C:\Program Files\Microsoft Office\Office12\. C'était tout bête ! je n'avais pas fait la mise à jour des chemins dans un autre endroit. Je vais essayer de régler ce souci automatiquement.

Merci encore.

Ore