Hi All, We have 2 modules Employee and Report.In the employee module we have information for each employee including their photographs as attachment.
Now in the report module we have to create a report in which we have to show photograph of each employee as well as their other information.
Report can be in any format : Word,Excel or HTML.
Please suggest how this can be done.
To be precise we have come to the point where we have a handle to the attachment through the following code:
While Not( doc Is Nothing)
Dim vEval As Variant
vEval = Evaluate("@AttachmentNames", doc)
Forall v In vEval
If v <> "" Then
Msgbox("Found an attachment::" + doc.empname(0) + v )
Set attch = doc.GetAttachment( v)
Print |<tr>|
Print |<td>|+attch.Name+ |/<td>|
Print |</tr>|
End If
End Forall
However still not able to print image in the report.
Please help.Thanks in advance