RESPONDER UNA PREGUNTA

Si para responder la pregunta, crees necesario enviar un archivo adjunto, puedes hacerlo a traves del correo [email protected]

Pregunta:	62858 - INFORME A SNAPSHOT
Autor:	Francisco Jimena
Estoy mandando informes a Gestores en papel y quiero empezar a hacerlo por mail con snapshot. En papel utilizo el código que adjunto: Private Sub Comando8_Click() Dim x As Database Dim y As Recordset Dim g As String Dim nre As String Dim sn As String * 1 Set x = CurrentDb Set y = x.OpenRecordset("Gest_t", dbOpenDynaset) y.MoveFirst Do Until y.EOF g = y("Gestor") sn = InputBox("Ahora abrirá el informe del Gestor: " & g) If sn = "N" Or sn = "n" Then Exit Do End If DoCmd.OpenReport "Info1_2_3 a Gestores", acViewPreview, , "Gestor ='" & g & "'" MsgBox "Ahora cerrará el informe de " & g DoCmd.Close acReport, "Info1_2_3 a Gestores" y.MoveNext Loop y.Close End Sub El problema es cuando quiero crear informes snapshot, no se poner las condiciones, he probado con: DoCmd.OutputTo acReport, "Info1_2_3 a Gestores", "FormatoSnapshot(*.snp)", "c:pruebassnpprueba.snp", False, "", 0 Os agradecería que me ayudéis