Imprimer n'importe quel fichier

0/5 (9 avis)

Snippet vu 10 826 fois - Téléchargée 44 fois

Contenu du snippet

Ce source peut imprimer n'importe quel à condition que le programme source soit installée et que la commande print soit definie dans le registre

Source / Exemple :


' APIs  + Const
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Const SW_SHOWNORMAL = 1

' Fonction
' Filename$ est le nom du fichier
ret& = ShellExecute(hwnd, "print", FileName$, "", "", SW_SHOWNORMAL)

Conclusion :


si ret<=32, il y a une erreur

A voir également

Ajouter un commentaire Commentaires
potain_vb Messages postés 6 Date d'inscription mercredi 22 juin 2005 Statut Membre Dernière intervention 10 juin 2009
15 juin 2006 à 15:11
Bonjour j'ai essayé cette api mais je comprend pas le but , car lorsque je lance dans mon programme ce bout de code il m'ouvre l'apercu d'image de windows ? En fait mon programme est un visualiseur de tif que j'ai développer autour de l'ocx d'imaging.
et je souhaiterai dans mes menus imprimer le tif. Quelqu'un peut il me tourner vers le bon code à utiliser ? Merci d'avance
fish13 Messages postés 2 Date d'inscription vendredi 20 décembre 2002 Statut Membre Dernière intervention 11 avril 2006
11 avril 2006 à 16:32
Bravo, c'est le top. Mais cette fonction peut etre utilisée aussi à d'autre fin, par exemple:

shellexecute hwnd,"", "mailto:totot@toto.fr","","c:",sw_shownormal

(Source API GUIDE 3.7)
beeline Messages postés 83 Date d'inscription jeudi 20 décembre 2001 Statut Membre Dernière intervention 9 juin 2009
20 juil. 2003 à 11:38
dark basic ne gére pas l'impression ... sa m'étonnent
vbmore Messages postés 18 Date d'inscription mercredi 3 avril 2002 Statut Membre Dernière intervention 8 mars 2004
16 juin 2003 à 20:40
Ce serait possible de faire cette librarie, mais en ce moment j'ai un boulou fou.... Si ça peut attendre une semaine ou deux.

J'espère que Dark Basic est compatible avec ActiveX, sinon ce sera vraiment dificile.

Je te recontacterai dans une (grosse) semaine par Mail "codes-sources".

A+

VBMore

PS:Désolé pour le délai de réponse mais je suis débordé.
cs_leoneo Messages postés 9 Date d'inscription dimanche 16 février 2003 Statut Membre Dernière intervention 11 juin 2003
6 juin 2003 à 15:12
Bonjour , je programme sous un autre langage Dark Basic et j'aurai besoin d'une DLL me permettant d'imprimer du texte (en couleur , en italique , en gras ...) et d'imprimer des images (couleur) cette DLL pourrait aussi gérer l'impression . Pourriez vous me créer cette DLL , cela serrai utile à des centaines de personnes , Je vous remercie Beaucoup @+Léo
Afficher les 9 commentaires

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.