Gmail - slanje mejlova od strane "nesigurne" aplikacije (moje)

Gmail - slanje mejlova od strane "nesigurne" aplikacije (moje)

offline
  • Miroslav R. Maričić
  • diplomirani inženjer mašinstva, profesor
  • Pridružio: 06 Jun 2012
  • Poruke: 227
  • Gde živiš: Hajdučica, Banat, Srbija

Написао сам програм који из једног PDF фајла са платним листићима свих запослених у школи формира појединачне PDF фајлове, за сваког запосленог и шаље им на њихове имејл адресе. Отворио сам посебан налог у Gmail-у који служи само за то (ако дође инспектор рада да могу лако да му докажем да сваки запослени редовно добија исплатни листић Wink ).
Програм лепо ради код мене, па сам га поклонио мом пријатељу и колеги у суседној школи. И код њега је лепо радио, све док Gmail није одједном престао да шаље мејлове и почео да блокира слање истих. Након неуспелог слања, стигне му порука од Gmail-а да је блокирао слање мејла са несигурне апликације.
Отишао сам код њега, ушао у подешавања Gmail-а и дозволио/омогућио ону опцију да могу да се шаљу мејлови и са сумњивих/непоузданих апликација (та опција је код мене стално укључена).
Међутим, и након тога, Gmail и даље блокира слање мејлова! Значи, опција за дозволу слања са непоузданих апликација је укључена, а Gmail увек и даље блокира слање. И тако стално: Gmail блокира слање, ја одем до те опције и видим да је она омогућена. Не схватам зашто...
Да ли постоји нека опција у Gmail-у у којој бих могао да означим програме/апликације који су од поверења, тј. за које не желим да Gmail блокира? Или, да ли постоји неко друго решење?
Код мене и даље све ради префектно.

Део кода који шаље мејл:
//-------------------------------------------------------------------------------------------------
FUNCTION SaljiMejl( cPeriod, sm_to, sm_TextBody, sm_subject, sm_att, sm_confirm, cIme, cPrezime, cJmbg )
LOCAL loCfg, loMsg, cPath:=cProgStaza + "\Trezor\" + cPeriod, lPoslato:=.T.
LOCAL sm_cc:="", i:=0
LOCAL sm_bcc:=""
LOCAL sm_confirm_read:=IIF( sm_confirm=="1", .T., .F. )
LOCAL sm_Body:='<html><head><meta content="text/html; charset=utf-8" http-equiv="content-type"><title></title></head><body>'+;
sm_TextBody + '</body></html>'
LOCAL lSSL:=.T.
LOCAL sm_priority:=1
LOCAL cString:=cJmbg + LEFT( cPeriod, 4 ) + SUBSTR( cPeriod, 5, 2 ) + RIGHT( cPeriod, 1 ) // jmbg + godina + mesec + deo_plate

#xcommand TRY => BEGIN SEQUENCE WITH {|o| break(o)}
#xcommand CATCH [<!oErr!>] => RECOVER [USING <oErr>] <-oErr->
#xcommand FINALLY => ALWAYS

//Please note, when using the :AddAttachment method in your scripts you must use a fully qualified pathname as the argument to the method.
// Using just a file name or a relative path will produce the error The specified protocol is unknown
// By repeating the :AddAttachment method you can attach more than one file.
// sm_priority:=2 is for High; =1 for Normal; =0 for Low
// sm_confirm_read:=.T. is for return receipt

TRY

loCfg := CREATEOBJECT( "CDO.Configuration" )
WITH OBJECT loCfg:Fields
:Item( "http://schemas.microsoft.com/cdo/configuration/smtpserver" ) :Value := sm_servsmtp
:Item( "http://schemas.microsoft.com/cdo/configuration/smtpserverport" ) :Value := sm_portsmtp
:Item( "http://schemas.microsoft.com/cdo/configuration/sendusing" ) :Value := 2
:Item( "http://schemas.microsoft.com/cdo/configuration/smtpauthenticate" ):Value := .T.
:Item( "http://schemas.microsoft.com/cdo/configuration/smtpusessl" ) :Value := lSSL
:Item( "http://schemas.microsoft.com/cdo/configuration/sendusername" ) :Value := sm_userauth
:Item( "http://schemas.microsoft.com/cdo/configuration/sendpassword" ) :Value := sm_passauth
:Update()
END WITH

loMsg := CREATEOBJECT ( "CDO.Message" )

