Ouvrir l'application Microsoft.ScreenSketch avec VB.NET
Bonjour le Forum,
Pouvez-vous m'aider ?
Dans mon application j'ai mis un bouton qui permet d'ouvrir l'outil Windows Capture d'écran et croquis.
J'ai dû créer un raccourci la racine de C et je fais appel à ce raccourci pour lancer cet l'outil car Microsoft a trop bien protéger/cacher ce logiciel, sinon j'aurais fait appel directement à son emplacement avec le .exe.
Mais je me heurte à deux problèmes en utilisant un raccourci pour lancer l'outil, le premier, sur mon pc Capture d'écran et croquis se lance correctement mais avec le pc du travail elle ne se lance pas du premier coup, mais avec le second clic et surprise elle apparait deux fois.
Le second problèmes est que l'outil Windows Capture d'écran et croquis n'est pas forcement installer sur les pc des autres utilisateurs et la je propose une installation avec une redirection vers le site de Microsoft.
Voila pourquoi, je souhaiterais une autre solution pour lancer l'outil Capture, comme d'autres personnes sont amenées à utiliser mon application.
Pour info, voici ou pointe le raccourci "Microsoft.ScreenSketch_8wekyb3d8bbwe!App"
Merci pour votre aide.
Voici mon code.
Code:
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
| Try
v.StartInfo.FileName = "C:\Capture d'écran et croquis.lnk"
v.Start()
Catch ex As Exception
Dim result = MessageBox.Show("L'application indispensable Capture d'écran et croquis n'est pas encore installer sur votre PC, souhaitez-vous y remédier ? ", "Capture d'écran et croquis", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If result = DialogResult.No Then
MessageBox.Show("Capture d'écran et croquis ne sera pas installer ", "Installation annulée", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
ElseIf result = DialogResult.Yes Then
MessageBox.Show("Redirection vers le site de Microsoft pour l'installation de Capture et Croquis", "Installation de Capture d'écran et croquis", MessageBoxButtons.OK, MessageBoxIcon.Information)
p.StartInfo.FileName = "https://www.microsoft.com/fr-fr/p/capture-et-croquis/9mz95kl8mr0l?activetab=pivot:overviewtab"
p.Start()
End If
End Try
Me.Refresh()
Me.WindowState = FormWindowState.Minimized |