Hardcopy:printers - Agilent Technologies Infiniium 90000 Series Programmer's Manual

18
Hardcopy Commands

:HARDcopy:PRINters?

Query
:HARDcopy:PRINters?
The :HARDcopy:PRINters? query returns the currently available printers.
Returned Format
[:HARDcopy:PRINters?]
<printer_count><NL><printer_data><NL>[,<printer_data><NL>]
<printer_count>
The number of printers currently installed.
<printer _data> The printer number and the name of an installed printer. The word
DEFAULT appears next to the printer that is the currently selected default
printer.
The <printer_data> return string has the following format:
<printer_number>,<printer_string>{,DEFAULT}
Example
This example places the number of installed printers into the variable
varCount, loops through it that number of times, and prints the installed
printer names to the computer's screen.
Dim varResults As Variant
Dim lngI As Long
myScope.WriteString ":HARDcopy:PRINters?"
varResults = myScope.ReadList(ASCIIType_BSTR, vbLf)
Debug.Print FormatNumber(varResults(0), 0)
For lngI = 1 To varResults(0)
Next lngI
370
Debug.Print CStr(varResults(lngI))
Agilent Infiniium 90000 Series Oscilloscopes Programmer's Reference