有人可以帮我从SQL Server vb.net中检索文件

时间:2015-03-16 22:43:51

标签: sql-server vb.net ado

有人可以帮助我吗?!我的项目有问题 我有一个名为Document的表有这个字段(id_d,type_d,date_create_d,way,#Nbr_Som) 和Nbr_Som是一个名为fonctionnaire的表的外键引用  当我打印文件例如(工作证书),
该文件在例如记录(D:\ BTS \ Document)中注册为文件PDF, 因此,当我在年份或月份的日期在(VB.net)上搜索工作证书时 我想提取所有这些文件

1 个答案:

答案 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