主题：如何利用ftp远程指定文件转换pdf

参考代码，必须现在，最后再上传

http://www.foxtable.com/webhelp/scr/1410.htm

Dim ftp1 As New FtpClient
Dim fileName As String = "/JLZL2018/" & "AA.docx"
ftp1.Host="*****"
ftp1.Account = "**"
ftp1.Password = "***"
If ftp1.Download(fileName,"d:\test.docx", False) Then
   
    Dim app As New MSWord.Application
    Try
        Dim doc = app.Documents.Open("d:\test.docx")
        app.Documents(fileName).ExportAsFixedFormat("d:\ttt.pdf", MSWord.WdExportFormat.wdExportFormatPDF)
        app.Quit
    Catch ex As Exception
        msgbox(ex.message)
        app.Quit
    End Try
   
End If