WITH OBJECT loMsg
:BodyPart:Charset := "utf-8"
:Configuration := loCfg
:From := sm_from
:To := sm_to
:Subject := sm_subject
:Bcc := sm_bcc
:Cc := sm_cc
:TextBody := sm_TextBody //plain text
:HTMLBody := sm_Body //html text
:HTMLBodyPart:Charset := "utf-8"
IF !EMPTY( sm_att )
:AddAttachment (sm_att)
END IF
WITH OBJECT loMsg:Fields
:Item("urn:schemas:httpmail:importance"):Value := sm_priority
:Item("urn:schemas:mailheader:X-Priority"):Value := sm_priority-1
IF sm_confirm_read
:Item("urn:schemas:mailheader:return-receipt-to"):Value := sm_from
:Item("urn:schemas:mailheader:disposition-notification-to"):Value := sm_from
ENDIF
:Update()
ENDWITH
:DSNOptions := 0
:Send()

// Upiši u bazu poslatih listića
2->( dbAPPEND() )
IF 2->( dbRLOCK() )
REPLACE ;
2->godina WITH LEFT( cPeriod, 4 ), ;
2->mesec WITH SUBSTR( cPeriod, 5, 2 ), ;
2->deo WITH RIGHT( cPeriod, 1 ), ;
2->ime WITH cIme, ;
2->prezime WITH cPrezime, ;
2->jmbg WITH cJmbg, ;
2->fajl WITH sm_att, ;
2->datum WITH DATE(), ;
2->vreme WITH TIME(), ;
2->status WITH "успешно"
END IF

ENDWITH

CATCH oError

lPoslato:=.F.
2->( dbAPPEND() )
IF 2->( dbRLOCK() )
REPLACE ;
2->godina WITH LEFT( cPeriod, 4 ), ;
2->mesec WITH SUBSTR( cPeriod, 5, 2 ), ;
2->deo WITH RIGHT( cPeriod, 1 ), ;
2->ime WITH cIme, ;
2->prezime WITH cPrezime, ;
2->jmbg WITH cJmbg, ;
2->fajl WITH sm_att, ;
2->datum WITH DATE(), ;
2->vreme WITH TIME(), ;
2->status WITH "НЕУСПЕШНО"
END IF

hwg_MsgStop ( "Имејл порука НИЈЕ послата"+CRLF+;
"Име: " + cIme + " " + cPrezime + CRLF+sm_to + CRLF + ;
"Error: "+TRANSFORM(oError:GenCode, NIL)+CRLF+;
"SubCode: "+TRANSFORM(oError:SubCode, NIL)+CRLF+;
"OSCode: "+TRANSFORM(oError:OsCode, NIL)+CRLF+;
"SubSystem: "+TRANSFORM(oError:SubSystem, NIL)+CRLF+;
"Description: "+oError:Description )
END

RETURN lPoslato
//--------------------------------------------------------------------------------------------------

Ако сам промашио тему, молим администратора да ми прогледа кроз прсте...
Хвала!



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
offline
  • Milan
  • Pridružio: 17 Dec 2007
  • Poruke: 14490
  • Gde živiš: Niš

Kako se tačno loguješ na taj gmail nalog sa kog šalješ email poruke? Koju lozinku koristiš? Onu koju uobičajeno koristiš za logovanje? Ako da, probaj da napraviš tzv. App Password i koristi njega. Naime, na Gmail-u je moguće napraviti posebnu lozinku koja će se koristiti sa nekom aplikacijom. Sa tom lozinkom nije moguće logovanje na sam Gmail servis, ali se aplikacija loguje i šalje poruke bez problema. Ja sam tako već koristio Gmail i nikada nisam imao problem sa slanjem poruka.



offline
  • Miroslav R. Maričić
  • diplomirani inženjer mašinstva, profesor
  • Pridružio: 06 Jun 2012
  • Poruke: 227
  • Gde živiš: Hajdučica, Banat, Srbija

Креирао сам налог као за приватно лице: ime_skole@gmail.com, лозинка: bla_bla_123. Можеш ли да ме упутиш како да пронађем App Password ? (да не бих лутао)...
Ако успем да креирам App Password, да ли ћу моћи да уђем у мејлове са лозинком bla_bla_123? То ми је важно да бих могао инспекцији да прикажем послате мејлове.

offline
  • Milan
  • Pridružio: 17 Dec 2007
  • Poruke: 14490
  • Gde živiš: Niš

Evo ovde ima više detalja: https://support.google.com/accounts/answer/185833?hl=en

Što se tiče drugog pitanja - naravno, moguće je dalje korišćenje naloga bez ikakvih problema.

offline
  • Miroslav R. Maričić
  • diplomirani inženjer mašinstva, profesor
  • Pridružio: 06 Jun 2012
  • Poruke: 227
  • Gde živiš: Hajdučica, Banat, Srbija

Креирао сам App Password према упутству са линка који си ми дао и то - РАДИ !!! Хвала ти, краљу vasa.93! Појма немаш који си ми велики проблем решио. Живео! Ziveli

offline
  • Ričard  Male
  • Lavlje srce
  • Supermoderator
  • Zver!
  • Electro maintenance engineer
  • Pridružio: 28 Nov 2006
  • Poruke: 13688
  • Gde živiš: Vršac

miroslav.maričić ::(ако дође инспектор рада да могу лако да му докажем да сваки запослени редовно добија исплатни листић Wink ).


Ako ti dođe inspektor, ovo ti neće biti dovoljno. Kod sebe moraš imati sa datumom potpisan od strane radnika platni listić.

offline
  • Miroslav R. Maričić
  • diplomirani inženjer mašinstva, profesor
  • Pridružio: 06 Jun 2012
  • Poruke: 227
  • Gde živiš: Hajdučica, Banat, Srbija

Ričard, ниси у праву. Закон о раду предвиђа и електронско слање платних листића:

" Poslodavac koji zarade isplaćuje redovno, može na bilo koji drugi način predvideti dostavu obračuna zarade zaposlenom, bez potpisa i pečata.

Šta to znači kod poslodavca koji je izvršio isplatu zarade i naknade zarade u celosti a nije zaposlenom dostavio, lično, obračun zarade u skladu sa donetim Pravilnikom odnosno nije dostavio obračun potpisan i snabdeven pečatom. Potpis i pečat nisu propisani kao obavezni elementi obračuna zarade osim u slučaju neisplaćivanja zarade i naknade zarade na dan dospelosti odnosno zadnjeg dana u mesecu za prethodni mesec.

Ovo znači, da u skladu Zakonom o radu i Pravilnikom o sadržaju obračuna zarade i naknade zarade, poslodavac koji zarade isplaćuje redovno, može na bilo koji drugi način predvideti dostavu obračuna zarade zaposlenom, bez potpisa i pečata. Na primer putem email-a, posredstvom internog informacionog sistema, knjigovodstvenog programa, bez potrebe da u svojoj arhivi čuva dostavljeni obračun zarade (platni listić) sa ličnim potpisom zaposlenog kao dokaz da mu je obračun zarade dostavljen.

Konsalting Aktiv grupa
Vaša knjigovodstvena kuća"

offline
  • Ričard  Male
  • Lavlje srce
  • Supermoderator
  • Zver!
  • Electro maintenance engineer
  • Pridružio: 28 Nov 2006
  • Poruke: 13688
  • Gde živiš: Vršac

Napisano: 25 Sep 2020 20:29

Ne znam od kada je ovo, mene je pre dve godine ispreskakao za potpisane platne listiće, kao i sadržaj platnih listića.

Dopuna: 25 Sep 2020 20:30

Čak i do naziva, platni listić nije pravilan naziv.

offline
  • Miroslav R. Maričić
  • diplomirani inženjer mašinstva, profesor
  • Pridružio: 06 Jun 2012
  • Poruke: 227
  • Gde živiš: Hajdučica, Banat, Srbija

Ričard ::Napisano: 25 Sep 2020 20:29

Ne znam od kada je ovo, mene je pre dve godine ispreskakao za potpisane platne listiće, kao i sadržaj platnih listića.

Dopuna: 25 Sep 2020 20:30

Čak i do naziva, platni listić nije pravilan naziv.


Испрескакао те је зато што, највероватније, нема појма о рачунарима, мејловима итд... Па то своје незнање прикрива бахатошћу и позивањем на ауторитет.
Имали смо једног таквог у мом крају али је, Богу хвала, отишао у пеМзију Laughing

Ko je trenutno na forumu
 

Ukupno su 821 korisnika na forumu :: 41 registrovanih, 9 sakrivenih i 771 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3028 - dana 22 Nov 2019 07:47

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: _commandos_, A.R.Chafee.Jr., aljosa7, caesar, crnitrn, darkangel, dejoglina, Dimitrise93, Drug pukovnik, FOX2, francis begbie, goflja76, goxin, ikan, Japidson, JOntra, kaptain, L3g1oN, Mahovljani, Markoni29, Mercury2, Milan A. Nikolic, Milos ZA, misaru, nenad812, ObelixSRB, panonski mornar, Panter, pein, pera12345, Sale.S, shone34, sizif, StepskiVuk, T-72, trajkoni018, Trpe Grozni, VJ, vukdra, xxxvelja, |_MeD_|