How to send a Crystal report as mail from vb

Hi ,
I need to send crystal report( grnarated from vb ) as mail .How to do this.

Thanks in advance.

Anand

i used it in an spanish program but you can get the idea



CRPRODUCTOS.Destination = crptMapi
CRPRODUCTOS.ReportFileName = c:\PRODUCTOS.RPT
CRPRODUCTOS.SelectionFormula = "{PRODUCTOS.CODIGO}='" & CODIGO & "'"
CRPRODUCTOS.EMailToList = CORREOCLIENTE
CRPRODUCTOS.EMailSubject = "PRODUCTOS COMPUACCESORIOS"
CRPRODUCTOS.DiscardSavedData = True
CRPRODUCTOS.Action = 1