Page 2 sur 3

MessagePublié: 30 Mai 2011 à 08:55
par sebo13
Bonjour,

Une dernière question que dois je mettre comme type de chemin dans : wPathFileSource

Merci d'avance

MessagePublié: 30 Mai 2011 à 09:26
par Michael DELIQUE
re,

ben l'emplacement chemin+nom à convertir. mais je ne t'ai passé le tips que pour que tu vois comment pdfcretor permet de jouer avec les imprimantes par défaut pour pouvoir modifier ta fonction.

ce tips a pour but de convertir un fichier

MessagePublié: 30 Mai 2011 à 09:30
par sebo13
Ok merci bien

MessagePublié: 17 Juin 2011 à 15:34
par sebo13
Nouvelle question :
Comme je ne maîtrise pas encore le LS , je souhaiterais savoir comment rappeler deux fonctions et quelle s'exécute l'une après l'autre (pas ensemble) .
En fait dans mon système d'impression j'ai créé deux function
1- Une qui bascule mon imprimante par défaut et autres
2- une autre qui remet une autre imprimante par défaut puis clear le tout.

Je souhaiterais exécuter l'impression d'un mémo de la vue courrante entre le point 1 et le point 2.

Merci d'avance de votre aide.

MessagePublié: 18 Juin 2011 à 09:07
par roubech
chaque ligne de code est exécuté aprés que la ligne précédente est terminée. Ca vaut pour les fonction native comme pour tes fonctions
[syntax="LotusScript"]sub initialize
...
call mafonction1()
...
call mafonction2()
...
end sub[/syntax]

MessagePublié: 20 Juin 2011 à 08:50
par sebo13
Bonjour ,

Merci de votre réponse.
Effectivement , j'ai fait mon sub dans ce sens là. Mais j'ai constaté un problème, quand je lance mon agent mon imprimante par defaut passe bien sur pdfcreator mais l'impression est toujours demandé sur mon autre imprimante.
J'ai mis un "sleep 10" pour voir , mon imprimante passe dessuite sur pdfcreator mais quelques instant après l'impression se lance sur mon imprimante par défaut précédente.


Code : Tout sélectionner
Sub Initialize
   Dim workspace As New NotesUIWorkspace
   Dim uidoc As NotesUIview
   Call PDFCreator ()
   Sleep 10
   Set uidoc = workspace.CurrentView
   Call uidoc.Print (1)
   Sleep 1
   Call PDFCreator1 ()
   Sleep 2
End Sub


Ou est l'erreur ?

Merci d'avance de votre aide[/code]

MessagePublié: 20 Juin 2011 à 09:40
par Michael DELIQUE

MessagePublié: 20 Juin 2011 à 10:07
par sebo13
Bonjour

Et merci pour ton aide.
J'ai essayé la semaine dernière avec ce tips.
J'ai le même problème , l'imprimante passe bien en PDFCreator mais l'impression se fait sur l'imprimante par défaut précédente.

J'ai mis la fonction tel quel dans mon agent
Puis voici mon initialise.

Code : Tout sélectionner
Sub Initialize
   Dim workspace As New NotesUIWorkspace
   Dim uidoc As NotesUIview
   Call PrinterDefautSet ("PDFCreator")
                sleep 1
   Set uidoc = workspace.CurrentView
   Call uidoc.Print (1)
End Sub


je ne comprend pas trop mon erreur.

Merci d'avance.[/code]

MessagePublié: 20 Juin 2011 à 10:43
par sebo13
Alors je viens de constater que mon imprimante par défaut windows passe bien par defaut sur PDFCreator lors de l'exécution de mon agent mais l'impression se réalise sur mon ancienne imprimante par défaut. si je fais "fichier" ==> "imprimer" juste après avoir exécuté mon agent et l'imprimante par défaut lotus est mon ancienne imprimante alors que sous windows mon imprimante par défaut est bien "PDFCreator".

Si je fais la manipulation manuellement via Windows , l'imprimante par defaut remonte correctement , si je mets par defaut l'imprimante PDFCreator , le gestionnaire d'impression lotus me remonte bien pdfcreator par defaut. Si je mets par defaut mon autre imprimante par defaut , le gestionnaire d'imprimante me remonte bien la bonne imprimante par defaut .

Y a t'il une commande permettant d'initialiser le gestionnaire d'impression lotus ?

Merci

MessagePublié: 20 Juin 2011 à 10:45
par Michael DELIQUE
re

essais des yield à la place des sleep pour laisser a l'os le temp de traiter ta demande

MessagePublié: 20 Juin 2011 à 11:27
par sebo13
Rien a faire , ca ne marche pas avec les Yield non plus.
l'impression est réalisé sur mon ancienne imprimante et elle est par defaut dans lotus.
alors que sous windows , PDFCreator est bien par defaut sous windows.
Je continus mes recherches.
J'ai vu un ancien message sur le forum qui traite de ce sujet.

http://forum.dominoarea.org/pb-dimprimante-par-defaut-avec-pdfcreator-t24555.html

Je ne sais pas s'il a réussi à régler son problème.

merci

MessagePublié: 20 Juin 2011 à 15:45
par sebo13
Si celà provient d'un problème de droit , a quel niveau pourrait être le problème ?

Merci

MessagePublié: 21 Juin 2011 à 15:21
par sebo13
Bon je viens de parcourrir pas mal de post de partout.
J'ai vu que lotus concerver en mémoire l'imprimante par defaut précédente.
Exemple , avec le script ci-dessous , j'arrive à passer mon imprimante windows par defaut "PDFCreator" mais lorsque je lance mon agent l'impression se realise sur mon imprimante précédente (par défaut) mais si je fais "Fichier" ==> "Imprimer" (uidoc.Print ()) , j'ai bien "PDFCreator" par defaut dans lotus.

Code : Tout sélectionner
Dim WshNetwork As Variant
   Dim WshPrinters As Variant
   Dim PrinterPath As String
   Dim workspace As New NotesUIWorkspace
   Dim uidoc As NotesUIdocument
   Set uidoc = workspace.Currentdocument
   Set WshNetwork = CreateObject("WScript.Network")
   Set WshPrinters = WshNetwork.EnumPrinterConnections()
   PrinterPath = "PDFCreator"
   WshNetwork.SetDefaultPrinter Cstr(PrinterPath)
   Yield
   Set uidoc = workspace.Currentdocument
   Call uidoc.Print ()

Par contre si je relance mon agent , j'impression se realise bien sur PDFCreator.

Si vous avez une idée , je suis preneur.

MessagePublié: 21 Juin 2011 à 15:26
par Michael DELIQUE
re,

peut-être un probleme de Session lotus qui n'es pas mise à jours.

MessagePublié: 21 Juin 2011 à 15:42
par Michael DELIQUE