Clique abaixo para nos ajudar
Login

Esqueci minha senha

Estamos no Facebook
Buscar
 
 

Resultados por:
 


Rechercher Busca avançada

Quem está conectado
17 usuários online :: 1 usuário cadastrado, Nenhum Invisível e 16 Visitantes :: 2 Motores de busca

Douglas Pascini

[ Ver toda a lista ]


O recorde de usuários online foi de 468 em 1/3/2012, 10:43
Últimos assuntos
» Conexão Sql Server
Hoje à(s) 12:18 por Douglas Pascini

» como fazer essa imagem clicavel
Ontem à(s) 13:56 por flavio dos reis

» USAR REPORT FORM
20/1/2017, 15:00 por ImRicoh

» Impressora Ticket
20/1/2017, 08:25 por ImRicoh

» Visite meu canal no Youtube
20/1/2017, 00:45 por ImRicoh

» Protocolo de comunicação porta serial
19/1/2017, 16:48 por rodiney

» Bloquear edição do ListBox
17/1/2017, 23:38 por Dipaula

» Ajuda em Script VBS
16/1/2017, 11:22 por carlosdantasf

» automação do mozilla e chrome
15/1/2017, 12:16 por Handerson Mildroz

» Aplicação Android algoritmos de aprendizagem pseudocódigo
4/1/2017, 01:09 por diegoveloper

» COMO ESTÃO DESENVOLVENDO EM WEB?
3/1/2017, 10:21 por felipe.palucoski

»  Um For não enxerga outro no DataGrid! (VIsual Basic)
2/1/2017, 12:44 por Ana Waldila

» C# criar checkBox Transparente
28/12/2016, 12:26 por flavio dos reis

» Menu lateral exemplo em VFP
28/12/2016, 11:55 por mxavier

» dll pertocheck
23/12/2016, 13:47 por FERNANDOMATRELLA

» Rota de um arquivo
23/12/2016, 09:01 por Julio

» BANIMENTO DE USUARIO
22/12/2016, 12:48 por Marcos Guedes

» USAR WEBSERVICE NO VFP9
20/12/2016, 18:33 por FAF

» CALCULO
19/12/2016, 18:48 por David Valerio

» Erro programa compartilhado em rede
16/12/2016, 11:45 por FERNANDOMATRELLA

Conexão Sql Server

23/1/2017, 12:18 por Douglas Pascini

Estou mudando meu servidor, para uma máquina remota. Até ai perfeito, o problema acontece que …

Comentários: 0

USAR REPORT FORM

30/12/2016, 09:06 por AJC

Pessoal bom dia,
Estou com um grande problema, já pesquisei muita coisa sobre report form, mas o …

Comentários: 3

Impressora Ticket

15/11/2016, 09:20 por clima238

Bom dia,
Por favor alguém me explique porque o código abaixo imprime no ecrã em vez do printer: …

Comentários: 2

Visite meu canal no Youtube

20/1/2017, 00:45 por ImRicoh

VFP Unlimited


Comentários: 0

Bloquear edição do ListBox

17/6/2010, 15:13 por Julio

Pessoal

Boa Tarde!

Tnho uma listbox apenas para exibir o resultado.
Preciso bloquear a listbox …

Comentários: 17

Estatísticas
Temos 6992 usuários registrados
O último usuário registrado atende pelo nome de BrenoTayne

Os nossos membros postaram um total de 11 mensagens em 5 assuntos

Ajuda para pegar rotina de vb6 e transforma-la em vfp9

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

Resolvido Ajuda para pegar rotina de vb6 e transforma-la em vfp9

Mensagem por amaury em 26/10/2011, 11:31

Boa tarde, pessoal eu tenho aqui um projeto em vb6 o qual só uma parte me interessa buscar o arquivo pdf da nota fiscal automaticamente link para o projeto [Você precisa estar registrado e conectado para ver este link.]

A parte que me interessa fazer a adaptação para o vfp9 é o frm teste gerar nota pdf, preciso de ajuda em transform o que esta em vb6 para o visual fox 9.
alguem se habilita a dar uma mão.

Abraços

Amaury

amaury
Começando a Participar
Começando a Participar


Voltar ao Topo Ir em baixo

Resolvido Re: Ajuda para pegar rotina de vb6 e transforma-la em vfp9

Mensagem por amaury em 26/10/2011, 14:17

ninguem pode ajudar ou falar alguma coisa ?

amaury
Começando a Participar
Começando a Participar


Voltar ao Topo Ir em baixo

Resolvido Re: Ajuda para pegar rotina de vb6 e transforma-la em vfp9

Mensagem por halisson em 26/10/2011, 15:19

-
[Você precisa estar registrado e conectado para ver este link.] escreveu:ninguem pode ajudar ou falar alguma coisa ?

Amaury, favor prestar mais atenção ao:
"[Você precisa estar registrado e conectado para ver este link.]".

Você além de "duplicar" o tópico ( ver o seu outro [Você precisa estar registrado e conectado para ver este link.] ), você está cometendo "FLOOD" respondendo o tópico antes das 24 horas.

Todos os que participam ativamente do fórum nem sempre conseguem
ajudar dentro de um curto espaço de tempo, seja por ocupação profissional,
seja por falta de conhecimento específico sobre o assunto.

Mas não se sinta desanimado. Pode ser que algum membro ativo ainda
responda ao seu tópico. Wink

Desculpe essa minha moderação.

Abraço.
-

halisson
Participante Regular
Participante Regular


Voltar ao Topo Ir em baixo

