fixed grabbing Locals Video Share Link

main
Yuriy 3 months ago
parent 5f63640185
commit 4476bfdda6

@ -67,7 +67,6 @@ global VideoFilepath
global VideoThumbFilepath global VideoThumbFilepath
global VideoTags global VideoTags
global VideoDescription global VideoDescription
global SocialMediaDescription
global DiscordErrorLoggingWebhookBotURL global DiscordErrorLoggingWebhookBotURL
global DiscordVideosWebhookURL global DiscordVideosWebhookURL
global VideoFolderDir global VideoFolderDir
@ -464,85 +463,87 @@ if(PassedInArgument2_Action = "Scheduled"){
; } ; }
goto, StartScheduledPost goto, StartScheduledPost
} }
/*
*/
;---/Read Info From Previous Run And Set Upload Options---
;--------------------------------------------------------
;---/Read Info From Previous Run And Set Upload Options--- if(PassedInArgument2_Action = "ShowResults"){
;--------------------------------------------------------
if(PassedInArgument2_Action = "ShowResults"){
goto, DisplayResults goto, DisplayResults
} }
; Main GUI Window
; ------------------------------------------------
gosub, SetAndShowMainGUI
; Write current project to ini file for easy reloading ; Main GUI Window
IniWrite, %BodyTextFilePath%, %SettingsIniFilepath%, %ScriptSettingsSection%, LastPost ; ------------------------------------------------
; Write current project to ini file for easy reloading
IniWrite, %BodyTextFilePath%, %SettingsIniFilepath%, %ScriptSettingsSection%, LastPost
gosub, SetAndShowMainGUI
RunTimeToShowGui := round(((A_TickCount - UStartTime) / 1000), 2) RunTimeToShowGui := round(((A_TickCount - UStartTime) / 1000), 2)
Return Return
; -------------------------------GUI GoSubs------------------------------- ; -------------------------------GUI GoSubs-------------------------------
; Kill the script if user clicks on cancel button ; Kill the script if user clicks on cancel button
KillScript: KillScript:
; GuiClose: ; GuiClose:
ExitApp ExitApp
Return Return
PauseScript: PauseScript:
Pause,Toggle Pause,Toggle
Return Return
CancelPost: CancelPost:
GuiClose: GuiClose:
; ExitApp ; ExitApp
Gui, Submit, Gui, Submit,
Return Return
ReloadScript: ReloadScript:
Reload Reload
Return Return
; Gets activated each time that text gets input into any of the text boxes ; Gets activated each time that text gets input into any of the text boxes
; updates the variables with the new text ; updates the variables with the new text
UpdateVars: UpdateVars:
Gui, Submit, NoHide Gui, Submit, NoHide
Return Return
SubmitDescription: SubmitDescription:
Gui, Submit, NoHide Gui, Submit, NoHide
DescriptionCharCount := StrLen(VideoDescription) DescriptionCharCount := StrLen(VideoDescription)
GuiControl,, DescriptionCharCount, %DescriptionCharCount% GuiControl,, DescriptionCharCount, %DescriptionCharCount%
Return Return
; Open folder of the project ; Open folder of the project
OpenProjectFolder: OpenProjectFolder:
run, %VideoFolderDir% if(FileExist(VideoFolderDir))
Return run, %VideoFolderDir%
else,
msgbox, Cannot Open Folder as it no longer exists at:`n%VideoFolderDir%
Return
ClearVideoLinks: ClearVideoLinks:
FileDelete, %VideoLinksIniFile% FileDelete, %VideoLinksIniFile%
Return Return
ToggleTestingMode: ToggleTestingMode:
ToggleTestingMode() ToggleTestingMode()
run, "%A_ScriptFullPath%" "LastPost" run, "%A_ScriptFullPath%" "LastPost"
Return Return
ToggleDevMode: ToggleDevMode:
ToggleDevMode() ToggleDevMode()
run, "%A_ScriptFullPath%" "LastPost" run, "%A_ScriptFullPath%" "LastPost"
Return Return
/* /*
OpenGiteaPage: OpenGiteaPage:
@ -1177,6 +1178,10 @@ Return
; ------------------------------------------------ ; ------------------------------------------------
#Include %A_ScriptDir%\Lib\Freedomain-Posters-Shared-Functions\Shared-GoTos.ahk #Include %A_ScriptDir%\Lib\Freedomain-Posters-Shared-Functions\Shared-GoTos.ahk
; Special Website Functions
; ------------------------------------------------
#Include %A_ScriptDir%\Lib\Freedomain-Posters-Shared-Functions\Locals-Functions.ahk
; GUI Windows ; GUI Windows
; ------------------------------------------------ ; ------------------------------------------------
#include C:\Users\%A_Username%\Syncthing\Git\Freedomain-Video-Uploader\Modules\GUI-Main-Window.ahk #include C:\Users\%A_Username%\Syncthing\Git\Freedomain-Video-Uploader\Modules\GUI-Main-Window.ahk

Loading…
Cancel
Save