Information générale
Catégorie:
Codage, syntaxe et commandes
Titre:
Getting the port from a printer
Days ago I was trying to get the port form a printer
Now I succeed in getting it
But I had to create a cursor
I would apreciate if someone here help me to eliminate
the cursor
If not I will keep the code as it is
************************************************************************
APRINTERS(PTT1,1)
CREATE CURSOR PTT2 (A1 C(150), A2 C(150), A3 C(150), A4 C(150) )
APPEND FROM ARRAY PTT1
PT3 = GETPRINTER ()
SET EXACT ON
SELECT PTT2
LOCATE FOR ALLTRIM(A1) = ALLTRIM (PT3)
= MESSAGEBOX (A2) && here is the printer port
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement