JoeGlines

if !ClipWait(2)
{
    Notify.Default.GenSound := "Error"
    Notify.show('The attempt to copy text onto the clipboard failed.')
    sleep 3000
    Exitapp
}

JoeGlines

/*
 * ============================================================================ *
 * Want a clear path for learning AutoHotkey?                                   *
 * Take a look at our AutoHotkey courses here: the-Automator.com/Learn          *
 * They're structured in a way to make learning AHK EASY                        *
 * And come with a 200% moneyback guarantee so you have NOTHING to risk!        *
 * ============================================================================ *
*/

#SingleInstance

JoeGlines

;***********This will write a binary file to the folder where script is running*******************
;***********Another great reason to use MSXML2 is that it will use your IE cookies so you don't have to deal with Authentication  :)*******************
;***********Also read this post for pros/cons of each method:  https://autohotkey.com/boards/viewtopic.php?t=9554*******************
URL:="http://the-automator.com/mn/wp-content/uploads/2016/02/not_working.jpg"
SplitPath,URL,File_Name
HTTP:=ComObjCreate("MSXML2.XMLHTTP.6.0") ;https://msdn.microsoft.com/en-us/library/ms535874(v=vs.85).aspxu
ADODB:=ComObjCreate("ADODB.Stream") ;https://docs.microsoft.com/en-us/sql/ado/reference/ado-glossary
ADODB.Type:=1 ;set to 1 which is Binary  2 is text
HTTP.Open("GET",URL,1) ;open( Method, URL, Asynchronous, UserName, Password )
HTTP.Send()

JoeGlines

Clipboard_Backup_Copy_Selected_Text()
StringUpper, Clipboard,Clipboard ;uppercase all
Sort, Clipboard, U CL ;sort, case insensitive, remove duplicates
Clipboard:=Remove_Blank_Lines(clipboard)
Clipboard := RegExReplace(Clipboard,"m)^[_\s]*|[_\s]*$")  ;removes spaces at beginning and end
Clipboard_Paste_and_Restore_Clipboard(Clipboard_Backup)
return


;***********Remove Blank lines******************* 

JoeGlines

// Get the text you want to save to the clipboard
const textToCopy = "This text will be saved to the clipboard.";

// Create a new textarea element to hold the text
const textarea = document.createElement("textarea");
textarea.value = textToCopy;

// Add the textarea element to the page
document.body.appendChild(textarea);

JoeGlines

https://gist.github.com/JoeGlines

JoeGlines

Gui, Submit  ; Save the input from the user to each control's associated variable.
Filename:= (SubStr(filename,-3)=".ahk")?(SubStr(Filename,1,StrLen(Filename)-4)):Filename ;just in case they end it with .ahk
Body:=Jxon_Dump({content:Clipboard}) ;need to encode it 
Data={"description": "%Descr%","public": true,"files": {"%FileName%.ahk": %Body%}} ;build data for post havnig double quotes
Obj:=ParseJSON(Send(Token,"https://api.github.com/gists","POST",Data)) ;make post and return information about it
Clipboard:="Use the following for a webpage post:`n<script src='https://gist.github.com/" GitName "/"(SubStr(obj.url,Instr(obj.url,"/",,0)+1))".js'></script>`n`nYou can get the code here: " obj.html_url
WinGetTitle, ActiveWindow , A ;Get active title

JoeGlines

loop 50 {
	try {
		FileAppend()
		break
	} catch Error as e
		sleep 20
}

JoeGlines

;*******************************************************
; Want a clear path for learning AutoHotkey; Take a look at our AutoHotkey courses.  
;They're structured in a way to make learning AHK EASY:  https://the-Automator.com/Learn
;*******************************************************
#Include <default_Settings> 
;**************************************
var=
(
Email	First_Name	Last_Name
[email protected]	Joe	King

JoeGlines

;*******************************************************
; Want a clear path for learning AutoHotkey; Take a look at our AutoHotkey courses.  
;They're structured in a way to make learning AHK EASY:  https://the-Automator.com/Learn
;*******************************************************
;~ #Include <default_Settings> 
;**************************************
Loop,read, B:\the-automator\Cossman Billboards.txt
	aa++ ;increment rows- Need to know what the last row is

Random, Random_Row, 1, %aa% ;selecat random row