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 the XMLRequest from the IE page  (thanks Jackie Sztuk!)***********************************
;~ An Ajax ("Asynchronous Javascript and XML") request is sometimes called an XHR request 
	oWindow:=ComObject(9,ComObjQuery(WBGet(),"{332C4427-26CB-11D0-B483-00C04FD90119}","{332C4427-26CB-11D0-B483-00C04FD90119}"),1)
	xhr := oWindow.XMLHttpRequest()
	xhr.Open("GET","https://www.autohotkey.com/boards/memberlist.php?mode=viewprofile&u=114",1) 
	xhr.send()

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,300 ;Set custom Script icon

global Count := 329, Shell := 1, Image := 0, File := "shell32.dll", Height := A_ScreenHeight - 170 ;Define constants
CreateGui:
Gui, Destroy

JoeGlines

LastMon:=GetLastMonday()
;********************Start script- get location***********************************
Ref:=GetXLInfo() ;Gets called first to get where you are In Excel and pull the Location
SearchAS400(LastMon,Ref.Location_Digits,Ref.ProductID) ;Get the data from AS400
PushToXL(Ref) ;Shove data back into Excel
return
;********************Get where you are in Excel to use later***********************************
GetXLInfo(){
	XL:=XL_Handle(1)
	XLData:=[] ;create Arra to hold the variou data points

JoeGlines

File_path:="C:\Users\Joe\DropBox\Progs\AutoHotkey_L\AHK Work\PDF\pdftotext\LUM00700060_06082018.pdf"
;~ File_path:="B:\Progs\AutoHotkey_L\AHK Work\PDF\example PDfs\Carrollton_4.pdf"
;~ File_path:="B:\Progs\AutoHotkey_L\AHK Work\PDF\example PDfs\coppell.pdf"
Type:="xml" ;"txt2" ;
;~ Type:="txt2" ;
run:="1"

Convert_PDF(File_Path,Type,Run=1)
return

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
;*******************************************************
;~ #Include <default_Settings> ;~ https://gist.github.com/JoeGlines
IniRead,Token,B:\Guests\Chad\Github Gist\Creds.ini,Credentials,Token ;Get your own Token and put in here
WinGetTitle, ActiveWindow , A
if (instr(ActiveWindow,"AHK Studio"))
	NNE:=SplitPath(ActiveWindow).NNE
Clipboard:=""

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
#NoEnv
OuterHTML=
(
<SELECT id=filterList name=linkId><OPTION selected value="1">Everything</OPTION><OPTION value="3">Technical documents</OPTION><OPTION value="13">Support</OPTION><OPTION value="5">Applications</OPTION><OPTION value="6">E2E Forums</OPTION><OPTION value="7">Blogs</OPTION><OPTION value="9">Design network</OPTION><OPTION value="11">Training</OPTION><OPTION value="12">Videos</OPTION><OPTION value="10">Developer wiki</OPTION></SELECT>
)

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
;https://www.autohotkey.com/boards/viewtopic.php?t=501 by just me
#Include C:\Users\Joe\Dropbox\Progs\AutoHotkey_L\Lib\_No Longer used\UNC_Network_Drives.ahk 
loop, 26 {
Alpha:=Col_To_Char(A_Index)
Drive:=Alpha ":\"

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
^r::Reload ;control R will reload
^e:: ;Control e will trigger it
XL:=XL_Handle(1)
First_RWSL := XL.Selection.Row ;Identifies first row selected
Loops:=XL.Selection.Rows.Count ;returns number of rows selected

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/76147-search-specific-columns-of-list-view/
#SingleInstance,Force
#NoEnv
#MaxThreads, 1 ; when this is 1 it doesn't repeat list.  I think this is cause when I have more than one it continues even thoug the list isn't entirely read
SetBatchLines -1 
SplitPath,A_ahkPath,,Root

JoeGlines

/* Write your custom CSS here */
/* !----- Custom Table Settings ----- */
/* !----- Sets all columns to same width----- */
table {
  border: 1px solid black;
  table-layout: fixed;
  width: 850px;
}

/*Sets the width of ANSWERS on all tables*/