Reatórios com Crystal Reports

Olá Amigos
acabo de me cadastrar no VBWEB e é com muita satisfação que dou boas vindas a todos estou aqui escrevendo no forum por um motivo que não consigo resolver será que alguem pode me ajudar. O problema é o seguinte. Criei um projeto onde gera relatórios para impressora e enviar por email tambem mais só não consegui fazer com que gere os mesmo para arquivo em disco com as extenções (.PDF; .TXT; .DOC) sera que tem como o que já fiz é o seguinte.

Criando um relatório para impressão em uma impressora
Sintaxe abaixo:

With CrystalReport1
  .ReportFileName = "X:caminho
elatorio.rpt"
  .PrinterDriver = "Epson24.drv"
  .PrinterPort = "LPT1"
  .PrinterName = "Epson - Matricial"
  .Action = 1
End With

Criando relatórios do Crystal pera enviar via Internet por email
Sintaxe abaixo:

With CrystalReport1
  .Destination = crptMail
  .EMailMessage= " Aqui você coloca a sua mensagem ou relatorio"
  .EMailSubject="Assunto"
  .EMailToList ="macoratti@riopreto.com.br"
  .Action = 1
End With

Agora preciso para salvar em disco alguem pode me ajudar.
Agradeço desde já
Att.
Jonathan F.Filman