I want to mail a PDFdocument with Visual Basic, how can I do that?
Below my visual basic statement. Were I can produce several files I want to e-mail.
Sub FilterAndExport()
Dim myDoc As Document
Set doc = Application.ActiveDocument
doc.Refresh
Dim myrpt As Report
Dim myFilterVar As DocumentVariable
Dim myFilterChoices As Variant
Dim i, intNumChoices As Integer
Dim strNextValue As String
Set myDoc = ActiveDocument
Set myrpt = ActiveReport
Set myFilterVar = myDoc.DocumentVariables(“Company”)
intNumChoices = UBound(myFilterVar.Values(boUniqueValues))
myFilterChoices = myFilterVar.Values(boUniqueValues)
For i = 1 To intNumChoices
strNextValue = myFilterChoices(i)
myrpt.AddComplexFilter myFilterVar, “==” & strNextValue
myrpt.ForceCompute
myrpt.ExportAsPDF (“N:\Data\Verlopen IB” & strNextValue & " Verlopen IB" & “.pdf”)
Next i
End Sub
peilert 
(BOB member since 2006-04-12)
