老师您好!
我要制作一个模板,从两个表中有条件的引用数据,一个是工艺流程卡表,每一个小组的工艺流程是不同的,我将生产计划明细表中的生产计划下达给车间,限定小组。依据组别查找工艺流程,打印给车间。比如:我在生产计划表中,用第四组作业,那么就在工艺流程表中找到第四组的流程内容,打印出来,这个模板的条件怎么写?
谢谢!
老师您好! 我将“条形码”字段先用备注型创建,然后是将列属性改为:图片类型。我的代码如下:但是生成后,打开字段后没有生成的“条形码”,什么原因?
,Select Case e.DataCol.Name
Case "清单条码编码", "清单条形码"
If e.DataRow.IsNull("清单条码编码") Then
e.DataRow("条形码") = Nothing
else
Dim doc As New PrintDoc
Dim img As prt.RenderImage
Dim Bar As New BarCodeBuilder
Bar.Symbology = Barpro.Symbology.Code39
Bar.BarRatio = 0.3
Bar.BarHeight = 8
Doc.Stacking = prt.StackingRulesEnum.InlineLeftToRight
For Each r As Row In Tables("生产计划明细表").Rows
bar.Code = r("清单条码编码")
img = New prt.RenderImage
img.Image = bar.GetImage
Doc.Body.Children.Add(img)
Next
End If
End select
报表细节引用问题,我不会写表达式 ,这样写对吗?[@生产计划明细表,流程 "组别=” & [@工艺流程表,组别]"]
看帮助的时候请认真看帮助里的文字描述,不要随便用,上面的用法帮助里明显说明是用来打印条码的,如果需要的是生成条码的图片并保存,请使用示例一的用法
……
e.DataRow("条形码") = Nothing
else
Dim Bar As New BarCodeBuilder
Bar.Symbology = Barpro.Symbology.Code39
Bar.Code = e.DataRow("清单条码编码")
Bar.BarWidth = 0.3
Bar.BarHeight = 8
dim 路径
Bar.SaveImage(projectpath & "Attachments\" & e.DataRow("清单条码编码") & ".jpg") e.DataRow("条形码") = e.DataRow("清单条码编码") & ".jpg" End If