Advertisement
ASP_Volume3 Miscellaneous #55818

Printers List

Get a list of all the printers available on your computer (Locally and networked)

AI

KI-Zusammenfassung: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

Quellcode
original-source
'Get all printers available on the computer
'usage
'label1.caption=printeravailable
Public Function printeravailable() As String
Dim p As Printer
    For Each p In Printers
    printeravailable = printeravailable & p.DeviceName & " on " & p.Port & vbCrLf
    Next
End Function
Originalkommentare (3)
Wiederhergestellt von der Wayback Machine