Capturer la fenetre active et la mettre dans un fichier

Soyez le premier à donner votre avis sur cette source.

Vue 16 386 fois - Téléchargée 1 169 fois


Télécharger le projet
Commenter

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
Télécharger le projet

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Signaler
cs_magicgus
Messages postés
207
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
Signaler
arnovb
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
Signaler
cs_PaTaTe
Messages postés
1878
Date d'inscription
mercredi 21 août 2002
Statut
Contributeur
Dernière intervention
7 janvier 2019
 -
A eviter cette technique parce que si tu as un programme qui modifie le clipboard, tu as un beau plantage ...
Signaler
zytrahus
Messages postés
5
Date d'inscription
samedi 6 novembre 2004
Statut
Membre
Dernière intervention
24 novembre 2004
 -
merci pour tes conseils ;)
Signaler
Cyberdevil
Messages postés
483
Date d'inscription
mardi 10 juillet 2001
Statut
Membre
Dernière intervention
12 juillet 2006
 -
pas mal
S'inscrire maintenant

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.

Du même auteur (Nix)