VALIDARI INSCR ESTADUAL C/ DLLINSCE32.DLL

RIQUINHORICO07 22/04/2010 19:46:00
#339989
Estou tentando a dias mas não consigo.... setá que alguém sabe como fazer a integração da dll DLLINSCE32.DLL disponivel no site SINTEGRA http://www.sintegra.gov.br/ para validar a Inscrição Estadual ref ao estado selecionado ???
TECLA 23/04/2010 16:07:59
#340063 Resposta escolhida
1. Copie a DLL para a SYSTEM32 (não precisa registrá-la)
2. Copie o código abaixo em um FORM com 2 TEXTBOX e 1 COMMAND

Option Explicit
Private Declare Function ConsisteInscricaoEstadual Lib [Ô]DllInscE32[Ô] (ByVal Insc As String, ByVal UF As String) As Integer

Function Consiste(Insc As String, UF As String) As Integer
  Consiste = ConsisteInscricaoEstadual(Insc, UF)
End Function

Private Sub Command1_Click()
If Consiste(Text1, Text2) = 0 Then
    MsgBox [Ô]Válido![Ô], vbInformation, [Ô]Validar IE[Ô]
Else
    MsgBox [Ô]Inválido![Ô], vbExclamation, [Ô]Validar IE[Ô]
End If
End Sub
RIQUINHORICO07 24/04/2010 19:47:11
#340140
muito obrigadu TECLA !!!! Cara... uma coisa tão fácil e eu tava complicando.... impressionante como vc resolve todos os problemas dos colegas!!! tu é fera mesmu !!! VLW !!!
Tópico encerrado , respostas não são mais permitidas
Voltar