bonjour, j'ai trouve ces extraits de code ecrit en visual basic,
y a t il un moyen de les traduire pour windev ?
BEPPRINTLib est une reference ajoutee ds vb
Option Explicit
Private WithEvents oPrintJobMonitor As BEPPRINTLib.PrintJobMonitor
------------------------------------------------------------------------
Private sub test()
Dim oPrinter As BEPPRINTLib.Printer
Dim oPrintJob As BEPPRINTLib.PrintJob
Dim nResult As BEPPRINTLib.prnConversionResult
Set oPrinter = CreateObject("easyPdfSdk.Printer")
Set oPrintJob = oPrinter.PrintJob
Set oPrintJobMonitor = oPrinter.PrintJobMonitor
Call oPrintJob.PrintOut(inFileName, outFileName)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Mas Fabien
voici une autre formulation du code vb COM Objects in Visual Basic BCL COM Objects can be accessed from a variety of programming environments. This brief example shows how to access a COM Object from Visual Basic.
1.. Create a new project. Click Project -> References, and select the BCL COM Object:
2.. Create an Object in VB Code:
Dim oPrinter As BEPPRINTLib.Printer Set oPrinter = CreateObject("EasyPdfSdk.Printer")
3.. Reference COM Method in VB Code:
Dim oPrintJob as BEPPRINTLib.PrintJob Set oPrinjob = oPrinter.PrintJob call oPrintJob.PrintOut(inFileName,outFileName)
impossiblde trouver quelque part ce mysterieux "BCL COM Object:" ds windev ...
"Mas Fabien" a écrit dans le message de news: 4264f80b$0$882$
bonjour, j'ai trouve ces extraits de code ecrit en visual basic, y a t il un moyen de les traduire pour windev ?
BEPPRINTLib est une reference ajoutee ds vb
Option Explicit Private WithEvents oPrintJobMonitor As BEPPRINTLib.PrintJobMonitor ------------------------------------------------------------------------ Private sub test() Dim oPrinter As BEPPRINTLib.Printer Dim oPrintJob As BEPPRINTLib.PrintJob Dim nResult As BEPPRINTLib.prnConversionResult
Set oPrinter = CreateObject("easyPdfSdk.Printer") Set oPrintJob = oPrinter.PrintJob Set oPrintJobMonitor = oPrinter.PrintJobMonitor Call oPrintJob.PrintOut(inFileName, outFileName)
voici une autre formulation du code vb
COM Objects in Visual Basic
BCL COM Objects can be accessed from a variety of programming environments.
This brief example shows how to access a COM Object from Visual Basic.
1.. Create a new project. Click Project -> References, and select the BCL
COM Object:
2.. Create an Object in VB Code:
Dim oPrinter As BEPPRINTLib.Printer
Set oPrinter = CreateObject("EasyPdfSdk.Printer")
3.. Reference COM Method in VB Code:
Dim oPrintJob as BEPPRINTLib.PrintJob
Set oPrinjob = oPrinter.PrintJob
call oPrintJob.PrintOut(inFileName,outFileName)
impossiblde trouver quelque part ce mysterieux "BCL COM Object:" ds windev
...
"Mas Fabien" <fabien@iom.fr> a écrit dans le message de news:
4264f80b$0$882$636a15ce@news.free.fr...
bonjour, j'ai trouve ces extraits de code ecrit en visual basic,
y a t il un moyen de les traduire pour windev ?
BEPPRINTLib est une reference ajoutee ds vb
Option Explicit
Private WithEvents oPrintJobMonitor As BEPPRINTLib.PrintJobMonitor
------------------------------------------------------------------------
Private sub test()
Dim oPrinter As BEPPRINTLib.Printer
Dim oPrintJob As BEPPRINTLib.PrintJob
Dim nResult As BEPPRINTLib.prnConversionResult
Set oPrinter = CreateObject("easyPdfSdk.Printer")
Set oPrintJob = oPrinter.PrintJob
Set oPrintJobMonitor = oPrinter.PrintJobMonitor
Call oPrintJob.PrintOut(inFileName, outFileName)
voici une autre formulation du code vb COM Objects in Visual Basic BCL COM Objects can be accessed from a variety of programming environments. This brief example shows how to access a COM Object from Visual Basic.
1.. Create a new project. Click Project -> References, and select the BCL COM Object:
2.. Create an Object in VB Code:
Dim oPrinter As BEPPRINTLib.Printer Set oPrinter = CreateObject("EasyPdfSdk.Printer")
3.. Reference COM Method in VB Code:
Dim oPrintJob as BEPPRINTLib.PrintJob Set oPrinjob = oPrinter.PrintJob call oPrintJob.PrintOut(inFileName,outFileName)
impossiblde trouver quelque part ce mysterieux "BCL COM Object:" ds windev ...
"Mas Fabien" a écrit dans le message de news: 4264f80b$0$882$
bonjour, j'ai trouve ces extraits de code ecrit en visual basic, y a t il un moyen de les traduire pour windev ?
BEPPRINTLib est une reference ajoutee ds vb
Option Explicit Private WithEvents oPrintJobMonitor As BEPPRINTLib.PrintJobMonitor ------------------------------------------------------------------------ Private sub test() Dim oPrinter As BEPPRINTLib.Printer Dim oPrintJob As BEPPRINTLib.PrintJob Dim nResult As BEPPRINTLib.prnConversionResult
Set oPrinter = CreateObject("easyPdfSdk.Printer") Set oPrintJob = oPrinter.PrintJob Set oPrintJobMonitor = oPrinter.PrintJobMonitor Call oPrintJob.PrintOut(inFileName, outFileName)
Romain PETIT
Mas Fabien avait écrit le 19/04/2005 :
impossiblde trouver quelque part ce mysterieux "BCL COM Object:" ds windev
Tu as la DLL ou l'OCX au moins ? Il suffit normalement de l'enregistrer sur le système (regsrv32) et ensuite de l'instancier en OLE automation.
oPrinter est un objet OLE dynamique oPrinter = allouer un objet automation "EasyPdfSdk.Printer"
A+
-- Romain PETIT http://cerbermail.com/?O16kfXOFcq (cliquez sur le lien ci-dessus pour me contacter en privé)
Mas Fabien avait écrit le 19/04/2005 :
impossiblde trouver quelque part ce mysterieux "BCL COM Object:" ds windev
Tu as la DLL ou l'OCX au moins ?
Il suffit normalement de l'enregistrer sur le système (regsrv32) et
ensuite de l'instancier en OLE automation.
oPrinter est un objet OLE dynamique
oPrinter = allouer un objet automation "EasyPdfSdk.Printer"
A+
--
Romain PETIT
http://cerbermail.com/?O16kfXOFcq
(cliquez sur le lien ci-dessus pour me contacter en privé)
impossiblde trouver quelque part ce mysterieux "BCL COM Object:" ds windev
Tu as la DLL ou l'OCX au moins ? Il suffit normalement de l'enregistrer sur le système (regsrv32) et ensuite de l'instancier en OLE automation.
oPrinter est un objet OLE dynamique oPrinter = allouer un objet automation "EasyPdfSdk.Printer"
A+
-- Romain PETIT http://cerbermail.com/?O16kfXOFcq (cliquez sur le lien ci-dessus pour me contacter en privé)
Mas Fabien
Oui j'ai bien la dll et je l'avais enregistree aussi cela marche maintenant, c'etait juste la creation de l'objet que je n'arrivais pas a faire mais le probleme est resolu maintenant :D
un grand merci ------------------------------------------------------------------------------------------------------ le code complet :
fic est une chaîne = fSélecteur("", "", "Sélectionnez un fichier...", "Tous fichiers (*.*)"+TAB+"*.*", "*.*", fselOuvre+fselExiste)
oPrinter est un objet OLE dynamique
oPrinter = allouer un objet Automation "EasyPdfSdk.Printer"
oPrinjob est un objet Automation dynamique
oPrinjob= oPrinter>>PrintJob
oPrinjob>>PrintOut(fic,fRepExe()+"test.pdf")
"Romain PETIT" a écrit dans le message de news:
Mas Fabien avait écrit le 19/04/2005 :
impossiblde trouver quelque part ce mysterieux "BCL COM Object:" ds windev
Tu as la DLL ou l'OCX au moins ? Il suffit normalement de l'enregistrer sur le système (regsrv32) et ensuite de l'instancier en OLE automation.
oPrinter est un objet OLE dynamique oPrinter = allouer un objet automation "EasyPdfSdk.Printer"
A+
-- Romain PETIT http://cerbermail.com/?O16kfXOFcq (cliquez sur le lien ci-dessus pour me contacter en privé)
Oui j'ai bien la dll et je l'avais enregistree aussi
cela marche maintenant, c'etait juste la creation de l'objet que je
n'arrivais pas a faire mais le probleme est resolu maintenant :D
un grand merci
------------------------------------------------------------------------------------------------------
le code complet :
fic est une chaîne = fSélecteur("", "", "Sélectionnez un fichier...", "Tous
fichiers (*.*)"+TAB+"*.*", "*.*", fselOuvre+fselExiste)
oPrinter est un objet OLE dynamique
oPrinter = allouer un objet Automation "EasyPdfSdk.Printer"
oPrinjob est un objet Automation dynamique
oPrinjob= oPrinter>>PrintJob
oPrinjob>>PrintOut(fic,fRepExe()+"test.pdf")
"Romain PETIT" <VoirM@Signature.fin> a écrit dans le message de news:
mn.9b8b7d54b07aab2b.2248@Signature.fin...
Mas Fabien avait écrit le 19/04/2005 :
impossiblde trouver quelque part ce mysterieux "BCL COM Object:" ds
windev
Tu as la DLL ou l'OCX au moins ?
Il suffit normalement de l'enregistrer sur le système (regsrv32) et
ensuite de l'instancier en OLE automation.
oPrinter est un objet OLE dynamique
oPrinter = allouer un objet automation "EasyPdfSdk.Printer"
A+
--
Romain PETIT
http://cerbermail.com/?O16kfXOFcq
(cliquez sur le lien ci-dessus pour me contacter en privé)
Oui j'ai bien la dll et je l'avais enregistree aussi cela marche maintenant, c'etait juste la creation de l'objet que je n'arrivais pas a faire mais le probleme est resolu maintenant :D
un grand merci ------------------------------------------------------------------------------------------------------ le code complet :
fic est une chaîne = fSélecteur("", "", "Sélectionnez un fichier...", "Tous fichiers (*.*)"+TAB+"*.*", "*.*", fselOuvre+fselExiste)
oPrinter est un objet OLE dynamique
oPrinter = allouer un objet Automation "EasyPdfSdk.Printer"
oPrinjob est un objet Automation dynamique
oPrinjob= oPrinter>>PrintJob
oPrinjob>>PrintOut(fic,fRepExe()+"test.pdf")
"Romain PETIT" a écrit dans le message de news:
Mas Fabien avait écrit le 19/04/2005 :
impossiblde trouver quelque part ce mysterieux "BCL COM Object:" ds windev
Tu as la DLL ou l'OCX au moins ? Il suffit normalement de l'enregistrer sur le système (regsrv32) et ensuite de l'instancier en OLE automation.
oPrinter est un objet OLE dynamique oPrinter = allouer un objet automation "EasyPdfSdk.Printer"
A+
-- Romain PETIT http://cerbermail.com/?O16kfXOFcq (cliquez sur le lien ci-dessus pour me contacter en privé)
