Skip to content

Instantly share code, notes, and snippets.

@Kuanlin-Chen
Last active January 8, 2019 12:16
Show Gist options
  • Save Kuanlin-Chen/dd7e45a2603b52c8b122eeff798c659f to your computer and use it in GitHub Desktop.
Save Kuanlin-Chen/dd7e45a2603b52c8b122eeff798c659f to your computer and use it in GitHub Desktop.
Send mail automatically with Lotus Notes
set shell = CreateObject("WScript.Shell")
shell.run"YourLotusPath\notes.exe"
WScript.Sleep 1000
shell.run"YourLotusPath\notes.exe mailto:[email protected]?subject=Hello?attach=Result.txt"
WScript.Sleep 2000
shell.SendKeys"{TAB}"
shell.SendKeys"{ENTER}"
shell.SendKeys"^(+{ENTER})"
WScript.Sleep 1000
shell.SendKeys"{ENTER}"
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment