OVH Cloud OVH Cloud

EXPLORER SOUS ACCES

1 réponse
Avatar
bguill
Bonjour,

j'ais une appli qui tournais sous acces97 win98 et qui ouvrait des fenêtre
explorer plein écran.

Le code était le suivant :
Dim stAppName As String
Dim stDocName As String
Dim stLinkCriteria As String

DoCmd.Close
stDocName = "Commerciaux"
DoCmd.OpenForm stDocName, , , stLinkCriteria

stAppName = "C:\WINDOWS\EXPLORER.EXE /n, K:\REPORTINGS_COMITES
DC\REPORTING DC\2005\RAT 01 trim 05"
Call Shell(stAppName, 3)

Et ca marchait

Aujourd'hui sous ACCES 2002 WINXP.
Les fenêtres s'ouvrent en icone.

Comment peut on faire simplement pour remédier à ce problème.

1 réponse

Avatar
3stone
Salut,

"bguill"
| j'ais une appli qui tournais sous acces97 win98 et qui ouvrait des fenêtre
| explorer plein écran.
|
| Le code était le suivant :
| Dim stAppName As String
| Dim stDocName As String
| Dim stLinkCriteria As String
|
| DoCmd.Close
| stDocName = "Commerciaux"
| DoCmd.OpenForm stDocName, , , stLinkCriteria
|
| stAppName = "C:WINDOWSEXPLORER.EXE /n, K:REPORTINGS_COMITES
| DCREPORTING DC2005RAT 01 trim 05"
| Call Shell(stAppName, 3)
|
| Et ca marchait
|
| Aujourd'hui sous ACCES 2002 WINXP.
| Les fenêtres s'ouvrent en icone.
|
| Comment peut on faire simplement pour remédier à ce problème.


Préfère utiliser les API
http://users.skynet.be/accesshome/ah_fichiers_selection_api.htm

ou la library MSO
http://users.skynet.be/accesshome/ah_fichiers_selection_mso.htm


--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/
Email : http://www.cerbermail.com/?Xfg61Z3IQw