| Pregunta: | 19091 - ¿COMO GENERO UN INFORME EN ASP? |
| Autor: | oliver gonzalez |
| HOLA A TODOS
LA VERDAD TENGO POCO QUE ESTOY PROGRAMANDO PAGINAS ASP Y AHORA ME ESTA DETENIENDO EL PROYECTO POR QUE NO SE COMO GENERAR UN INFORME IMPRESO CON DATOS DE UNA TABLA DE ACCESS HE ESCUCHADO QUE CON CRYSTAL REPORT SE PUEDE PERO AUN NO SE COMO HACERLO DANDO GRACIAS DE ANTEMANO A QUIEN PUEDA AYUDARME | |
| Respuesta: | Luis Ruiz N. |
| puedes utilizar access para generar los informes
creas un objeto de access y luego abres el informe y lo guardas como snapshot y lo guardas en tu directorio virtual luego lo puedes abrir con el control ocx del snapshot viewer que es gratis! strNum = "Report" systime=now() strNum= strNum & cstr(year(systime)) & cstr(month(systime)) & cstr(day(systime)) strNum= strNum & cstr(hour(systime)) & cstr(minute(systime)) & cstr(second(systime)) strSnapFile = strNum & ".snp" InfImprimir=NomReporte(Inf) strDbName = Server.MapPath(".") & "\BaseDatos\Lenguas.mdb" strRptName = InfImprimir strWhere = Rest strFilter = "" Set objAccess = Server.CreateObject("Access.Application") objAccess.Visible = False objAccess.OpenCurrentDatabase strDbName objAccess.DoCmd.OpenReport strRptName, acViewPreview, strFilter, strWhere objAccess.DoCmd.OutputTo acOutputReport, , "Snapshot Format", Server.MapPath(".") & _ "\TempInformes\" & strSnapFile objAccess.DoCmd.Close objAccess.Quit acQuitSaveNone 'acQuitSaveNone 'Set objAccess = Nothing <object ID="SnapshotViewer1" WIDTH="750" HEIGHT="500" codebase="recursos/Snapview.ocx" CLASSID="CLSID:F0E42D60-368C-11D0-AD81-00A0C90DC8D9" VIEWASTEXT> <param name="_ExtentX" value="19844"> <param name="_ExtentY" value="13229"> <param name="_Version" value="65536"> <param name="SnapshotPath" value="TempInformes/<%=strSnapFile%>"> <param name="Zoom" value="0"> <param name="AllowContextMenu" value="-1"> <param name="ShowNavigationButtons" value="-1"> </object> en palabras suena facil pero yo lo he hecho luis ruiz | |