Imports System.IO
Imports System.Net
Imports System.IO.Compression
Imports Extensiones

Partial Class Compras_ValidaCFDi
    Inherits System.Web.UI.Page

    Protected Sub BtnVerificar_Click(sender As Object, e As EventArgs) Handles BtnVerificar.Click
        Dim ObjCFDi As New ClsValidaCFDi
        ObjCFDi.Verificar(TxtFolioFiscal.Text, TxtEmisor.Text, TxtReceptor.Text)
        LtlRValido.Text = ObjCFDi.EsValida.ToString
        LtlEmisor.Text = ObjCFDi.Emisor
        LtlReceptor.Text = ObjCFDi.Receptor
        LtlFechaExp.Text = ObjCFDi.FechaEmision
        LtlFechaCert.Text = ObjCFDi.FechaCertificacion
        LtlPACCert.Text = ObjCFDi.RFCPAC
        LtlTotal.Text = ObjCFDi.Monto
        LtlEfecto.Text = ObjCFDi.Efecto
        LtlEstado.Text = ObjCFDi.Estado
        LtlRespuestaHTML.Text = ObjCFDi.ResponseHTML
        ObjCFDi.Dispose()
    End Sub
    
End Class