Capturer la fenetre active et la mettre dans un fichier

Soyez le premier à donner votre avis sur cette source.

Vue 16 520 fois - Téléchargée 1 195 fois

Description

Comment Capturer la Fenêtre active et la mettre dans le Presse Papier ( ClipBoard ) ?

Mettez ce code dans votre Module :

Source / Exemple :


Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

Public Function EnrgActiveFen(ByVal Fichier As String) As Boolean
    On Error Goto SortieErreur

    'Test de la présence du fichier
    If Dir(Fichier) <> "" Then Exit Function

    'Pour Capturer La fentêtre Active
    Call keybd_event(vbKeySnapshot, 0, 0, 0)
    
    SavePicture Clipboard.GetData(vbCFBitmap), Fichier
    EnrgActiveFen = True
    Exit Function

    SortieErreur:
     MsgBox "Erreur dans le Module EnrgActiveFen. Erreur #: " & Err.Number & ", " & Err.Description
End Function

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
206
Date d'inscription
mardi 10 février 2004
Statut
Membre
Dernière intervention
14 septembre 2011

Heu pour le initié je suis pas d'accord du tout mais bon...
Passons
Messages postés
9
Date d'inscription
dimanche 26 février 2006
Statut
Membre
Dernière intervention
21 mars 2007

je n'arrive pas à capturer une fenêtre active avec ton programme j'ai toujours la copie d'écran. je dois faire une erreur mais je ne sais pas laquelle
Messages postés
2107
Date d'inscription
mercredi 21 août 2002
Statut
Contributeur
Dernière intervention
19 février 2021
2
A eviter cette technique parce que si tu as un programme qui modifie le clipboard, tu as un beau plantage ...
Messages postés
5
Date d'inscription
samedi 6 novembre 2004
Statut
Membre
Dernière intervention
24 novembre 2004

merci pour tes conseils ;)
Messages postés
483
Date d'inscription
mardi 10 juillet 2001
Statut
Membre
Dernière intervention
12 juillet 2006

pas mal

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.