用心创造滤镜
扫码下载App
汇聚2000万达人的兴趣社区下载即送20张免费照片冲印
扫码下载App
温馨提示！由于新浪微博认证机制调整，您的新浪微博帐号绑定已过期，请重新绑定！&&|&&
LOFTER精选
网易考拉推荐
用微信&&“扫一扫”
将文章分享到朋友圈。
用易信&&“扫一扫”
将文章分享到朋友圈。
阅读(1122)|
用微信&&“扫一扫”
将文章分享到朋友圈。
用易信&&“扫一扫”
将文章分享到朋友圈。
历史上的今天
loftPermalink:'',
id:'fks_085071',
blogTitle:'VBS脚本添加网络打印机(非网络共享打印机)&Win7打印机offline问题解决',
blogAbstract:'为一台重装系统后的电脑安装网络打印机是非常麻烦的，配置端口，选驱动等等，反正安装一次不下若干分钟是完成不了，但是如果有了脚本，这个麻烦的工作就可以在10秒内完成，只需要将驱动先放到一个公共盘上，目标计算机可以访问的地方就可以了。以下给出VBS脚本自动添加网络打印机的方法：------------------传说中神圣的分割线--------------------\'Install Printer portSet objWMIService = GetObject(&winmgmts:&)Set objNewPort = objWMIService.Get _&& (&Win32_TCPIPPrinterPort&).SpawnInstance_',
blogTag:'',
blogUrl:'blog/static/',
isPublished:1,
istop:false,
modifyTime:4,
publishTime:6,
permalink:'blog/static/',
commentCount:0,
mainCommentCount:0,
recommendCount:0,
bsrk:-100,
publisherId:0,
recomBlogHome:false,
currentRecomBlog:false,
attachmentsFileIds:[],
groupInfo:{},
friendstatus:'none',
followstatus:'unFollow',
pubSucc:'',
visitorProvince:'',
visitorCity:'',
visitorNewUser:false,
postAddInfo:{},
mset:'000',
remindgoodnightblog:false,
isBlackVisitor:false,
isShowYodaoAd:false,
hostIntro:'认真做事',
hmcon:'0',
selfRecomBlogCount:'0',
lofter_single:''
{list a as x}
{if x.moveFrom=='wap'}
{elseif x.moveFrom=='iphone'}
{elseif x.moveFrom=='android'}
{elseif x.moveFrom=='mobile'}
${a.selfIntro|escape}{if great260}${suplement}{/if}
{list a as x}
推荐过这篇日志的人：
{list a as x}
{if !!b&&b.length>0}
他们还推荐了：
{list b as y}
转载记录：
{list d as x}
{list a as x}
{list a as x}
{list a as x}
{list a as x}
{if x_index>4}{break}{/if}
${fn2(x.publishTime,'yyyy-MM-dd HH:mm:ss')}
{list a as x}
{if !!(blogDetail.preBlogPermalink)}
{if !!(blogDetail.nextBlogPermalink)}
{list a as x}
{if defined('newslist')&&newslist.length>0}
{list newslist as x}
{if x_index>7}{break}{/if}
{list a as x}
{var first_option =}
{list x.voteDetailList as voteToOption}
{if voteToOption==1}
{if first_option==false},{/if}&&“${b[voteToOption_index]}”&&
{if (x.role!="-1") },“我是${c[x.role]}”&&{/if}
&&&&&&&&${fn1(x.voteTime)}
{if x.userName==''}{/if}
网易公司版权所有&&
{list x.l as y}
{if defined('wl')}
{list wl as x}{/list}printer is offline什么意思?_百度作业帮
printer is offline什么意思?
printer is offline什么意思?
打印机处于脱机状态Access俱乐部
Access入门经典视频《运用Access实现降本增效》（免费）[] | 免费《Access五节必修课》[]
?&&&&?&&&&?&&&&?&&&&
您的位置：　 > >
检查打印机是否为【脱机】状态。各种状态提取参照！
来源:&&点击数:746&&评论数:1　&|&&|&
时　间: 11:17:06
作　者:&&&ID：37995&&城市：上海
摘　要:通过检查【Win32_Printer】的&Attributes&属性&的（二进制&1024）&位的状态【PRINTER_ATTRIBUTE_WORK_OFFLINE】：&1为脱机，0为联机Attributes属性&的各个二进制位，代表了打印机各种状态，可通过公式提取出来：如：提取其1024位的状态：&(Int(objx.Attributes&/&1024))&Mod&2&
通过检查【Win32_Printer】的 Attributes 属性 的（二进制 1024） 位的状态【PRINTER_ATTRIBUTE_WORK_OFFLINE】： 1为脱机，0为联机
Attributes属性 的各个二进制位，代表了打印机各种状态，可通过公式提取出来：
如：提取其1024位的状态： (Int(objx.Attributes / 1024)) Mod 2
‘========VBA代码================
Private Const 分隔符 As String = ",", 引号 As String = "'"
Sub cs001()
&&& MsgBox RPrinList
Public Function RPrinList(Optional ByRef 默认打印机) As String& '返回所有联机的打印机
&&& Dim Str As String
&&& If Printers.Count & 1 Then Exit Function '没有打印机
&&& Str = ""
&&& Set objWMI = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
&&& Set colPrinters = objWMI.ExecQuery("Select * from Win32_Printer")
&&& For Each objx In colPrinters
&&&&&&& If (Int(objx.Attributes / 1024)) Mod 2 = 0 Then ' 检查是否脱机：& PRINTER_ATTRIBUTE_WORK_OFFLINE:
&&&&&&&&&&& Str = Str & 分隔符 & 引号 & objx.name & 引号
&&&&&&& End If
&&& If Str && "" Then Str = Mid(Str, 2)
&&& RPrinList = Str
&&& If Printers.Count = 1 Then 默认打印机 = Str ’只有一台打印机，返回该打印机名作为 默认打印机
End Function
'==============Attributes 属性 说明=======================
AttributesData type: uint32Access type: Read-only
Bitmap of attributes for a Windows-based printing device.
Value used to set the bit
PRINTER_ATTRIBUTE_QUEUED1 (0x1)
Print jobs are buffered and queued.
PRINTER_ATTRIBUTE_DIRECT2 (0x2)
Document to
be sent directly to the printer. This value is used if print jobs are not queued correctly.
PRINTER_ATTRIBUTE_DEFAULT4 (0x4)
Default printer on a
PRINTER_ATTRIBUTE_SHARED8 (0x8)
Available as a shared network resource.
PRINTER_ATTRIBUTE_NETWORK16 (0x10)
Attached to a network. If both Local and Network bits are set, this indicates a network printer.
PRINTER_ATTRIBUTE_HIDDEN32 (0x20)
Hidden from some users on the network.
PRINTER_ATTRIBUTE_LOCAL64 (0x40)
Directly connected to a
If both Local and Network bits are set, this indicates a network printer.
PRINTER_ATTRIBUTE_ENABLEDEVQ128 (0x80)
EnableDevQ
Enable the queue on the printer if available.
PRINTER_ATTRIBUTE_KEEPPRINTEDJOBS256 (0x100)
KeepPrintedJobs
Spooler should not delete documents after they are printed.
PRINTER_ATTRIBUTE_DO_COMPLETE_FIRST512 (0x200)
DoCompleteFirst
Start jobs that are finished spooling first.
PRINTER_ATTRIBUTE_WORK_OFFLINE)
WorkOffline
Queue print jobs when
a printer is not available.
PRINTER_ATTRIBUTE_ENABLE_BIDI)
EnableBIDI
Enable bidirectional printing.
PRINTER_ATTRIBUTE_RAW_ONLY0)
Allow only raw data type jobs to be spooled.
PRINTER_ATTRIBUTE_PUBLISHED0)
Published in the network directory service.
Access软件网官方交流QQ群 (群号:)
　　　　　　
&&&&【&&】&&&&【&&】&&&&【&&】&&&&【&&】
Access网店
价格：￥2000 元
价格：￥1 元
价格：￥1 元
(10-26&21:33)
(10-26&20:06)
(10-26&14:43)
(10-26&14:40)
(10-26&14:31)
(10-26&10:00)
(10-25&19:32)
(10-25&18:09)
(10-25&05:21)
(10-24&23:11)
Access软件网 版权所有 CopyRight
提供支持 本站特聘法律顾问: 李慧 律师扫扫二维码，随身浏览文档
手机或平板扫扫即可继续访问
流水打印机出现Offline故障的现场解决方案
举报该文档为侵权文档。
举报该文档含有违规或不良信息。
反馈该文档无法正常浏览。
举报该文档为重复文档。
推荐理由：
将文档分享至：
分享完整地址
文档地址：
粘贴到BBS或博客
flash地址：
支持嵌入FLASH地址的网站使用
html代码：
&embed src='/DocinViewer-4.swf' width='100%' height='600' type=application/x-shockwave-flash ALLOWFULLSCREEN='true' ALLOWSCRIPTACCESS='always'&&/embed&
450px*300px480px*400px650px*490px
支持嵌入HTML代码的网站使用
您的内容已经提交成功
您所提交的内容需要审核后才能发布，请您等待！
3秒自动关闭窗口}