Jump to content
Fivewin Brasil

OutLook no Windows Seven


kapiaba

Recommended Posts

Buenas Friends,

És posible usar el OutLook Express Para enviar email no Windows Seven?

Se sim, como hacer? Pois, preciso enviar o Email do XML da NF-e e não sei como fazer.

Abrazos.

João Santos - São Paulo.

kmt_karinha@pop.com.br

joao@pleno.com.br

Fone: (11) 3106-2832 / 8243-5632

FWH 2.7 - xHARBOUR WorkShop.Exe

dentinho.jpg?rnd=0.830315402649066

Link to comment
Share on other sites

Buenas Friends,

És posible usar el OutLook Express Para enviar email no Windows Seven?

Se sim, como hacer? Pois, preciso enviar o Email do XML da NF-e e não sei como fazer.

Abrazos.

João Santos - São Paulo.

kmt_karinha@pop.com.br

joao@pleno.com.br

Fone: (11) 3106-2832 / 8243-5632

FWH 2.7 - xHARBOUR WorkShop.Exe

dentinho.jpg?rnd=0.830315402649066

Link to comment
Share on other sites

Joao...

Pq ultilizar um cliente de email de Terceiros ?

Pq nao ultilizar o envio automatico do seu sistema, q funfa 100% e muito mais rapido o envio q qq outro Sistema de Envio de email's ?

Eu uso aki...e alem de enviar o Xml para o Cliente, tb ja gero o PDF e mando junto.

Eh uma mamata cara.

@braços Ale

aleseribeli@hotmail.com

Andradina/SP

"Não Existe Perguntas Idiotas! Existe Idiotas que não Fazem Perguntas!"id=red>

Link to comment
Share on other sites

citação:

Joao...

Pq ultilizar um cliente de email de Terceiros ?

Pq nao ultilizar o envio automatico do seu sistema, q funfa 100% e muito mais rapido o envio q qq outro Sistema de Envio de email's ?

Eu uso aki...e alem de enviar o Xml para o Cliente, tb ja gero o PDF e mando junto.

Eh uma mamata cara.

@braços Ale

aleseribeli@hotmail.com

Andradina/SP

"Não Existe Perguntas Idiotas! Existe Idiotas que não Fazem Perguntas!"id=red>


id=quote>id=quote>

Dá para o senhor Dà UMA GERAL para nosotros porfa?

Abraços.

João Santos - São Paulo.

kmt_karinha@pop.com.br

joao@pleno.com.br

Fone: (11) 3106-2832 / 8243-5632

FWH 2.7 - xHARBOUR WorkShop.Exe

dentinho.jpg?rnd=0.830315402649066

Link to comment
Share on other sites

Joao o Trem eh simples...basta usar aquela rotina de envio de email, q eu postei aki....e vc usou ela...lembra q testamos?!

Qdo sua NF for autoriza para impressao, basta pegar o xml e Add em anexo na Rotina, se o cliente ja tiver o email cadastrado, blz...se nao...vc abre um Dialog para o usuario digitar o destinatario.

Eh logico, eh simples...mas..vc tera o trabalho de fazer o tratamento no seu sistema ==>

- Cria um BD para ter um provedor cadastrado


*****--- PROVEDOR DE EMAIL - PROVMAIL ---***************************************

aEstru:={}

aadd( aEstru, { 'Prov_Pem', 'c', 20, 0 } ) //--> 01 - Nome Provedor.

aadd( aEstru, { 'Pop3_Pem', 'c', 50, 0 } ) //--> 02 - Pop3.

aadd( aEstru, { 'Smtp_Pem', 'c', 50, 0 } ) //--> 03 - Smtp.

aadd( aEstru, { 'Aute_Pem', 'l', 01, 0 } ) //--> 04 - Autenticação de Segurança.

aadd( aEstru, { 'PrtP_Pem', 'n', 04, 0 } ) //--> 05 - Porta Pop3.

aadd( aEstru, { 'PrtS_Pem', 'n', 04, 0 } ) //--> 06 - Porta Smtp.

aadd( aEstru, { 'Ssl__Pem', 'l', 01, 0 } ) //--> 07 - Conexão Segura SSL.

aadd( aEstru, { 'Flag_Pem', 'c', 01, 0 } ) //--> 08 - Flag. (P)adrao

id=code>id=code>

