.NET Framework - Impression de fichier PDF

Asked By ROLLOT Pascal Jean
21-May-08 10:37 AM
Bonjour,

J'ai un petit souci. Comment fait-on pour imprimer sans l'ouvrir un fichier
PDF sous vb6?

Merci de votre aide et bonne soirée.
ShellExecuteA
(1)
ShellExecute
(1)
NShowCmd
(1)
LpParameters
(1)
Cordialement
(1)
LpDirectory
(1)
LpFile
(1)
Jean
(1)
  Jacques93 replied...
21-May-08 11:49 AM
Bonjour ROLLOT Pascal Jean,
ROLLOT Pascal Jean a écrit :

Avec l'API 'ShellExecute' ? :

Private Const SW_SHOWNORMAL = 1

Private Declare Function ShellExecute Lib "shell32.dll" Alias
(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


Private Sub Command1_Click()
ShellExecute Me.hwnd, "print", "C:\toto.pdf", _
vbNullString, vbNullString, SW_SHOWNORMAL
End Sub


--

Cordialement,

Jacques.
  ROLLOT Pascal Jean replied...
22-May-08 02:29 AM
Merci beaucoup et bonne journée.
Create New Account
help
ouvrir des forums comme pour VBnet, enfin, VB passera s?rement sur le forum VBnet ? Cordialement ;o) - Logiciels, romans, contacts : http: / / irolog.free.fr _ __ __ __ __ __ __ __ __ __ __ __ . . Bonjour, J'ai rien vu concernant anterieur / Mais pourquoi pas se rencontrer sur le forum de l'un d'entre nous ? - - Cordialement Aski MVP Windows Desktop Experience http: / / dechily.org / http: / / dechily.org / Forum_Aski / Bonjour David, David vbasic.fr qui reprend : Important : les discussions ne sont pas celles de news.microsoft.com - - Cordialement, Jacques. Bonjour Jacques, Et pour Vista, XP, Word, Excel, tu connais l'adresse des forums MS ? Cordialement ;o) - Logiciels, romans, contacts : http: / / irolog.free.fr _ __ __ __ __ __ __ __ __ __ __ __ . . Bonjour Jacques, Merci beaucoup pour votre Excel General Discussion Group Excel New User Newsgroup Excel Setup Newsgroup Excel Worksheet Functions Newsgroup - - Cordialement, Jacques. LE TROLL a ?crit : On peut aussi passer par answers : OS : <http: / / answers.microsoft voie, il ne semble avoir aucun produit de d?veloppement, comme l'a constat? David. - - Cordialement, Jacques. David a ?crit : Peut ?tre li? ? ce qu'on appelle les r?seaux sociaux tise : social en fran?ais et en US a t-il le m?me sens ? - - Cordialement, Jacques. Ah Jacques, tu ne sais pas tout, pourtant on ne te paye pas ? rien sur le NG concern?s, les MVP devrait savoir. . . Merci encore et joyeux No?l. Cordialement ;o) - Logiciels, romans, contacts : http: / / irolog.free.fr _ __ __ __ __ __ __ __ __ __ __ __ . . Ah mon bon David, En effet
NET Framework ShellExecute to open HTML file in VB.Net I have used SHellExecute from C++ successfully on Visual Studio 6. I am currently using Visual Studio 2008 coding in Visual Basic. All the examples I have tracked down to use ShellExecute to open a file with the appropriate application end up looking something like this: 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 Private Sub Command1_Click() Const SW_SHOWDEFAULT As Long = 10 Dim sFullPathToFile As String Dim rc As Long sFullPathToFile = "C: \ tmp \ EditMenu.htm" rc = ShellExecute(0, "Open", sFullPathToFile _ , 0&, 0&, SW_SHOWDEFAULT) End Sub When I execute the above, it
activate, mais ?a ne marche pas le site de l'explorer recouvre le programme GRRrrrrrr. . . ShellExecute Me.hwnd, "Open", Site, "", App.Path, 1 End Sub ' load Sub Form_Activate() Picture1(240).SetFocus 'Form1.Show ??? ' Form1.SetFocus ??? MARCHE PAS ??? ' Me.SetFocus ??? End Sub - - Cordialement ;o) - Logiciels, romans, contacts : http: / / irolog.free.fr _ __ __ __ __ __ __ __ __ __ __ __ . . Bonjour, Form1.ZOrder - - a+ Jean-Pol mais un programme devant un site lanc? pr?alablement depuis le programme via l'explorer. . . - - Cordialement ;o) - Logiciels, romans, contacts : http: / / irolog.free.fr _ __ __ __ __ __ __ __ __ __ __ __ . . LE TROLL a couch? sur son qui sera moins chinois : - -- -- -- -- -- -- -- -- -- -- -- -- Dim Site As String Sub Form_Load() Site = "http: / / irolog.free.fr" ShellExecute Me.hwnd, "Open", Site, "", App.Path, 1 End Sub Sub Form_Activate() Me.Show End Sub bien moi je voudrais que le programme qui appelle le site soit au 1er plan ? - - Cordialement ;o) - Logiciels, romans, contacts : http: / / irolog.free.fr _ __ __ __ __ __ __ __ __ __ __ __ . . LE TROLL avait soumis l'id donner un interval ? 5000 et le mettre enable sur false. Site = "http: / / irolog.free.fr" ShellExecute Me.hwnd, "Open", Site, "", App.Path, 1 timer1.enable = true et mettre show dans la exemple que j'ai donn? (moi j'appelle un site) ! D'autre part l'API ShellExecute je crois accepte tous les explorer, alors que Shelle n'accepte qu'InternetExplorer il me un autre logiciel, je suis dans le logiciel qui doit rester au dessus du tas. . . - - Cordialement ;o) - Logiciels, romans, contacts : http: / / irolog.free.fr _ __ __ __ __ __ __ __ __ __ __ __ . . LE TROLL a ?crit : Private Declare
fr.dotnet.vb, car elle concerne VB2008 - Ce groupe traite de VB6 et ant = E9rieures. Cordialement; - - Jean-Marc Bonsour = AE mg avec ferveur ;o))) vous nous disiez : = 20 peut-etre ??? : PictureBoxes fr.dotnet.vb, car elle concerne VB2008 - Ce groupe traite de VB6 et ant?rieures. Cordialement; - - Jean-Marc le pb est le meme la variable picturesboxes n'est pas declare !! et collections, mais comme d?j? dit, le bon forum est Microsoft.Public.Fr.DotNet.Vb Cordialement. - Logiciels, romans, contacts : http: / / irolog.free.fr _ __ __ __ __ __ __ __ __ __ __ __ . . merci de ta reponse mais concernant le le forum de pro" en VB il ne sert quasiment ? rien ! Bon, ben ? la revoyure. . . Cordialement ;o) - Logiciels, romans, contacts : http: / / irolog.free.fr _ __ __ __ __ __ __ __ __ __ __ __ . . mg a ?crit, le 02 / 01 dizaine d'ann = E9e, peut = EAtre 15 ans, mais gu = E8re plus. Bonne soir = E9e ! Cordialement, - - Jean-Marc Le 03 / 01 / 2010 05:18, Jacques93 a ?crit, et s'est fait censur???? Il r?p?te, sa "signature en HTML" : - - Cordialement, Jacques. Bonjour Jacques, Oh le nom tu te connais : Joseph Attila PUSZTAY Joseph Joe EhJoe son langage, c'est la guerre (des Sous), pas par utilit? mais par sp?culation. . . Cordialement ;o) Joe. - Logiciels, romans, contacts : http: / / irolog.free.fr _ __ __ __ __ __ __ __ __ __ __ __ . . Bonjour Jean-Marc, Merci de va vivre 10, 15 ans. Le di?se (#) se dit-il "sharp" (charpe) en anglais ? Cordialement ;o) - Logiciels, romans, contacts : http: / / irolog.free.fr _ __ __ __ __ __ __ __ __ __ __ __ . . Salut Le Troll, Ton post est
est pas toujour pareil. Merci. Hi, Voila ce qu'il te faut : Public 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 avec comme exemple ShellExecute Me.hwnd, "open", lefichieraouvriravecsonchemincomplet, vbNullString, ledossierdelapplication, 1 Christian 49454bc4$0$27347$426a74cc@news.free.fr. . . Hello, Il vaut mieux utiliser ShellExecute. Voir : http: / / faq.vb.free.fr / index.php?question = 8 Si tu tiens à utiliser Shell("notepad " & FilePath, vbNormalFocus) End Sub Note: le "&" est l'opérateur de concaténation de chaîne. Cordialement; - - Jean-marc Noury (jean_marc_n2) Microsoft MVP - Visual Basic FAQ VB: http: / / faq.vb.free.fr