How To Print a Text File From a Particular Printer

srinictsrinict Member Posts: 58
Dear Friends,
In my batch file i have written code like (print c:\SSS1.prn)for printing a text file.
Now its printing from the default printer, but i want to print it from com1 printer which
is not the default printer. How can i print my file on that particular printer. Please if any one has solution send me reply.

Thanks in Advance.

Regards,
Srinivas

Comments

  • JPHSCJPHSC Member Posts: 67
    Get the default printer


    IF ISCLEAR(gWSHshell) THEN
    CREATE(gWSHshell);

    ltxtRegKey := gWSHshell.RegRead('HKEY_CURRENT_USER\SOFTWARE\MICROSOFT\WINDOWS NT\CurrentVersion\Windows\Device');
    i := STRPOS(ltxtRegKey, ',');
    ltxtDefaultPrinter := COPYSTR(ltxtRegKey, 1, i - 1);
    CLEAR(gWSHshell);

    If ltxtDefaultPrinter <> choosenprinter THEN BEGIN
    IF ISCLEAR(WHSNetwork) THEN
    CREATE(WHSNetwork);
    WHSNetwork.SetDefaultPrinter(vPrinterName);
    CLEAR(WHSNetwork);
    END;

    then the other way around to set your default printer back ?
Sign In or Register to comment.