Advertisement
2_2002-2004 Miscellaneous #117330

Printers List

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

AI

Shrnutí AI: 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.

Zdrojový kód
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
Původní komentáře (3)
Obnoveno z Wayback Machine