replace ugly CCMS link with Service Advisor link

This commit is contained in:
David Daily 2022-01-13 13:47:10 -06:00
parent c7d3567790
commit 0d596fd2d4
1 changed files with 40 additions and 40 deletions

View File

@ -1,40 +1,40 @@
#SingleInstance force #SingleInstance force
; The exe this is compiled into has manual.ico set as its icon. ; The exe this is compiled into has manual.ico set as its icon.
!+S::gui() !+S::gui()
gui() gui()
{ {
static Number static Number
static Hidden static Hidden
Gui, +AlwaysOnTop +ToolWindow Gui, +AlwaysOnTop +ToolWindow
Gui, Add, Edit, x2 y3 w78 h20 vNumber +Left, Gui, Add, Edit, x2 y3 w78 h20 vNumber +Left,
Gui, Add, Button, x22 y43 w70 h20 Default vHidden, Ok Gui, Add, Button, x22 y43 w70 h20 Default vHidden, Ok
Gui, Add, Button, x81 y3 w17 h20 gHelp +Center, ? Gui, Add, Button, x81 y3 w17 h20 gHelp +Center, ?
Gui, Show, h28 w100, ManSol Gui, Show, h28 w100, ManSol
GuiControl, Hide, Hidden GuiControl, Hide, Hidden
Return Return
ButtonOk: ButtonOk:
Gui, submit ; I have no idea what the regex means any more... Gui, submit ; I have no idea what the regex means any more...
If RegExMatch(Number, "[[:alpha:]]+") If RegExMatch(Number, "[[:alpha:]]+")
run, % "http://serviceadvisor.deere.com/WebSA/manuals/" . Number run, % "http://serviceadvisor.deere.com/WebSA/manuals/" . Number
Else If RegExMatch(Number, "[[:digit:]]+") Else If RegExMatch(Number, "[[:digit:]]+")
run, % "https://ccms.deere.com/prweb/PRServletCustomAuth/ZDate_MgiNPn1ccL6O6pyBurDs0hjFQ8*/!STANDARD?pyActivity=SolutionsSnapStart&Action=showHarness&className=Deere-Int-Solr-Docs&Purpose=SolutionDescriptionNew&SolutionID=" . Number . "&Language=Default" run, % "https://serviceadvisor.deere.com/WebSA/solutions/en/" . Number
ExitApp ExitApp
Return Return
Help: Help:
Run, https://daviddaily.dev/david/d3k/wiki/ManSol Run, https://daviddaily.dev/david/d3k/wiki/ManSol
Return Return
GuiClose: GuiClose:
GuiEscape: GuiEscape:
Gui, Destroy Gui, Destroy
Return Return
} }