- No meu sistema o usuario ja tem um email fornecido pela empresa, entao, qdo vou enviar, ja vejo quem eh o usuario e pega o email dele como remetente, abro um Dlg ja com o remtente carregado um Get para ele digitar a senha do email, e carrego o email do destinatario se ja estiver cadastrado, senao libero o Get para ele entrar com o email do cliente( logico, mando uma copia para o superior do usuario, para evitar rolo do usuario).

- Caso tenha algum problema de envio, eu marco a NF como nao enviada para o Cliente...ai temos outro lugar..onde ele pode selecionar a NF, novamente para enviar.

+- isso aki:


*****--- GET'S ---**************************************************************

//--> Remetente

REDEFINE GET oGet[01] VAR cUser ID 21 OF oDlg PICTURE "@" UpDate

//--> Senha eMail Remetente

REDEFINE GET oGet[02] VAR cPass ID 22 OF oDlg PICTURE "@" UpDate

oGet[02]:lPassWord := .T.

//--> Destinatario

REDEFINE GET oGet[03] VAR cReme ID 23 OF oDlg PICTURE "@" UpDate

//--> Confirma o Envio

REDEFINE BUTTONBMP oBtn[1] ;

ID 701 OF oDlg ;

ACTION ( lEnvia := .T., lSair := .T., oDlg:End() ) ;

ACTIVATE DIALOG oDlg CENTERED VALID lSair

IF lEnvia

cSubject := " - Arquivos XML"

cMsg := "Segue em Anexo os Arquivos XML!" +CRLF+ ;

"Qualquer Duvida entre em contato!"

cAnexo := cXml_NFe

oWait := MsgAguarde( "Processando Dados..." )

lRet := sb_SendMail(cServ,nPort,lAut,lSSL,AllTrim(cUser),AllTrim(cPass),AllTrim(cReme),cSubject,cMsg,cAnexo)

oWait:End()

ENDIF

********************************************************************************

STATIC FUNCTION sb_SendMail(cServ,nPort,lAut,lSSL,cUser,cPass,cReme,cSubject,cMsg,cAnexo)

********************************************************************************

LOCAL cFrom, cTo

LOCAL lRet := .F.

LOCAL oCfg, oMsg

cFrom := cUser

cTo := cReme

*****--- ENVIO DE EMAIL ---*****************************************************

//--> CONFIGURAÇÕES DO PROVEDOR

oCfg := CREATEOBJECT( "CDO.Configuration" )

WITH OBJECT oCfg:Fields

:Item( "http://schemas.microsoft.com/cdo/configuration/smtpserver" ):Value := cServ

:Item( "http://schemas.microsoft.com/cdo/configuration/smtpserverport" ):Value := nPort

:Item( "http://schemas.microsoft.com/cdo/configuration/sendusing" ):Value := 2

:Item( "http://schemas.microsoft.com/cdo/configuration/smtpauthenticate" ):Value := lAut

:Item( "http://schemas.microsoft.com/cdo/configuration/smtpusessl" ):Value := lSSL

:Item( "http://schemas.microsoft.com/cdo/configuration/sendusername" ):Value := cUser

:Item( "http://schemas.microsoft.com/cdo/configuration/sendpassword" ):Value := cPass

:Update()

END WITH

//--> FIM DAS CONFIGURAÇOES.

//--> MENSAGEM

TRY

oMsg := CREATEOBJECT ( "CDO.Message" )

WITH OBJECT oMsg

:Configuration := oCfg

:From := cFrom

:To := cTo

:Subject := cSubject

:TextBody := cMsg

IF !Empty(cAttach)

:AddAttachment(cAnexo)

ENDIF

:Send()

END WITH

lRet := .T.

CATCH oError

MsgInfo( "Não Foi possível Enviar o e-Mail!" +CRLF+ ;

"Erro: " + Transform(oError:GenCode, nil) + ";" +CRLF+ ;

"SubC: " + Transform(oError:SubCode, nil) + ";" +CRLF+ ;

"OSCode: " + Transform(oError:OsCode, nil) + ";" +CRLF+ ;

"SubSystem: " + Transform(oError:SubSystem, nil) + ";" +CRLF+ ;

"Mensagem: " + oError:Description, "..:: Atenção ::.." )

lRet := .F.

END

//--> FIM DA MENSAGEM

oCfg := nil

oMsg := nil

RETURN lRet

id=code>id=code>

blz...

@braços Ale

aleseribeli@hotmail.com

Andradina/SP

"Não Existe Perguntas Idiotas! Existe Idiotas que não Fazem Perguntas!"id=red>

Link to comment
Share on other sites

Não sei o que acontece com email no fivewin.

