有人可以帮助我吗?!我的项目有问题
我有一个名为Document的表有这个字段(id_d,type_d,date_create_d,way,#Nbr_Som)
和Nbr_Som是一个名为fonctionnaire的表的外键引用
当我打印文件例如(工作证书),
该文件在例如记录(D:\ BTS \ Document)中注册为文件PDF,
因此,当我在年份或月份的日期在(VB.net)上搜索工作证书时
我想提取所有这些文件
答案 0 :(得分:0)
此代码包含crystalrepotviewer的表单:
Private Sub Form2_Load(ByVal sender As System.Object,ByVal e As System.EventArgs)处理MyBase.Load Dim r作为新的RCAttestationDeTravail Dim dt As DataTable
dt = Form1.PFE_GRHDataSet.EnseignantS
r.SetDataSource(dt)
CrystalReportViewer1.ReportSource = r
CrystalReportViewer1.SelectionFormula = "{EnseignantS.Num_SOM} = " & Form1.Num_SOMTextBox.Text
''
Dim rapport As New RCAttestationDeTravail
Dim filename As String
Dim str As String = ":"
filename = "C:\Users\Salha\Documents\AttestationDeTravail" & DateString & "+" & Now.Hour & "," & Now.Minute & "," & Now.Second & ".pdf"
rapport.SetDataSource(dt)
rapport.ExportToDisk(CrystalDecisions.Shared.ExportFormatType.PortableDocFormat, filename)
End Sub