Jump to content
Fivewin Brasil

ref clipboad


syspel

Recommended Posts

ola pessoal bom dia

alguem sabe como colocar no site da receita federal no simples nacional

o cnpj da empresa e o cpf do responsavel

quando entrar la no site ja fica o cnpj e o cpf

eu teste setclipboad(1,"cnpj"),setclipboad(2,"cpf")

nao funciona corretamente,se tiver sujeira na memoria e pega a sujeira

ja agradencendo a todos

obrigado

carlos

fwh1412 xharbour 123 dbf xdev cdx

Link to comment
Share on other sites

Desculpe Carlos, não que eu tenha passado por isso e saiba como lhe ajudar, mas creio que falta algumas informações na tua dúvida...

Poderia ser um pouco mais minucioso na explanação do seu problema?!?! Creio que ajudaria muito para que os colegas possam dar algumas dicas.

Vi que você precisa ler o CNPJ e o CPF, mas de onde você precisa ler? Onde estão estes dados? Se você esta escaneando, qual ferramenta você usa para isso?

Link to comment
Share on other sites

Cara, tu já experimentou trocar a sequencia dos dados pra ver se ele lê também?

Dá uma olhada nos links do Kapiaba, acho que alguma coisa ai pode lhe ajudar!

Pelo que vi que a função SetClipboardData() retorna se o valor da memória pode ser trocado.

Você ta tratando esse retorno?

Att.

Everton

Link to comment
Share on other sites

Amiguinhos,

O que o SYSPEL está tentando fazer é o que geralmente fazemos quando queremos consultar nossas notas fiscais eletrônicas passando a chave diretamente para o formulário.

Só que o que ele deseja é um tanto avançado e não simples.

Provavelmente usando a classe que manipula URLs seria possível fazer este enxerto diretamente nos campos do formulário.

ctl00$ContentPlaceHolder$txtCNPJ

ctl00$ContentPlaceHolder$txtCPFResponsavel

ctl00$ContentPlaceHolder$txtCodigoAcesso

O Kapiaba postou um exemplo recentemente que manipulava uma variável parecida para inserir um dado usando TOleAuto ou ActiveX.

Link to comment
Share on other sites


#Include "FiveWin.Ch"

FUNCTION RECEITAFEDE() // KKKKK

LOCAL oDlg, oActiveX, oChildWnd, cCNPJ

cCNPJ := "48209381000140"

DEFINE WINDOW oChildWnd FROM 0,0 TO 600,800 PIXEL TITLE "Consulta Receita Federal"

oActiveX = TActiveX():New( oChildWnd, "Shell.Explorer.2" )

oActivex:Silent := .T. // Para Evitar: Erro de Script na Pagina.

oActivex:SetFocus()

oChildWnd:oClient = oActiveX

oActiveX:Do( "Navigate2", "http://www8.receita.fazenda.gov.br/SimplesNacional/Aplicacoes/ATBHE/ConsultaOptantes.app/ConsultarOpcao.aspx" )

ACTIVATE WINDOW oChildWnd CENTERED

RETURN NIL


Link to comment
Share on other sites

  • 2 weeks later...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Loading...
×
×
  • Create New...