<div>
What version of Acrobat do you have? 
 
Bob
</div>

What version of Acrobat do you have?

Bob

<div>
Here is a little code that makes searching faster: 
 
For Each myFileinfo In myDir.GetFiles(&quot;*.pdf&quot;) 
 
Bob 

</div>

Here is a little code that makes searching faster:

For Each myFileinfo In myDir.GetFiles("*.pdf")

Bob


<div>
<div class="content wysiwyg-content">
Is there a shorter or a different way &nbsp;to print every files in a folder in VB2005? &nbsp; 
 
 
 
 
Private Sub btnPrintCogentPDF_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPrintCogentPDF.Click 
&nbsp; &nbsp; &nbsp; &nbsp; Dim myProcess As New Process 
&nbsp; &nbsp; &nbsp; &nbsp; Dim myFileinfo As FileInfo 
&nbsp; &nbsp; &nbsp; &nbsp; Dim myDir As DirectoryInfo = New DirectoryInfo(&quot;G:\MailBox\Attach\sample&quot;) 
 
&nbsp; &nbsp; &nbsp; &nbsp; 'Dim i As Integer 
&nbsp; &nbsp; &nbsp; &nbsp; 'i = 1 
 
 
&nbsp; &nbsp; &nbsp; &nbsp; For Each myFileinfo In myDir.GetFiles() 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 'i += 1 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 'If myFileinfo.Extension = &quot;.pdf&quot; Then 
 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; myProcess.StartInfo.FileName = myFileinfo.FullName 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; myProcess.StartInfo.Verb = &quot;print&quot; 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; myProcess.Start() 
 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 
 
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 'End If 
&nbsp; &nbsp; &nbsp; &nbsp; Next 
 
 
 
&nbsp; &nbsp; End Sub
</div>
</div>

Is there a shorter or a different way  to print every files in a folder in VB2005?  




Private Sub btnPrintCogentPDF_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPrintCogentPDF.Click
        Dim myProcess As New Process
        Dim myFileinfo As FileInfo
        Dim myDir As DirectoryInfo = New DirectoryInfo("G:\MailBox\Attach\sample")

        'Dim i As Integer
        'i = 1


        For Each myFileinfo In myDir.GetFiles()
            'i += 1
            'If myFileinfo.Extension = ".pdf" Then

                myProcess.StartInfo.FileName = myFileinfo.FullName
                myProcess.StartInfo.Verb = "print"
                myProcess.Start()

               

            'End If
        Next



    End Sub

Print in VB2005

Visual Basic .NET (VB.NET) is an object-oriented programming language implemented on the .NET framework, but also supported on other platforms such as Mono and Silverlight. Microsoft launched VB.NET as the successor to the Visual Basic language. Though it is similar in syntax to  Visual Basic pre-2002, it is not the same technology,