Resolvido Re: Ajuda para pegar rotina de vb6 e transforma-la em vfp9

Mensagem por amaury em 26/10/2011, 16:58

ok, eu é que peço desculpas pelo acontecido

amaury
Começando a Participar
Começando a Participar


Voltar ao Topo Ir em baixo

Resolvido Re: Ajuda para pegar rotina de vb6 e transforma-la em vfp9

Mensagem por m@r<3|o em 26/10/2011, 17:28

Amaury , voce comecou a converter ?

O que tem de referencia la ,
vi que no fox tem tb ... em classes

Ta meio estranho o entendimento do formulário em vb
ele esta conectando ? parece que nao conectava ai deixei queito

Meu primeiro teste nele , não consegui ver nada funcionar

m@r<3|o
Participante Assíduo
Participante Assíduo


Voltar ao Topo Ir em baixo

Resolvido Re: Ajuda para pegar rotina de vb6 e transforma-la em vfp9

Mensagem por amaury em 26/10/2011, 18:41

Amigo obrigado pela resposta, ele esta conectando sim, eu só queria saber como consumir este webservice, na questão do gerar o pdf, ou seja esta rotina busca la o arquivo pdf da nota fiscal, não tenho nenhuma ideia de como fazer isto como declarar,como conectar.

'----------------------------------------------------------------------------------------
'Método que gera o PDF da nota do WebService da VARITUS
'----------------------------------------------------------------------------------------
Private Sub cmdTesteGerarPDF_Click()
On Error GoTo erroWebService
Dim bytesDoPDF() As Byte
bytesDoPDF = webservice.replyInvoiceBytes(txtNumeroNotaPDF.Text, txtSerieNotaPDF.Text, txtDataPDF.Text, txtCNPJPDF.Text)

Open txtCaminhoPDF.Text For Binary As #1
Put #1, , bytesDoPDF()
Close #1
MsgBox "Gravado com sucesso"
Exit Sub
erroWebService:
MsgBox "Problemas com o web service, o seguinte erro foi reportado: " + Err.Description
End Sub

amaury
Começando a Participar
Começando a Participar


Voltar ao Topo Ir em baixo

Resolvido Re: Ajuda para pegar rotina de vb6 e transforma-la em vfp9

Mensagem por m@r<3|o em 28/10/2011, 11:11

Código:
Local bytesDoPDF() As Byte
bytesDoPDF = webservice.replyInvoiceBytes;    (this.parent.txtNumeroNotaPDF.value, ;
this.parent.txtSerieNotaPDF.value, ;
this.parent.txtDataPDF.value,;
this.parent.txtCNPJPDF.value)

aa = this.parent. txtCaminhoPDF.value
#DEFINE arquivo "&aa"

LOCAL learquivo AS STRING
LOCAL grava AS STRING
LOCAL setS
         
setS = SET("Safety")
SET SAFETY OFF
         
m.learquivo = ALLTRIM(FILETOSTR(arquivo))
m.grava = ??????????

SET SAFETY &setS
=messagebox('Gravado com sucesso')
release thisform


m@r<3|o
Participante Assíduo
Participante Assíduo


Voltar ao Topo Ir em baixo

Resolvido Re: Ajuda para pegar rotina de vb6 e transforma-la em vfp9

Mensagem por amaury em 29/10/2011, 11:37

Bom dia grande amigo, obrigado pelo retorno, ja deu uma clareada, mas como nunca usei isto será que voce poderia me ajudar nos passos abaixo
1) Como declarar o webservice
2) Como conectar e saber se a conexao foi ok ou não
3) se conexao foi ok eu vou preencher os dados dos respectivos :
this.parent.txtNumeroNotaPDF.value,this.parent.txtSerieNotaPDF.value,this.parent.txtDataPDF.value, this.parent.txtCNPJPDF.value) via comandos do vfp
4) e finalmente verificar se o arquivo foi gravado.

Agradeço muito vosso retorno e sua ajuda

Abraços

Amaury



[Você precisa estar registrado e conectado para ver este link.] escreveu:
Código:
Local bytesDoPDF() As Byte
bytesDoPDF = webservice.replyInvoiceBytes;    (this.parent.txtNumeroNotaPDF.value, ;
this.parent.txtSerieNotaPDF.value, ;
this.parent.txtDataPDF.value,;
this.parent.txtCNPJPDF.value)

aa = this.parent. txtCaminhoPDF.value
#DEFINE arquivo "&aa"

LOCAL learquivo AS STRING
LOCAL grava AS STRING
LOCAL setS
         
setS = SET("Safety")
SET SAFETY OFF
         
m.learquivo = ALLTRIM(FILETOSTR(arquivo))
m.grava = ??????????

SET SAFETY &setS
=messagebox('Gravado com sucesso')
release thisform


amaury
Começando a Participar
Começando a Participar


Voltar ao Topo Ir em baixo

Resolvido Re: Ajuda para pegar rotina de vb6 e transforma-la em vfp9

Mensagem por m@r<3|o em 30/10/2011, 13:11

O seu WDSL já está publicado ?

m@r<3|o
Participante Assíduo
Participante Assíduo


Voltar ao Topo Ir em baixo

Resolvido Re: Ajuda para pegar rotina de vb6 e transforma-la em vfp9

Mensagem por amaury em 30/10/2011, 19:25

Boa noite, gostaria de avisa que ja consegui resolver, obrigado a todos !

Amaury

amaury
Começando a Participar
Começando a Participar


Voltar ao Topo Ir em baixo

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo


 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum