Mensajes

Hola rammaldie2014,

No te preocupes, nadie nace sabiendo...
Al tema, en realidad todos los archivos son un proyecto de ejemplo, para que puedas compilarlo y probarlo.
En el rar hay un archivo dll "LibSunat.dll", esa es la dll que debes referenciar a tu proyecto y agregar el form donde usaras la consulta del RUC:
Imports LibSunat.
Si no haz agregado la referencia de la dll que te pase, problablemente la línea de Imports te marque un error.
Asi que no te olvides de agregar primero la referencia y luego el Imports.
Aqui te paso un código en el Evento Click de un Boton.

Código [Seleccionar] Expandir

  Dim myRuc As New Contribuyente(txtRUC.Text)
        If String.IsNullOrEmpty(myRuc.Error) Then
            Me.txtRazonSocial.Text = myRuc.GetInfo.RazonSocial
            Me.txtAntiguoRuc.Text = myRuc.GetInfo.AntiguoRuc
            Me.txtEstado.Text = myRuc.GetInfo.Estado
            Me.txtAgenteRetencion.Text = myRuc.GetInfo.EsAgenteRetencion
            Me.txtDireccion.Text = myRuc.GetInfo.Direccion
            Me.txtDependencia.Text = myRuc.GetInfo.Dependencia
            Me.txtTipoEmpresa.Text = myRuc.GetInfo.Tipo
            txtTelefono1.Focus()
        Else
            MsgBox(myRuc.Error, MsgBoxStyle.Critical, "Error")
            txtRUC.Focus()
            txtRUC.Clear()
        End If
    End Sub


Espero que hayas entendido y lo hayas aplicado a tu proyecto.

PD: es una pena que ::IT:: esté desaparecido, pero por si algún día aparece por aqui, queria agradecerle por compartir esta solución!!
Gracias por compartir!

Buenas.

rammaldie2014

si deseas te dejo un enlace para que puedas descargarlo en .vb, solo está agregado el de SUNAT.

https://drive.google.com/file/d/0B1gTDEe5URPfYTNWblpKY0NMbGc/edit?usp=sharing

en el rar. hay un archivo .txt con los pasos para referenciar la dll a tu proyecto

cualquier duda me avisas.