Search  
Thursday, May 24, 2012 ..:: Forum ::.. Register  Login
 Forum Minimize
Pentru a putea posta mesaje trebuie să vă înregistraţi.
Notă: Mesajele cu conţinut jignitor sau ilegal (inclusiv cereri de soft piratat) nu sunt acceptate şi vor fi şterse imediat .

Pentru a primi raspunsuri rapide si corecte, scrieti in mesaj ce intentionati sa faceti, ce mesaj de eroare primiti, in ce context si in urma caror actiuni. De asemenea, mentionati versiunea de FoxPro in care lucrati!
Dacă nu specificați versiunea, se consideră VFP 9.0 SP2.
SearchForum Home
  Visual FoxPro  Office Automation  Cum elimin mesa...
 Cum elimin mesajul de avertizare din Outlook Express
 
 1/8/2007 9:46:30 PM
User is offlineRomeo
527 posts
1st


Cum elimin mesajul de avertizare din Outlook Express
 (N/A)

Am testat o rutina fox care trimite un mail prin Outlook Express ( luata de pe forum ):

 
Din pacate la fiecare mail trimis apare un mesaj de confirmare:
 
! A program is attempting to send the following e-mail message on your behalf:
 
 
 
Would you like to send the message ?
 
Send        Do Not Send
 
 
Cum fac sa elimin acest mesaj. Daca trimit simultan 100 de mailuri, 100 de confirmari fac programul inacceptabil.
Slava Tatalui si Fiului si Sfantului Duh si acum si pururea si-n vecii vecilor. Amin.
 1/8/2007 10:06:27 PM
User is offlineRomeo
527 posts
1st


Am rezolvat
 (N/A)

Tools -> Options -> Security

debifez:  Warn me when other applications try to send mail as me.

Slava Tatalui si Fiului si Sfantului Duh si acum si pururea si-n vecii vecilor. Amin.
 3/18/2008 12:30:53 PM
User is offlineralucea82
8 posts


Re: Am rezolvat
 (N/A)

Si daca totusi vreau sa imi fie dezactivata doar in cazul programelului meu?

Nu se poate face o rutina?

Multumesc
 3/22/2008 9:00:08 AM
User is offlineGrigore Dolghin
3590 posts
www.class-software.eu
1st






Re: Am rezolvat
 (Slovakia)
 ralucea82 wrote

Si daca totusi vreau sa imi fie dezactivata doar in cazul programelului meu?

Nu se poate face o rutina?

Multumesc



Nu, si nici n-ar trebui sa se poata, pentru ca ar fi o gaura de securitate majora. E relativ simplu sa faci un programel aparent folositor, care in background deschide outlook-ul si incepe sa trimita mail-uri cu advertising pentru pastila albastra la toata lumea din agenda Outlook...

Bifa aia trebuie sa necesite interventia utilizatorului. Asa e acum si asa ar trebui sa ramana.
Grigore Dolghin
Visual FoxPro MVP 2006 - 2010
Class Software
My blog
 3/25/2008 7:33:26 PM
User is offlineralucea82
8 posts


Re: Am rezolvat
 (N/A)

Evident. Problema este ca trebuie sa trimit zilnic mailuri cu atachmenturi diferite in format dd-mm-yy.xls (dtoc(date())) la 50 de adrese - fixe. Mi-ar fi peste mana sa dau de 50 de ori yes. Am gasit un programel care da yes automat - nu am adaptat aceasta solutie ca mi se parea cam neortodox. Exista o alta solutie?
 3/26/2008 8:14:50 AM
User is offlineCostel
227 posts
www.adrisoft.ro
4th




Re: Am rezolvat
 (N/A)
 ralucea82 wrote

Exista o alta solutie?



Incearca solutia de mai jos. Cu un pic de efort cred ca o poti adapta necestatilor tale.


Local lcSchema, loConfig, loMsg
lcSchema = "http://schemas.microsoft.com/cdo/configuration/"

loConfig = CREATEOBJECT("CDO.Configuration")

WITH loConfig.FIELDS
    .ITEM(lcSchema + "smtpserverport") = 25 && SMTP Port
    .ITEM(lcSchema + "sendusing") = 2 && Send it using port
    .ITEM(lcSchema + "smtpserver") = "NumeServerMail.com" && host of smtp server
    .ITEM(lcSchema + "smtpauthenticate") = 1 && Authenticate
    .ITEM(lcSchema + "sendusername") = "NumeUser" && Username
    .ITEM(lcSchema + "sendpassword") = "123pass" && Password
    .UPDATE
ENDWITH

loMsg = CREATEOBJECT ("CDO.Message")
loMsg.Configuration = loConfig
WITH loMsg
    .FROM = "Sender@domeniu.ro"
    .TO = "CuiTrimit@DomeniuLui.ro"
    .Subject = "Hey Have You Tried VFP6 Email?"
    .TextBody = "This is an easy way to create an email"
*!*        .CreateMHTMLBody("http://www.cnn.com")
    .HTMLBody = [< b >< P >< FONT COLOR="#CC0000" >Hello In Color< /FONT >< /b >]
    .AddAttachment("C:\Aplicatii\SendMail\Blat3_1.zip")
    .AddAttachment("C:\Aplicatii\SendMail\BlatTips1.htm")
ENDWITH

loMsg.SEND()

loConfig = NULL
loMsg = NULL

Nu munci atit de mult incit sa nu-ti mai ramina timp ca sa cistigi bani. (proverb evreiesc)
 3/26/2008 11:57:38 AM
User is offlineralucea82
8 posts


Re: Am rezolvat
 (N/A)
Da, multumesc. Am salvat adresele de mail intr-un dbf, la fel si caile fisierelor.
 Page 1 of 1
NextPreviousNo Rating
  Visual FoxPro  Office Automation  Cum elimin mesa...
Search  Forum Home         

 Google Ads Minimize
    

Copyright 2002-2010 Profox   Terms Of Use  Privacy Statement