Új hozzászólás Aktív témák

• #1053 redwhite78 aktív tag sztanozs #1052

  Új Válasz 2021-01-20 09:49:43 #1053

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  redwhite78

  aktív tag

  válasz sztanozs #1052 üzenetére

  Hát igen, ez még bejátszhat. De ez ellen sztem az outlookos megoldás sem védene.
  Lehet vmi felugró ablakos megoldás kellene (elküldi a levelet YES/NO). Ha feldobja elém az ablakot talán nem felejtem el.

• #1051 redwhite78 aktív tag sztanozs #1042

  Új Válasz 2021-01-20 07:44:48 #1051

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  redwhite78

  aktív tag

  válasz sztanozs #1042 üzenetére

  Az outlook-os megoldással nem tudtam megcsinálni, de végül az asztalra kiraktam egy vbs fájlt amiben lefut az outlook indítás, levélküldés és egy shuthdown. Ez most működik, bár lehet nem valami elegáns.

  SecondsToDelay = "0"
  ProgramToRun = "C:\Program Files\Microsoft Office\Office16\outlook.exe"
  Wscript.Sleep(SecondsToDelay * 1000)
  Prog = Chr(34) & ProgramToRun & Chr(34)

  CreateObject("WScript.Shell").Run(Prog)
  Set objOutlook = CreateObject("Outlook.Application")
  Set objMail = objOutlook.CreateItem(0)
  objMail.Display 'To display message
  objMail.To = "pelda@gmail.com"
  objMail.Subject = "tárgy"
  objMail.Send
  
  Set objShell = wscript.CreateObject("wscript.Shell")
  objShell.run("shutdown /s /f /t 3")

• #1043 redwhite78 aktív tag sztanozs #1042

  Új Válasz 2021-01-19 16:57:40 #1043

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  redwhite78

  aktív tag

  válasz sztanozs #1042 üzenetére

  köszi a tippet, holnap tesztelem.

• #1041 redwhite78 aktív tag sztanozs #1040

  Új Válasz 2021-01-19 13:14:32 #1041

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  redwhite78

  aktív tag

  válasz sztanozs #1040 üzenetére

  Az a baj, hogy ez kb. 16-19 óra között bármikor előfordulhat és ha hamarabb elküldi, akkor "hiába" túlóráztam.

• #1039 redwhite78 aktív tag sztanozs #1038

  Új Válasz 2021-01-19 10:00:18 #1039

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  redwhite78

  aktív tag

  válasz sztanozs #1038 üzenetére

  Köszi. Ehhez sajnos nem vagyok elég képzett, de összeollóztam vmit máshonnan, ami most a bekapcsoláskor működik, ha bedobom a vbs-t az indítópultba.

  SecondsToDelay = "0"
  ProgramToRun = "C:\Program Files\Microsoft Office\Office16\outlook.exe"
  Wscript.Sleep(SecondsToDelay * 1000)
  Prog = Chr(34) & ProgramToRun & Chr(34)
  
  CreateObject("WScript.Shell").Run(Prog)
  Set objOutlook = CreateObject("Outlook.Application")
  Set objMail = objOutlook.CreateItem(0)
  objMail.Display 'To display message
  objMail.To = "pelda@gmail.com"
  objMail.Subject = "tárgy"
  objMail.Send
  
  Most kellene elérnem, hogy ismét lefusson mindez, amikor kikapcsolom a gépet. Erre nincs valami ötleted?

• #1037 redwhite78 aktív tag

  Új Válasz 2021-01-19 09:12:04 #1037

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  redwhite78

  aktív tag

  Üdv!
  Szakértők segítsetek pls! Cégnél bevezették, h emailt kell munkába érkezéskor és távozáskor küldeni (üres email, mindig azonos tárgyszöveggel, adott belső mail címre); ez a covidos jelenléti ív lényegében. (Win7, Outlook2016.)
  Mivel ezt rendszeresen elfelejtem automatizálni szeretném.
  Lehetne valahogy írni egy bat, vagy vbs fajt, ami elvégzi mindezt automatikusan be és kikapcsoláskor?
  Milyen irányba induljak el? (google még nem segített, persze biztos rosszul kerestem )
  Köszi előre is!

Új hozzászólás Aktív témák