É como dizem "uma pedra no sapato".

Para uns funciona, para outros não.

No meu caso já tentei de tudo, inclusive essa rotina que o Ale postou, testei na primeira vez que ele apresentou, mas não funcionou.

João, uso um programa que posso lhe garantir 100% que funciona.

É o Blat, um pequeno programa free, que voce chama de dentro de five, discreto, não é percebido e roda muito bem.

Várias opções, como anexo, html, etc.

Caso não funcione no five, é uma ótima opção.

logo.gif

Link to comment
Share on other sites

citação:

Não sei o que acontece com email no fivewin.

É como dizem "uma pedra no sapato".

Para uns funciona, para outros não.

No meu caso já tentei de tudo, inclusive essa rotina que o Ale postou, testei na primeira vez que ele apresentou, mas não funcionou.

João, uso um programa que posso lhe garantir 100% que funciona.

É o Blat, um pequeno programa free, que voce chama de dentro de five, discreto, não é percebido e roda muito bem.

Várias opções, como anexo, html, etc.

Caso não funcione no five, é uma ótima opção.

logo.gif


id=quote>id=quote>

Blz Ze...

Cara essa rotina de email funfa 200%...sei q alguns nao conseguiram usa-la...mas..o problema...nao era as ferramentas..nem a rotina..vefifique se seu FireWall nao esta bloqueando ela....e em muitos casos o AntiVirus...tb bloqueia...no caso mais recente o Marcelo Marca..apanhou dela..ate ver q era o Avast q estava bloqueando o envio.

qq coisa grita nois.

@braços Ale

aleseribeli@hotmail.com

Andradina/SP

"Não Existe Perguntas Idiotas! Existe Idiotas que não Fazem Perguntas!"id=red>

Editado por - Ale SB on 27/08/2010 08:27:15

Link to comment
Share on other sites

citação:

Não sei o que acontece com email no fivewin.

É como dizem "uma pedra no sapato".

Para uns funciona, para outros não.

No meu caso já tentei de tudo, inclusive essa rotina que o Ale postou, testei na primeira vez que ele apresentou, mas não funcionou.

João, uso um programa que posso lhe garantir 100% que funciona.

É o Blat, um pequeno programa free, que voce chama de dentro de five, discreto, não é percebido e roda muito bem.

Várias opções, como anexo, html, etc.

Caso não funcione no five, é uma ótima opção.

logo.gif


id=quote>id=quote>

Bom dia a todos

Ola Jose Carlos

Esta semana estou tratando sobre este assunto tbem e vou te passar oq. impedia a transmissão com esta rotina

Em algumas maquinhas funcionava e em outras não

o problema que tivemos foi q. as maquinas que tinham antivirus instalado como o Avast nao enviavam o email

Avast , nod32 e alguns outros

independente do sistema operacional isso acontecia

Simplismente configuramos os antvirus e tudo passou a funcionar perfeitamente

Espero q. ajude

Marcelo Ferro

Petrópolis - Rj

Fwh9.01/xHarbour 1.1.0 Simplex /SqlLib /xMate/WS e Pelles

marca.jpg

Link to comment
Share on other sites

citação:

citação:

Não sei o que acontece com email no fivewin.

É como dizem "uma pedra no sapato".

Para uns funciona, para outros não.

No meu caso já tentei de tudo, inclusive essa rotina que o Ale postou, testei na primeira vez que ele apresentou, mas não funcionou.

João, uso um programa que posso lhe garantir 100% que funciona.

É o Blat, um pequeno programa free, que voce chama de dentro de five, discreto, não é percebido e roda muito bem.

Várias opções, como anexo, html, etc.

Caso não funcione no five, é uma ótima opção.

logo.gif


id=quote>id=quote>

Bom dia a todos

Ola Jose Carlos

Esta semana estou tratando sobre este assunto tbem e vou te passar oq. impedia a transmissão com esta rotina

Em algumas maquinhas funcionava e em outras não

o problema que tivemos foi q. as maquinas que tinham antivirus instalado como o Avast nao enviavam o email

Avast , nod32 e alguns outros

independente do sistema operacional isso acontecia

Simplismente configuramos os antvirus e tudo passou a funcionar perfeitamente

Espero q. ajude

Marcelo Ferro

Petrópolis - Rj

Fwh9.01/xHarbour 1.1.0 Simplex /SqlLib /xMate/WS e Pelles

marca.jpg


id=quote>id=quote>

