J'essaye de tester l'état d'un printer (prèt ou non) connecter sur un port
parallèle local sans aucun pilote installé.

pour ce faire j'utilise le code suivant :

han est un entier = sOuvre(-1,10,10)
si sEcrit(han,caract(13)) = 0 alors ERREUR("Imprimante non prète !!!") sinon
imprime() sFerme(han)

Si le printer est allumé la fonction sEcrit me renvoie le nombre de
caractères écrit, sinon elle doit renvoyer 0.

Hors, au moment de l'écriture (sEcrit...) le programme se bloque sans autre
forme de procès. Le seul moyen de débloquer la chose est soit d'allumer le
printer soit de faire une fin de tâche Windows. Donc sEcrit ne renvoie
strictement rien .....

Quelqu'un a t'il déjà eu ce cas et peut m'aider

Mille mercis d'avance pour toutes les réponses.