//Exemple de code réalisant une impression depuis un Pocket PC WiFi vers une imprimante WiFi. Attention, les paramètres nNumPort, nIP et nTimeOut doivent être personnalisés.
//Déclaration des variables
nNumPort est un entier = 9100 //Port WIFI
nIP est une chaîne = "192.168.15.2"
nTimeOut est un entier = 2000
//Sélectionner une imprimante PCL
iConfigure()
//Génération du fichier PCL
iDestination(iPCL, fRepExe() + "\MonFichier.PCL")
iImprimeEtat(Etat1)
iFinImprime()
//Connexion à l`imprimante WiFi
SI PAS SocketConnecte("SockImp",nNumPort,nIP,nTimeOut) ALORS
Erreur(ErreurInfo())
RETOUR
FIN
//Mode de transmission sans ajout/modification du contenu
SocketChangeModeTransmission("SockImp",SocketSansMarqueurFin)
//Envoi du fichier PCL
SocketEcrit("SockImp",UnicodeVersAnsi(fChargeTexte(fRepExe() + "\MonFichier.PCL")))
//Fin de la transmission
SocketFerme("SockImp") |