A MAIORIA ESMAGADORA DA CLIENTELA DA EMPRESA,(não sei quem foi que indicou, kkkkkkk), USA O AVAST.EXE.

Ai, Aferrou-se.

Eu preciso enviar pelo WINDOWS SEVEN, como era com OutLook Express, facin, facin... Todo mundo adooorrraaaa... kkkk

Abraços.

João Santos - São Paulo.

kmt_karinha@pop.com.br

joao@pleno.com.br

Fone: (11) 3106-2832 / 8243-5632

FWH 2.7 - xHARBOUR WorkShop.Exe

dentinho.jpg?rnd=0.830315402649066

Link to comment
Share on other sites

João tem um cara que tem a solução para isto.

William Henry Gates III, falando com ele, com certeza voce vai conseguir que o OutLook Express seja novamente incorporado ao Windows.

Fala sério, vai gostar de coisa velha assim landa na .....

RodapeEmail.JPG

"Não seja um clicador, tone-se um programador." Eu estou tentando.

Link to comment
Share on other sites

Ale, Marcelo

Aí é que está o problema

Meu sistema roda em não sei quantas máquinas e não dá para eu ficar atento ao anti-virus que cada uma roda.

Acredito sim, que essa rotina deve rodar, mas como me deu esse problema e eu precisava rodar, na época optei pelo Blat e roda até hoje com sucesso em tudo quanto é máquina que instalo o sistema.

Pois é Ale, diferente do nosso tricolor, time que está ganhando é preferível não mexer, hehe.

logo.gif

Link to comment
Share on other sites

Pois eh Ze...nem me fale de Fubetol...vamo..troca o rumo dessa prosa..ehheh

Eu estava pensando aki, o Anti-Virus bloquea qq Sistema de Cliente de eMail, mas, acredito q deve haver uma configuraçao nestes sistemas q altera este Bloqueio do Anti-Virus...

...Entao creio eu, q deve haver a possibilidade da gente tentar descobrir como instalar nosso sistema de Envio e tb desbloquear o anti-virus...

Vou dar uma estudada nisso, deve haver alguma soluçao..qq coisa..reporto ai pro 6.

@braços Ale

aleseribeli@hotmail.com

Andradina/SP

"Hoje tô igual televisão velha; Eh sem Controle!...Quem tem Limite eh Município!"id=red>

Editado por - Ale SB on 27/08/2010 15:20:40

Link to comment
Share on other sites

citação:

João tem um cara que tem a solução para isto.

William Henry Gates III, falando com ele, com certeza voce vai conseguir que o OutLook Express seja novamente incorporado ao Windows.

Fala sério, vai gostar de coisa velha assim landa na .....

RodapeEmail.JPG

"Não seja um clicador, tone-se um programador." Eu estou tentando.


id=quote>id=quote>

O chatice, eu já falei com ele, e ele me mandou tomar no... kkkkkkkkkkkkkkkkkkkkkkk

João Santos - São Paulo.

kmt_karinha@pop.com.br

joao@pleno.com.br

Fone: (11) 3106-2832 / 8243-5632

FWH 2.7 - xHARBOUR WorkShop.Exe

dentinho.jpg?rnd=0.830315402649066

Link to comment
Share on other sites

João,

Eu copiei os arquivos da pasta "c:\Arquivos de Programas\Windows Mail" de uma máquina com Windows Vista para a mesma pasta numa máquina com Windows 7 e o Windows Mail passou a funcionar (equivalente ao Outlook express).

Oscar Ribeiroid=size4>

OASyS Informáticaid=blue>id=size4>

Fwh2.4+xHb0.99.60+BCC551+WorkShopid=size1>

Link to comment
Share on other sites

citação:

João,

Eu copiei os arquivos da pasta "c:\Arquivos de Programas\Windows Mail" de uma máquina com Windows Vista para a mesma pasta numa máquina com Windows 7 e o Windows Mail passou a funcionar (equivalente ao Outlook express).

Oscar Ribeiroid=size4>

OASyS Informáticaid=blue>id=size4>

Fwh2.4+xHb0.99.60+BCC551+WorkShopid=size1>


id=quote>id=quote>

Carissimo, voce consegue em os arquivos;xml da NFE?

João Santos - São Paulo.

kmt_karinha@pop.com.br

joao@pleno.com.br

Fone: (11) 3106-2832 / 8243-5632

FWH 2.7 - xHARBOUR WorkShop.Exe

dentinho.jpg?rnd=0.830315402649066

Link to comment
Share on other sites

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...