Crystal Report - Guardar report en un directorio al generarlo

Hola!!

Genero un informe desde visual .net, utilizando el control crystalReportViewer, de la siguiente manera:

Dim rpt As New fInformes()
Dim crReportDocument As New fInformes
Dim crTableLogonInfos As New TableLogOnInfos
Dim crTableLogonInfo As New TableLogOnInfo
Dim crConnectionInfo As New ConnectionInfo
Dim parametrosInforme As New ParameterFields
Dim parametro As New ParameterField
Dim valorParametro As New ParameterDiscreteValue

'nombre del parametro del informe
parametro.ParameterFieldName = "id_historial"
'valor del parametro id_historial
valorParametro.Value = id_historial
parametro.CurrentValues.Add(valorParametro)
parametrosInforme.Add(parametro)
rpt.CrystalRViewerInformes.ParameterFieldInfo = parametrosInforme
'pasamos la cadena de conexion para que no la pida al abrir el report
With crConnectionInfo
.Password = AppSettings("pwdReport")
End With
crTableLogonInfo.ConnectionInfo = crConnectionInfo
crTableLogonInfos.Add(crTableLogonInfo)
rpt.CrystalRViewerInformes.LogOnInfo = crTableLogonInfos
'llamamos al report
rpt.CrystalRViewerInformes.ReportSource = AppSettings("pathInformes") & "Informe.rpt"
rpt.Show(Me)

Lo que quiero es que a la vez que lo muestro por pantalla, guardarlo en un directorio que le indique yo y con el formato pdf.

¿cómo puedo hacer esto? muchas gracias.