共享文件夹的图片,直接就能打印的。
BeforeOpenProject
shell("net use \\fcserver\UpFiles fcqq123 /user:administrator",0)
AfterOpenProject
dim patch as string = "\\fcserver\UpFiles"
DataTables("销售接单明细").DataCols("印刷图案").SourceFolder =patchDataTables("销售接单明细").DataCols("印刷图案").DefaultFolder =patch