JoeGlines

;*******************************************************
; Want a clear path for learning AutoHotkey; Take a look at our AutoHotkey Udemy courses.  They're structured in a way to make learning AHK EASY
; Right now you can  get a coupon code here: https://the-Automator.com/Learn
;*******************************************************
Selection := ComObjActive("Outlook.Application").ActiveExplorer().Selection ;Connect to Outlook and store list of selected emails
For a,b in Selection { ;Loop over selected emails
	oAtt:=selection.item(A_Index).Attachments ;For each email, create object storing the attachments
	
	for k, v in oAtt  ;use For loop over attachments
		k.SaveAsFile("C:\temp\" . k.DisplayName)  ;This will write the files to the C:\temp\ folder.  Update for your needs.

JoeGlines

mail :=    ComObjActive("Outlook.Application").GetNameSpace("MAPI").GetDefaultFolder[6] ; Access the Session NameSpace
;~ mail :=    ComObjActive("Outlook.Application").GetNameSpace("MAPI").GetDefaultFolder[0] ; Access the Session NameSpace
myDestFolder := mail.Folders("CCY")
numb := myDestFolder.Items.Count
MsgBox % numb

Loop %  mail.Items.Count
{
   ;  if   Instr(mail.Items[A_Index].SenderName,"JoeTazz") {
     if   Instr(mail.Items[A_Index].Subject,"commented on") {

JoeGlines

;*******************************************************
; Want a clear path for learning AutoHotkey; Take a look at our AutoHotkey Udemy courses.  They're structured in a way to make learning AHK EASY
; Right now you can  get a coupon code here: https://the-Automator.com/Learn
;*******************************************************
;https://ahdictionary.com/word/hundredsmart.html
File_Path:="B:\Custom\Win\Desktop\100 Words to Make you sound smarter.txt" 
FileRead,Var,% File_Path
;~ Resizable_GUI(var,300,900)

Loop,read, % File_Path

JoeGlines

;*******************************************************
; Want a clear path for learning AutoHotkey; Take a look at our AutoHotkey Udemy courses.  They're structured in a way to make learning AHK EASY
; Right now you can  get a coupon code here: https://the-Automator.com/Learn
;*******************************************************
;http://www.autohotkey.com/board/topic/80697-long-keypress-hotkeys-wo-modifiers/  Author: Bon

$Escape::                             ; Long press (> 0.5 sec) on Esc closes window
KeyWait, Escape, T0.5                 ; Wait up to 0.5 sec for key release (suppress auto-repeat)
If ErrorLevel                         ; timeout, so long press
     PostMessage, 0x112, 0xF060,,, A  ; ...use PostMessage to close the active window

JoeGlines

;*******************************************************
; Want a clear path for learning AutoHotkey; Take a look at our AutoHotkey Udemy courses.  They're structured in a way to make learning AHK EASY
; Right now you can  get a coupon code here: https://the-Automator.com/Learn
;*******************************************************
	HTTP:=ComObjCreate("WinHttp.WinHttpRequest.5.1")
AHKPastebin(Content,Name:="",Notify:=1,Run:=0){
	HTTP.Open("POST","https://p.ahkscript.org/", False)
	HTTP.SetRequestHeader("Content-Type", "application/x-www-form-urlencoded")
	HTTP.Send("code=" UriEncode(Content) "&name=" UriEncode(Name) "&channel=#ahkscript")
	if HTTP.Status()!=200{ ;If not okay

JoeGlines

;*******************************************************
; Want a clear path for learning AutoHotkey; Take a look at our AutoHotkey Udemy courses.  They're structured in a way to make learning AHK EASY
; Right now you can  get a coupon code here: https://the-Automator.com/Learn
;*******************************************************
#SingleInstance, force
#Include, lib\Chrome\Chrome.ahk ;https://github.com/G33kDude/Chrome.ahk/releases

; verify if the profile folder exists
; if not, create it
if !FileExist("profile")

JoeGlines

;*******************************************************
; Want a clear path for learning AutoHotkey; Take a look at our AutoHotkey Udemy courses.  They're structured in a way to make learning AHK EASY
; Right now you can  get a coupon code here: https://the-Automator.com/Learn
;*******************************************************
~LButton::
if (a_timesincepriorhotkey != -1 && a_timesincepriorhotkey<200)
	cnt += 1
else if (a_timesincepriorhotkey > 400)
	cnt := 0

JoeGlines

;*******************************************************
; Want a clear path for learning AutoHotkey; Take a look at our AutoHotkey Udemy courses.  They're structured in a way to make learning AHK EASY
; Right now you can  get a coupon code here: https://the-Automator.com/Learn
;*******************************************************

#SingleInstance,Force   ;~ Adapted from Cerberus    https://www.autohotkey.com/boards/viewtopic.php?p=319004#p319698  
Menu, Tray, Icon, C:\Windows\system32\shell32.dll,236 ;Set custom Script icon
global Count := 329, Shell := 1, Image := 0, File := "shell32.dll", Height := A_ScreenHeight - 170 ;Define constants
CreateGui:
Gui, Destroy

JoeGlines

#*******************************************************
# Want a clear path for learning AutoHotkey; Take a look at our AutoHotkey Udemy courses.  They're structured in a way to make learning AHK EASY
# Right now you can  get a coupon code here: https://the-Automator.com/Learn
#*******************************************************
#***********Run selection in AutoHotkey******************* 
command.name.45.$(file.patterns.ahk)=Run selection
command.mode.45.$(file.patterns.ahk=subsystem:2,savebefore:no
#                                  Path to AutoHotkey.exe			Path to SelectRun.ahk
command.45.$(file.patterns.ahk)="B:\Progs\AutoHotkey_L\AutoHotkey.exe" "B:\SelectRun.ahk"
command.input.45.$(file.patterns.ahk)=$(CurrentSelection)

JoeGlines

;*******************************************************
; Want a clear path for learning AutoHotkey; Take a look at our AutoHotkey Udemy courses.  They're structured in a way to make learning AHK EASY
; Right now you can  get a coupon code here: https://the-Automator.com/Learn
;*******************************************************
#SingleInstance,Force
username := "Jackie"

msgbox % "Name: " username "`nPassword: " password()
return
password(){