Vb.net 自动生成SSR并转换为PDF

Vb.net 自动生成SSR并转换为PDF,vb.net,Vb.net,我想自动将我的SSR转换为pdf并存储到硬盘上的某个位置(例如C:\my Reports) 如何实现这一目标 谢谢使用reporting services web服务。完成此操作的一个好帖子是: 我更新了我的答案,只需将结果写入文件,而不是在浏览器中显示。再次感谢,但它从何处获得信息哪份报告将以PDF格式编写?Dim report as String=“/Sample Reports/Sales Order Detail”非常感谢。我可以把它放在包含reportviewer的窗体上的按钮中吗?将

我想自动将我的SSR转换为pdf并存储到硬盘上的某个位置(例如C:\my Reports) 如何实现这一目标


谢谢使用reporting services web服务。完成此操作的一个好帖子是:


我更新了我的答案,只需将结果写入文件,而不是在浏览器中显示。再次感谢,但它从何处获得信息哪份报告将以PDF格式编写?Dim report as String=“/Sample Reports/Sales Order Detail”非常感谢。我可以把它放在包含reportviewer的窗体上的按钮中吗?将结果写入文件而不是在浏览器中显示是什么意思?是的,但正如链接的博客文章中所述,您首先必须创建对reporting services web服务的web引用,然后可以将上面的代码放入按钮中。我将结果存储在文件中的意思只是对代码示例中最后三行的澄清。
Dim result() As Byte
Dim report As String = "/Sample Reports/Sales Order Detail"
Dim format As String = "PDF"
Dim historyid As String = Nothing
Dim devinfo As String = ""
Dim credentials() As SQLRS.DataSourceCredentials = Nothing
Dim showhide As String = Nothing
Dim encoding As String
Dim mimetype As String
Dim warnings() As SQLRS.Warning = Nothing
Dim reporthistoryparams As SQLRS.ParameterValue() = Nothing
Dim streamid() As String = Nothing
Dim sh As New SQLRS.SessionHeader
ws.SessionHeaderValue = sh 
Next, get the result from the web service:

result = ws.Render(report, format, historyid, devinfo, parameters, _
            credentials, showhide, encoding, mimetype, reporthistoryparams, _
            warnings, streamid)

Dim stream As FileStream = File.Create("C:\My Reports\report.pdf", results.Length)
stream.Write(results, 0, results.Length)
stream.Close()