Dime el tipo de Database k estas trabajando para ver si te puedo ayudar
Salu2...
Salu2...
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúCitarNo veo que allas buscado muy bien...
en el form
Public m_Application As New CRAXDDRT.Application
Dim m_Report As CRAXDDRT.Report
Dim FileReport As String
FileReport = App.Path + "\REPORTES\ESTUDIANTE_DATOS.rpt" 'ruta del report
Set m_Report = m_Application.OpenReport(FileReport, 1)
m_Report.Database.Tables(1).SetLogOnInfo "DNSName", "Database", "usuario", "pssword"
SQL = "{ESTUDIANTE_PRINT.CampoFiltro} = '" & (DBCCodigo.Text) + "'"
'**********************************
Set SectD = Nothing
Set SectD = m_Report.Sections("PH") ' Aqui va el nombre corto de la sección donde va a salir la foto en el reporte (si vas a enviar una foto o imagen )
'**********************************
FileReport = FileReport
Set m_Report = m_Report
m_Report.RecordSelectionFormula = SQL
FormX.Show 'En este Formulario agregas este componente el CRViewer1 para visualizar el report
Private Sub Form_Resize()
On Error Resume Next
CRViewer1.Top = 0
CRViewer1.Left = 0
CRViewer1.Height = ScaleHeight
CRViewer1.Width = ScaleWidth
End Sub