address = HyperlinkPart(rst.Fields(fld.Name), acAddress)
dtext = HyperlinkPart(rst.Fields(fld.Name), acDisplayText)

dtext=        O:\PROJ\Kristall\5_Distrib\Email\Ask_contacts\feedback\CIC_Lyonnais_KRISTALLsyndicated_pre-export_facilityhtm_Your_invitation_to_participate.htm
address=      O:\PROJ\Kristall\5_Distrib\Email\Ask_contacts\feedback\CIC_Lyonnais_KRISTALLsyndicated_pre-export_facilityhtm_

SELECT DISTINCT AttachmentPath,AttachmentPath1,AttachmentPath2,AttachmentPath3,AttachmentPath4,
AttachmentPathEng,AttachmentPathEng1,AttachmentPathEng2,AttachmentPathEng3,AttachmentPathEng4
FROM MailLists WHERE ((Len(Hyperlinkpart(AttachmentPath, 2 ))> 0 )) OR ((Len(Hyperlinkpart(AttachmentPath1, 2 ))> 0 ))
OR ((Len(Hyperlinkpart(AttachmentPath2, 2 ))> 0 )) OR ((Len(Hyperlinkpart(AttachmentPath3, 2 ))> 0 ))
OR ((Len(Hyperlinkpart(AttachmentPath4, 2 ))> 0 )) OR ((Len(Hyperlinkpart(AttachmentPathEng, 2 ))> 0 ))
OR ((Len(Hyperlinkpart(AttachmentPathEng1, 2 ))> 0 )) OR ((Len(Hyperlinkpart(AttachmentPathEng2, 2 ))> 0 ))
OR ((Len(Hyperlinkpart(AttachmentPathEng3, 2 ))> 0 )) OR ((Len(Hyperlinkpart(AttachmentPathEng4, 2 ))> 0 ));