Использование PDFCreator для преобразования docx в pdf в функции VB .NET, но это не работает - PullRequest
0 голосов
/ 02 июля 2019

У меня есть функция VB .NET, и мне нужно преобразовать документ .docx в .pdf, используя эту функцию. Я использую PDFCreator из командной строки с пакетом, созданным и выполненным внутри моей функции VB .NET, но почему-то это не работает, и я понятия не имею, что я делаю неправильно. Какие-либо предложения? Забыл сказать, что мне нужно, чтобы этот процесс был полностью скрыт от взаимодействия пользователя с приложением, поэтому преобразование в .pdf должно быть автоматическим, без взаимодействия с пользователем. Пользователю нужно только нажать «Преобразовать», а функция должна сделать все остальное.

Public dirTemp As String = My.Computer.FileSystem.SpecialDirectories.Temp
----
Function GeneratePDF_W10(ByVal PathWord As String, PathPDF As String)
    Try
        Dim pathScriptPDF As String = dirTemp & "\PDFScriptW10.bat"
        Dim write As New System.IO.StreamWriter(pathScriptPDF, False)

        write.WriteLine("C:\Program Files\PDFCreator\PDFCreator.exe /InitializeSettings")
        write.WriteLine("C:\Program Files\PDFCreator\PDFCreator.exe /PrintFile=""" & PathWord & """ /OutputFile=""" & PathPDF & """")

        write.Close()


        Process.Start(pathScriptPDF)

        Dim count As Integer = 0

        Do While Exists(PathPDF) = False
            Threading.Thread.Sleep(1000)
            count = count + 1
            If count >= 60 Then Exit Do
        Loop

        If Exists(PathPDF) = True Then
            Return 1
        Else
            Return 0

        End If

    Catch ex As Exception
        MessageBox.Show(ex.Message)

        Return 0
    End Try


End Function
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...