.Net Savoir si une fenetre est ouverte avec une partie du titre [Résolu]

Signaler
Messages postés
140
Date d'inscription
jeudi 24 août 2006
Statut
Membre
Dernière intervention
28 août 2014
-
Whismeril
Messages postés
14231
Date d'inscription
mardi 11 mars 2003
Statut
Contributeur
Dernière intervention
15 février 2020
-
Bonjour,

Je commence un nouveau projet en vb.net qui consiste a regardé si une page est ouvert avec seulement une partie du titre , je vous explique... j'ai une fenetre qui sappele : "Numero de telephone de l'appelant - 888-888-8888" . Evidament le numero change a chaque appel je dois donc trouvé si la fenetre existe avec seulement " Numero de telephone de l'appelant -"

J'ai ceci comme code

        On Error Resume Next

        AppActivate("Calculator")

        If Err.Number <> 0 Then
            MsgBox("La fenetre existe")
        Else
            MsgBox("La fenetre existe pas")
        End If


Mais certainement ca ne fonctionne pas car ce n'est pas le nom de la fenetre exacte. Par la suite j'aimerais aussi avoir le reste du nom de la fenetre , c'est a dire le numero de telephone.

Merci d'avance pour votre aide =)

5 réponses

Messages postés
14231
Date d'inscription
mardi 11 mars 2003
Statut
Contributeur
Dernière intervention
15 février 2020
343
Déplacé dans la catégorie VB.net
rsx602
Messages postés
140
Date d'inscription
jeudi 24 août 2006
Statut
Membre
Dernière intervention
28 août 2014

jai pas trouvé ou =(
Messages postés
14231
Date d'inscription
mardi 11 mars 2003
Statut
Contributeur
Dernière intervention
15 février 2020
343
ici

Messages postés
14231
Date d'inscription
mardi 11 mars 2003
Statut
Contributeur
Dernière intervention
15 février 2020
343
C'est une fenêtre de ton application?
Messages postés
6531
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
14 février 2020
95
Bonjour,

Si c'est pour voir les applications ouvertes, regarde ce post:

http://codes-sources.commentcamarche.net/forum/affich-10033608-application-en-1er-plan#p10033620
Messages postés
140
Date d'inscription
jeudi 24 août 2006
Statut
Membre
Dernière intervention
28 août 2014

J'en suis venu a mes fin !!

        On Error Resume Next

        For Each proc As Process In Process.GetProcesses()
            ' check process' main window title 
            If proc.MainWindowTitle.StartsWith("Appel entrant de") Then
                Dim p As Process = Process.GetProcessById(proc.Id)
                Dim phrase As String = p.MainWindowTitle.ToString
                phrase = Microsoft.VisualBasic.Mid(phrase, 17)
                My.Computer.Clipboard.SetText(phrase)

                Exit For
        Next
Whismeril
Messages postés
14231
Date d'inscription
mardi 11 mars 2003
Statut
Contributeur
Dernière intervention
15 février 2020
343
Merci de mettre la discussion résolue, avec le lien sous le titre.