将PDF文件保存到桌面[VB.NET]
我想将PDF文件保存到我的桌面。我的代码将它们保存在bin文件夹中将PDF文件保存到桌面[VB.NET],vb.net,Vb.net,我想将PDF文件保存到我的桌面。我的代码将它们保存在bin文件夹中 Dim pdf = gvwProyectos.SelectedRows.Count > 0 Dim pdfDoc As New Document(iTextSharp.text.PageSize.A4) Dim pdfWrite As PdfWriter = PdfWriter.GetInstance(pdfDoc, New FileStream("Reporte.pdf", FileMod
Dim pdf = gvwProyectos.SelectedRows.Count > 0
Dim pdfDoc As New Document(iTextSharp.text.PageSize.A4)
Dim pdfWrite As PdfWriter = PdfWriter.GetInstance(pdfDoc, New FileStream("Reporte.pdf", FileMode.Create))
顺便说一句,我正在使用iTextSharp。您可以使用
Environment.GetFolderPath
获取用户的桌面路径,然后在文件名前面加上前缀
要使用Path.Combine
,您需要在表单类之前添加Imports System.IO
,如果您还没有这样做的话
Dim pdf = gvwProyectos.SelectedRows.Count > 0
Dim pdfDoc As New Document(iTextSharp.text.PageSize.A4)
Dim filename As String = Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.Desktop), "Reporte.pdf")
Dim pdfWrite As PdfWriter = PdfWriter.GetInstance(pdfDoc, New FileStream(filename, FileMode.Create))
好的,我已经知道怎么做了,但我会把对我有用的东西留在这里
Dim pdfDoc As New Document(iTextSharp.text.PageSize.A4)
Dim pdfWrite As PdfWriter = PdfWriter.GetInstance(pdfDoc, New FileStream(Environment.GetFolderPath(Environment.SpecialFolder.Desktop) + "\\" + "yourPDFdesiredName.pdf", FileMode.Create))
我很幸运,知道了怎么做,但谢谢你花时间回答。