01.Dim pdf As New SaveFileDialog
02.Dim result As Boolean = False
03.
04. pdf.Title = "Save File Dialog"
05. pdf.InitialDirectory = pdf.RestoreDirectory
06. pdf.Filter = "Pdf files (*.pdf)|*.pdf"
07. pdf.FilterIndex = 1
08. pdf.FileName = Name
09.
10. If pdf.ShowDialog() = DialogResult.OK Then
11. result = Controller.Document_Download(Doc_id, pdf)
12. End If
13. If result Then
14. MessageBox.Show("Download ไฟล์ Pdf เรียบร้อยแล้ว")
15. End If
