Discussion :

[mequies]

Bonjour à vous tous,

j'ai créé un programme avec ms access qui utilise des formulaires dans lesquels se trouvent des fichier swf.
ce programme s'ouvre automatiquement chaque jour et
depuis les dernières mise à jour de Windows 10
un message d'avertissement




"autoriser la lecture
je reconnais ce contenu"
bloque l’exécution du programme.
je n'arrive pas à voir ou dans office je peux autoriser le contenu flash player et shockwave pour éviter l'affichage de ce message.

merci d'avance à vous de m'aiguiller vers la solution de ce réel problème

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
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
 
Option Compare Database
 
Private Sub Form_Load()
Dim hauteurecrvar As Long
Dim largeurecrvar As Long
If CurrentProject.AllForms!parametrefrm.IsLoaded Then
largeurecrvar = forms!parametrefrm!LARGECRAN2
hauteurecrvar = forms!parametrefrm!HAUTECRAN2
Else
largeurecrvar = 1600
hauteurecrvar = 900
 
End If
 
ShockwaveFlash1.Height = 6700 / 1600 * largeurecrvar ' Forms!parametrefrm!LARGECRAN2 '6000 'rapport de 1.4224751067
ShockwaveFlash1.Width = 4710 / 900 * hauteurecrvar '4218 '4921
 
'Chargement du fichier .swf
ShockwaveFlash1.Movie = forms!parametrefrm!cheminmontreswf
'Lecture
ShockwaveFlash1.Play
 
 
Me.TimerInterval = 1000
'Modifier le cadrage
ShockwaveFlash1.ScaleMode = 1
 
End Sub
 
'-------------------
 
Private Sub Form_Open(Cancel As Integer)
proResolution Me
End Sub
 
'-------------------
 
Private Sub Form_Timer()
Me.diap = diapoplay
If Me.diap = True Then ShockwaveFlash1.Play
If Me.diap = False Then ShockwaveFlash1.Stop
 
End Sub

[hyperion13]

Avez vous pensé à mettre à jour votre Flash player ? A priori, le problème viendrait de là.

[mequies]

Bonjour hyperion13 et merci de vous intéresser à mon problème.

oui j'avais fait les mises à jour de adobe flah player ainsi que de shockwave mais rien rien n'y fait.
j'ai même essayé de recréer les controles activex ShockwaveFlash1 des formulaires impliqués par ces messages..
mais sans résultat.

[hyperion13]

Salut,
Avez-vous lu ceci ou plus tôt cela ?

EDIT 10:03 Dans le centre de gestion de la confidentialité, il vous faut opter pour : Activer tous les contrôles sans restrictions ... dans Paramètres ActiveX

[mequies]

oui j'avais deja desactivé dans ms access tout ce qui concerne la protection du contenu.
Option/ centre de gestion..lité/param..ité/... etc...




je viens de le faire dans ms word!!!

toujours avec ce problème.

je tiens à préciser que c'est un programme qui tourne depuis 3 ans sans aucun problème et voilà que du jour au lendemain avec les mise à jour windows 10 ces messages d'avertissement apparaissent...