author：水如煙
需要引用system.management空間再imports system.management
使用:private
subbutton2_click(
byval
sender
assystem.object,
byval
e as
system.eventargs)
handles
button2.click
foreach
printer
asstring
inprinterservice.getprinternames(".
")console.writeline(printer)
next
end sub
private
subbutton3_click(
byval
sender
assystem.object,
byval
e as
system.eventargs)
handles
button3.click
console.writeline(printerservice.setdefaultprinter(".
", "epson lq-1600kiii"))
end sub
public
class
printerservice
public
shared
function
getprinternames(
byval
computername
asstring
) as
string
()dim
mresult(-1
) as
string
dimgmanagementobject
asnew
managementobject
gmanagementobject.scope
=new
managementscope(
string
.format(
"///root/cimv2
", computername))
dimgsearcher
asnew
managementobjectsearcher(
string
.format(
"select deviceid from ",
"win32_printer"))
gsearcher.scope
=gmanagementobject.scope
tryfor
each
mmanagementobject
a**anagementobject
ingsearcher.get()
redim
preserve
mresult(mresult.length)
mresult(mresult.length -1
) =mmanagementobject.properties.item(
"deviceid
").value
next
catch
ex as
exception
console.writeline(ex.message)
finally
gsearcher.dispose()
gmanagementobject.dispose()
endtry
return
mresult
end function
public
shared
function
setdefaultprinter(
byval
computername
asstring
, byval
printername
asstring
) as
boolean
dimmresult
asboolean
=false
dimgmanagementobject
asnew
managementobject
gmanagementobject.scope
=new
managementscope(
string
.format(
"///root/cimv2
", computername))
dimgsearcher
asnew
managementobjectsearcher(
string
.format(
"select deviceid from ",
"win32_printer"))
gsearcher.scope
=gmanagementobject.scope
tryfor
each
mmanagementobject
a**anagementobject
ingsearcher.get()
ifmmanagementobject.properties.item(
"deviceid
").value.tostring.equals(printername)
then
mmanagementobject.invokemethod(
"setdefaultprinter",
nothing
)exit
forend
ifnext
mresult
=true
catch
ex as
exception
console.writeline(ex.message)
finally
gsearcher.dispose()
gmanagementobject.dispose()
endtry
return
mresult
end function
end class
silverlight 呼叫預設印表機
列印輔助類。首先新增 using system.windows.printing 命名空間 1 public class silverprint215 public void onprintpage object sender,printpageeventargs e 1635 設定textbloc...
C 如何設定電腦的預設印表機？
先新增對system.management的引用，file nato epson lq 1600kiii然後查詢出你要設定的印表機名稱，以下事例設定為file nato epson lq 1600kiii共享印表機為預設 using system using system.collections.g...
列印技術之獲取及設定系統預設印表機
本文主要介紹如何獲取以及設定系統的預設印表機。1.獲取系統中的所有印表機 獲取系統中的所有印表機可以使用enumprinters 函式，該函式可以列舉全部的本地 網路印表機資訊。其函式原型為 1 bool winapi enumprinters 2dword flags,3lpstr name,4d...