Vbscript dans Formcalc
Simon
-
dfgdg -
dfgdg -
Bonjour, j'ai le bout de code suivant en HTML
<event activity="click">
<script>if ((xfa.form.F.P1.Date_Heure1.isNull)) then (xfa.host.messageBox("Le champ Date n'a pas été saisis"))
else xfa.host.print(0,"0","0",0,0,0,0,0); -- Ici j'imprime sur l'imprimante par défaut
Je veux mettre ici le code VBScript suivant qui redéfini l'imprimante par défaut
Dim net
Set net = CreateObject("WScript.Network")
net.SetDefaultPrinter "\\10.0.1.56\HPJeanJ"
COMMENT JE CODE LE TOUT SVP
endif;</script>
<event activity="click">
<script>if ((xfa.form.F.P1.Date_Heure1.isNull)) then (xfa.host.messageBox("Le champ Date n'a pas été saisis"))
else xfa.host.print(0,"0","0",0,0,0,0,0); -- Ici j'imprime sur l'imprimante par défaut
Je veux mettre ici le code VBScript suivant qui redéfini l'imprimante par défaut
Dim net
Set net = CreateObject("WScript.Network")
net.SetDefaultPrinter "\\10.0.1.56\HPJeanJ"
COMMENT JE CODE LE TOUT SVP
endif;</script>
