none
cambio de servidor base de datos RRS feed

  • Pregunta

  •  Dim parametros As New ParameterFields()
        Dim primerparametro As New ParameterField()
        Dim mydiscretevalue As New ParameterDiscreteValue()
    
        Private Sub Formulario()
            primerparametro.ParameterValueType = ParameterValueKind.NumberParameter
            primerparametro.ParameterFieldName = "@Num_Estudiante"
            mydiscretevalue.Value = Convert.ToString(txtnumestudiante.Text)
            primerparametro.CurrentValues.Add(mydiscretevalue)
            parametros.Add(primerparametro)
            CrystalReportViewer1.ParameterFieldInfo = parametros
            Dim report As New Reporte_Add_Drop_Cancelacion
            report.Refresh()
            report.SetDatabaseLogon("LAPTOP", "123456", "EFRAIN-PC\SERVER", "Base_Datos_Educacional")
            CrystalReportViewer1.ReportSource = report
        End Sub

    este es el codigo que utilize para cambiarme de servidor pero no me funciona
    viernes, 9 de septiembre de 2016 14:05