brother at your side

 

Brother主页>> 开发工具 >> b-PAC服务支持 >> 使用方法

使用Visual Basic® Script的创建例子

利用文本编辑器输入如下内容，并另存为“固定资产.vbs”。 

					
					'生成b-PAC对象
					Set ObjDoc = CreateObject("bpac.Document")
					'打印通过P-touch Editor创建的模板文件
					'将lbx文件存放到与VBS相同的文件夹下
	bRet = ObjDoc.Open(
					".\固定资产名称.lbx")
					If (bRet <> False) Then'正常打开？
					'在“固定资产名称”的文本对象中设定“TN-9500”
		ObjDoc.GetObject("Name").Text = 
					"TN-9500"
					'在“管理部门”的文本对象中
					'设定“信息设备事业部企划小组”
		ObjDoc.GetObject("Section").Text = 
					"信息设备事业部企划小组"
					'在“管理No”的文本对象中设定“1234567”
		ObjDoc.GetObject("Number").Text = 
					"1234567"
					'在条形码对象中设定“1234567”
		ObjDoc.GetObject("QR条码1").Text = 
					"1234567"
					'执行打印
		ObjDoc.StartPrint "DocumentName", bpoAutoCut
		ObjDoc.PrintOut 1, bpoAutoCut
		ObjDoc.EndPrint
		ObjDoc.Close
					End If
					'释放b-PAC对象
					Set ObjDoc = Nothing
补充
  • 此外，还可以替换图片对象，或设定字体信息。
  • b-PAC下能够使用的Method，请浏览b-PAC SDK Ver.3.0 文档（可以从 b-PAC首页下载）。
脚本执行

返回