Jump to content

Strange _IEGetObjById issue on 1PC, but not the other

bullmoose20
 Share

Recommended Posts

bullmoose20 Seeker

bullmoose20

Posted
Posted (edited)

Hello,

 

Attached you will find the debug output log of a script that I am running on two different machines with the same .au3 file. On one machine it works fine, on the other it does not.

 

I cannot figure out why and it is driving me nuts.

 

0139: 0-0:  Local $oFrom = _IEGetObjById($o_IE1, $chkFrom)

--> IE.au3 T3.0-1 Warning from function _IEGetObjById, $_IEStatus_NoMatch (ContentPlaceHolder1_MatchsDateTerr1_cmbDateFrom)

 

On one pc, it finds "ContentPlaceHolder1_MatchsDateTerr1_cmbDateFrom" in the returned HTML, in the other, it does not find it and yet when I "view source" it is there.

 

Ideas?

 

Thanks in advance,

Nick

 

====START WORKS ====
>"C:\Program Files (x86)\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.exe" /run /prod /ErrorStdOut /in "C:\Users\nickza\Desktop\TSSS\TSSS-DataHelper.au3" /UserParams   
+>13:14:29 Starting AutoIt3Wrapper v.2.2.0.0 SciTE v.3.4.1.0   Keyboard:00000409  OS:WIN_81/  CPU:X64 OS:X64    Environment(Language:0409)
+>         SciTEDir => C:\Program Files (x86)\AutoIt3\SciTE   UserDir => C:\Users\nickza\AppData\Local\AutoIt v3\SciTE\AutoIt3Wrapper   SCITE_USERHOME => C:\Users\nickza\AppData\Local\AutoIt v3\SciTE
>Running AU3Check (3.3.10.2)  from:C:\Program Files (x86)\AutoIt3  input:C:\Users\nickza\Desktop\TSSS\TSSS-DataHelper.au3
+>13:14:29 AU3Check ended.rc:0
>Running:(3.3.10.2):C:\Program Files (x86)\AutoIt3\autoit3.exe "C:\Users\nickza\Desktop\TSSS\TSSS-DataHelper.au3"   
--> Press Ctrl+Alt+F5 to Restart or Ctrl+Break to Stop
!> Starting in DebugMode..
Line: @error-@extended: Line syntax
0001: 0-0: #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
0002: 0-0: #AutoIt3Wrapper_Icon=C:\Program Files (x86)\AutoIt3\Icons\au3.ico
0003: 0-0: #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
0008: 0-0: #AutoIt3Wrapper_run_debug_mode=Y
0009: 0-0: #include <IE.au3>
0010: 0-0: #include <Date.au3>
0011: 0-0: #include <Excel.au3>
0012: 0-0: #include <File.au3>
0013: 0-0: #include <Array.au3>
0014: 0-0: #include <Clipboard.au3>
0016: 0-0: Global $o_IE1
0017: 0-0: Global $ArrayCont = ""
0019: 0-0: Func _StringBetween2($s, $from, $to)
0025: 0-0: Const $navOpenInNewTab = 0x0800
0028: 0-0: Local $iDateCalc = _DateDiff("d", "2000/01/01 00:00:00", _NowCalc())
0031: 0-0: Local $iDaysx01 = _DateDaysInMonth(@YEAR, @MON - 1)
0034: 0-0: Local $iDaysx02 = _DateDaysInMonth(@YEAR, @MON - 2)
0037: 0-0: Local $iDaysx03 = _DateDaysInMonth(@YEAR, @MON - 3)
0040: 0-0: Local $iDaysx04 = _DateDaysInMonth(@YEAR, @MON - 4)
0043: 0-0: Local $iDaysx05 = _DateDaysInMonth(@YEAR, @MON - 5)
0046: 1-0: Local $iDaysx06 = _DateDaysInMonth(@YEAR, @MON - 6)
0049: 1-0: Local $iDaysx07 = _DateDaysInMonth(@YEAR, @MON - 7)
0052: 1-0: Local $iDays01 = _DateDaysInMonth(@YEAR, @MON)
0055: 0-0: Local $iDays02 = _DateDaysInMonth(@YEAR, @MON + 1)
0058: 0-0: Local $iDays03 = _DateDaysInMonth(@YEAR, @MON + 2)
0061: 0-0: Local $iDays04 = _DateDaysInMonth(@YEAR, @MON + 3)
0064: 0-0: Local $iDays05 = _DateDaysInMonth(@YEAR, @MON + 4)
0067: 0-0: Local $iDays06 = _DateDaysInMonth(@YEAR, @MON + 5)
0070: 0-0: Local $iDays07 = _DateDaysInMonth(@YEAR, @MON + 6)
0074: 0-0: Local $iCurrMonth = _DateDiff("d", "2000/01/01 00:00:00", @YEAR & "/" & @MON & "/" & "01 00:00:00")
0077: 0-0: Local $iMonthx01 = $iCurrMonth - $iDaysx01
0078: 0-0: Local $iMonthx02 = $iMonthx01 - $iDaysx02
0079: 0-0: Local $iMonthx03 = $iMonthx02 - $iDaysx03
0080: 0-0: Local $iMonthx04 = $iMonthx03 - $iDaysx04
0081: 0-0: Local $iMonthx05 = $iMonthx04 - $iDaysx05
0082: 0-0: Local $iMonthx06 = $iMonthx05 - $iDaysx06
0083: 0-0: Local $iMonthx07 = $iMonthx06 - $iDaysx07
0085: 0-0: Local $iMonth01 = $iCurrMonth + $iDays01
0086: 0-0: Local $iMonth02 = $iMonth01 + $iDays02
0087: 0-0: Local $iMonth03 = $iMonth02 + $iDays03
0088: 0-0: Local $iMonth04 = $iMonth03 + $iDays04
0089: 0-0: Local $iMonth05 = $iMonth04 + $iDays05
0090: 0-0: Local $iMonth06 = $iMonth05 + $iDays06
0091: 0-0: Local $iMonth07 = $iMonth06 + $iDays07
0092: 0-0: Local $dateTo = $iMonth07 - 1
0093: 0-0: Local $dateFrom = $iMonthx03
0095: 0-0: local $iCmd = ""
0096: 0-0: If $CmdLine[0] <> "" Then
0105: 0-0:  Local $sFilePath1 = "C:\Users\nickza\Desktop\TSSS\MASTER.xlsm" ;This file should already exist
0106: 0-0:  Local $message = "Please select Input MASTER.xlsm"
0107: 0-0:  Local $var = FileOpenDialog($message, @ScriptDir & "\", "XLSM (*.xlsm)", 1 + 2)
0108: 0-0: EndIf
0110: 0-0: If @error Then
0114: 0-0:  $var = StringReplace($var, "|", @CRLF)
0115: 0-0:  Local $szDrive, $szDir, $szFName, $szExt
0116: 0-0:  Local $TestPath = _PathSplit($var, $szDrive, $szDir, $szFName, $szExt)
0117: 0-0:  Local $sPath = $szDrive & $szDir
0118: 0-0:  MsgBox(4096, "", "You chose " & $var & @CRLF & "It is RECOMMENDED you use English Canada and short date format of yyyy-MM-dd before running this script.", 30)
0120: 0-0: EndIf
0123: 0-0: Func nextMonthFROM()
0137: 0-0: Func prevMonthFROM()
0151: 0-0: Func prevMonthTO()
0165: 0-0: Func nextMonthTO()
0178: 0-0: Func getData($sLink)
0290: 0-0: ProgressOn("TSSS-DataHelper", "Working on getting data from site", "Working...", 100, 100, 16)
0291: 0-0: ProgressSet(10)
0292: 0-0: getData("C3L")
0179: 0-0:  ClipPut("")
0180: 0-0:  Local $ArrayCont
0182: 0-0:  MsgBox(4096, "", "Getting data for: " & $sLink & " and saving to: " & $sPath & $sLink & ".xls", 5)
0183: 0-0:  $o_IE1 = _IECreate("[url=http://www.tsisports.ca/soccer/ligue14/index.aspx?champ]http://www.tsisports.ca/soccer/ligue14/index.aspx?champ[/url]=" & $sLink)
0186: 0-0:  Local $hIE1 = _IEPropertyGet($o_IE1, "hwnd")
0187: 0-0:  $o_IE1.Navigate2("[url=http://www.tsisports.ca/soccer/ligue14/l_cal2.aspx]http://www.tsisports.ca/soccer/ligue14/l_cal2.aspx[/url]")
0188: 0-0:  Sleep(2000)
0191: 0-0:  _IENavigate($o_IE1, prevMonthFROM())
0138: 0-0:  Local $chkFrom = "ContentPlaceHolder1_MatchsDateTerr1_cmbDateFrom"
0139: 0-0:  Local $oFrom = _IEGetObjById($o_IE1, $chkFrom)
0140: 0-0:  ConsoleWrite(_IEPropertyGet($oFrom, "innerhtml") & @CRLF)
 <tbody><tr><td style="background-color: rgb(170, 0, 0);" colspan="7"><table style="width: 100%; color: white; font-size: xx-small; font-weight: bold; border-collapse: collapse;" cellspacing="0">
  <tbody><tr><td style="width: 15%; color: white;"><a title="Go to the previous month" style="color: white;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','V5204')">&lt;</a></td><td align="center" style="width: 70%; white-space: nowrap;">May 2014</td><td align="right" style="width: 15%; color: white;"><a title="Go to the next month" style="color: white;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','V5265')">&gt;</a></td></tr>
 </tbody></table></td></tr><tr><th align="center" style="color: white; font-weight: normal; background-color: darkgray;" abbr="Monday" scope="col">Mon</th><th align="center" style="color: white; font-weight: normal; background-color: darkgray;" abbr="Tuesday" scope="col">Tue</th><th align="center" style="color: white; font-weight: normal; background-color: darkgray;" abbr="Wednesday" scope="col">Wed</th><th align="center" style="color: white; font-weight: normal; background-color: darkgray;" abbr="Thursday" scope="col">Thu</th><th align="center" style="color: white; font-weight: normal; background-color: darkgray;" abbr="Friday" scope="col">Fri</th><th align="center" style="color: white; font-weight: normal; background-color: darkgray;" abbr="Saturday" scope="col">Sat</th><th align="center" style="color: white; font-weight: normal; background-color: darkgray;" abbr="Sunday" scope="col">Sun</th></tr><tr><td align="center" style="width: 14%; color: white;"><a title="April 28" style="color: white;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5231')">28</a></td><td align="center" style="width: 14%; color: white;"><a title="April 29" style="color: white;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5232')">29</a></td><td align="center" style="width: 14%; color: white;"><a title="April 30" style="color: white;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5233')">30</a></td><td align="center" style="width: 14%;"><a title="May 1" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5234')">1</a></td><td align="center" style="width: 14%;"><a title="May 2" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5235')">2</a></td><td align="center" style="width: 14%; color: red;"><a title="May 3" style="color: red;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5236')">3</a></td><td align="center" style="width: 14%; color: red;"><a title="May 4" style="color: red;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5237')">4</a></td></tr><tr><td align="center" style="width: 14%;"><a title="May 5" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5238')">5</a></td><td align="center" style="width: 14%;"><a title="May 6" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5239')">6</a></td><td align="center" style="width: 14%;"><a title="May 7" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5240')">7</a></td><td align="center" style="width: 14%;"><a title="May 8" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5241')">8</a></td><td align="center" style="width: 14%;"><a title="May 9" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5242')">9</a></td><td align="center" style="width: 14%; color: red;"><a title="May 10" style="color: red;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5243')">10</a></td><td align="center" style="width: 14%; color: red;"><a title="May 11" style="color: red;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5244')">11</a></td></tr><tr><td align="center" style="width: 14%;"><a title="May 12" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5245')">12</a></td><td align="center" style="width: 14%;"><a title="May 13" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5246')">13</a></td><td align="center" style="width: 14%;"><a title="May 14" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5247')">14</a></td><td align="center" style="width: 14%;"><a title="May 15" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5248')">15</a></td><td align="center" style="width: 14%;"><a title="May 16" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5249')">16</a></td><td align="center" style="width: 14%; color: red;"><a title="May 17" style="color: red;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5250')">17</a></td><td align="center" style="width: 14%; color: red;"><a title="May 18" style="color: red;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5251')">18</a></td></tr><tr><td align="center" style="width: 14%;"><a title="May 19" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5252')">19</a></td><td align="center" style="width: 14%;"><a title="May 20" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5253')">20</a></td><td align="center" style="width: 14%;"><a title="May 21" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5254')">21</a></td><td align="center" style="width: 14%;"><a title="May 22" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5255')">22</a></td><td align="center" style="width: 14%;"><a title="May 23" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5256')">23</a></td><td align="center" style="width: 14%; color: red;"><a title="May 24" style="color: red;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5257')">24</a></td><td align="center" style="width: 14%; color: red;"><a title="May 25" style="color: red;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5258')">25</a></td></tr><tr><td align="center" style="width: 14%;"><a title="May 26" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5259')">26</a></td><td align="center" style="width: 14%;"><a title="May 27" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5260')">27</a></td><td align="center" style="width: 14%;"><a title="May 28" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5261')">28</a></td><td align="center" style="width: 14%;"><a title="May 29" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5262')">29</a></td><td align="center" style="width: 14%;"><a title="May 30" style="color: black;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5263')">30</a></td><td align="center" style="width: 14%; color: red;"><a title="May 31" style="color: red;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5264')">31</a></td><td align="center" style="width: 14%; color: white;"><a title="June 1" style="color: white;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5265')">1</a></td></tr><tr><td align="center" style="width: 14%; color: white;"><a title="June 2" style="color: white;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5266')">2</a></td><td align="center" style="width: 14%; color: white;"><a title="June 3" style="color: white;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5267')">3</a></td><td align="center" style="width: 14%; color: white;"><a title="June 4" style="color: white;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5268')">4</a></td><td align="center" style="width: 14%; color: white;"><a title="June 5" style="color: white;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5269')">5</a></td><td align="center" style="width: 14%; color: white;"><a title="June 6" style="color: white;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5270')">6</a></td><td align="center" style="width: 14%; color: white;"><a title="June 7" style="color: white;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5271')">7</a></td><td align="center" style="width: 14%; color: white;"><a title="June 8" style="color: white;" href="javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','5272')">8</a></td></tr>
</tbody>
0141: 0-0:  $oFrom = _IEPropertyGet($oFrom, "innerhtml")
0142: 0-0:  Local $startFROM = StringInStr($oFrom, "Go to the previous month") + 54
0143: 0-0:  Local $finishFROM = $startFROM + 88
0144: 0-0:  $oFrom = StringMid($oFrom, $startFROM, 88)
0146: 0-0:  ConsoleWrite("prevMonthFROM:" & $oFrom & @CRLF)
prevMonthFROM:javascript:__doPostBack('ctl00$ContentPlaceHolder1$MatchsDateTerr1$cmbDateFrom','V5204')
0147: 0-0:  Return $oFrom
0192: 0-0:  exit
+>13:14:40 AutoIt3.exe ended.rc:0
+>13:14:40 AutoIt3Wrapper Finished.
>Exit code: 0    Time: 11.35
 
====START FAILS ====
>"C:\Program Files (x86)\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.exe" /run /prod /ErrorStdOut /in "C:\Users\nickza\Desktop\TSSS\TSSS-DataHelper.au3" /UserParams   
+>13:14:19 Starting AutoIt3Wrapper v.2.2.0.0 SciTE v.3.4.1.0   Keyboard:00000409  OS:WIN_81/  CPU:X64 OS:X64    Environment(Language:0409)
+>         SciTEDir => C:\Program Files (x86)\AutoIt3\SciTE   UserDir => C:\Users\nickza\AppData\Local\AutoIt v3\SciTE\AutoIt3Wrapper   SCITE_USERHOME => C:\Users\nickza\AppData\Local\AutoIt v3\SciTE
>Running AU3Check (3.3.10.2)  from:C:\Program Files (x86)\AutoIt3  input:C:\Users\nickza\Desktop\TSSS\TSSS-DataHelper.au3
+>13:14:19 AU3Check ended.rc:0
>Running:(3.3.10.2):C:\Program Files (x86)\AutoIt3\autoit3.exe "C:\Users\nickza\Desktop\TSSS\TSSS-DataHelper.au3"   
--> Press Ctrl+Alt+F5 to Restart or Ctrl+Break to Stop
!> Starting in DebugMode..
Line: @error-@extended: Line syntax
0001: 0-0: #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
0002: 0-0: #AutoIt3Wrapper_Icon=C:\Program Files (x86)\AutoIt3\Icons\au3.ico
0003: 0-0: #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
0008: 0-0: #AutoIt3Wrapper_run_debug_mode=Y
0009: 0-0: #include <IE.au3>
0010: 0-0: #include <Date.au3>
0011: 0-0: #include <Excel.au3>
0012: 0-0: #include <File.au3>
0013: 0-0: #include <Array.au3>
0014: 0-0: #include <Clipboard.au3>
0016: 0-0: Global $o_IE1
0017: 0-0: Global $ArrayCont = ""
0019: 0-0: Func _StringBetween2($s, $from, $to)
0025: 0-0: Const $navOpenInNewTab = 0x0800
0028: 0-0: Local $iDateCalc = _DateDiff("d", "2000/01/01 00:00:00", _NowCalc())
0031: 0-0: Local $iDaysx01 = _DateDaysInMonth(@YEAR, @MON - 1)
0034: 0-0: Local $iDaysx02 = _DateDaysInMonth(@YEAR, @MON - 2)
0037: 0-0: Local $iDaysx03 = _DateDaysInMonth(@YEAR, @MON - 3)
0040: 0-0: Local $iDaysx04 = _DateDaysInMonth(@YEAR, @MON - 4)
0043: 0-0: Local $iDaysx05 = _DateDaysInMonth(@YEAR, @MON - 5)
0046: 1-0: Local $iDaysx06 = _DateDaysInMonth(@YEAR, @MON - 6)
0049: 1-0: Local $iDaysx07 = _DateDaysInMonth(@YEAR, @MON - 7)
0052: 1-0: Local $iDays01 = _DateDaysInMonth(@YEAR, @MON)
0055: 0-0: Local $iDays02 = _DateDaysInMonth(@YEAR, @MON + 1)
0058: 0-0: Local $iDays03 = _DateDaysInMonth(@YEAR, @MON + 2)
0061: 0-0: Local $iDays04 = _DateDaysInMonth(@YEAR, @MON + 3)
0064: 0-0: Local $iDays05 = _DateDaysInMonth(@YEAR, @MON + 4)
0067: 0-0: Local $iDays06 = _DateDaysInMonth(@YEAR, @MON + 5)
0070: 0-0: Local $iDays07 = _DateDaysInMonth(@YEAR, @MON + 6)
0074: 0-0: Local $iCurrMonth = _DateDiff("d", "2000/01/01 00:00:00", @YEAR & "/" & @MON & "/" & "01 00:00:00")
0077: 0-0: Local $iMonthx01 = $iCurrMonth - $iDaysx01
0078: 0-0: Local $iMonthx02 = $iMonthx01 - $iDaysx02
0079: 0-0: Local $iMonthx03 = $iMonthx02 - $iDaysx03
0080: 0-0: Local $iMonthx04 = $iMonthx03 - $iDaysx04
0081: 0-0: Local $iMonthx05 = $iMonthx04 - $iDaysx05
0082: 0-0: Local $iMonthx06 = $iMonthx05 - $iDaysx06
0083: 0-0: Local $iMonthx07 = $iMonthx06 - $iDaysx07
0085: 0-0: Local $iMonth01 = $iCurrMonth + $iDays01
0086: 0-0: Local $iMonth02 = $iMonth01 + $iDays02
0087: 0-0: Local $iMonth03 = $iMonth02 + $iDays03
0088: 0-0: Local $iMonth04 = $iMonth03 + $iDays04
0089: 0-0: Local $iMonth05 = $iMonth04 + $iDays05
0090: 0-0: Local $iMonth06 = $iMonth05 + $iDays06
0091: 0-0: Local $iMonth07 = $iMonth06 + $iDays07
0092: 0-0: Local $dateTo = $iMonth07 - 1
0093: 0-0: Local $dateFrom = $iMonthx03
0095: 0-0: local $iCmd = ""
0096: 0-0: If $CmdLine[0] <> "" Then
0105: 0-0:  Local $sFilePath1 = "C:\Users\nickza\Desktop\TSSS\MASTER.xlsm" ;This file should already exist
0106: 0-0:  Local $message = "Please select Input MASTER.xlsm"
0107: 0-0:  Local $var = FileOpenDialog($message, @ScriptDir & "\", "XLSM (*.xlsm)", 1 + 2)
0108: 0-0: EndIf
0110: 0-0: If @error Then
0114: 0-0:  $var = StringReplace($var, "|", @CRLF)
0115: 0-0:  Local $szDrive, $szDir, $szFName, $szExt
0116: 0-0:  Local $TestPath = _PathSplit($var, $szDrive, $szDir, $szFName, $szExt)
0117: 0-0:  Local $sPath = $szDrive & $szDir
0118: 0-0:  MsgBox(4096, "", "You chose " & $var & @CRLF & "It is RECOMMENDED you use English Canada and short date format of yyyy-MM-dd before running this script.", 30)
0120: 0-0: EndIf
0123: 0-0: Func nextMonthFROM()
0137: 0-0: Func prevMonthFROM()
0151: 0-0: Func prevMonthTO()
0165: 0-0: Func nextMonthTO()
0178: 0-0: Func getData($sLink)
0290: 0-0: ProgressOn("TSSS-DataHelper", "Working on getting data from site", "Working...", 100, 100, 16)
0291: 0-0: ProgressSet(10)
0292: 0-0: getData("C3L")
0179: 0-0:  ClipPut("")
0180: 0-0:  Local $ArrayCont
0182: 0-0:  MsgBox(4096, "", "Getting data for: " & $sLink & " and saving to: " & $sPath & $sLink & ".xls", 5)
0183: 0-0:  $o_IE1 = _IECreate("[url=http://www.tsisports.ca/soccer/ligue14/index.aspx?champ]http://www.tsisports.ca/soccer/ligue14/index.aspx?champ[/url]=" & $sLink)
0186: 0-0:  Local $hIE1 = _IEPropertyGet($o_IE1, "hwnd")
0187: 0-0:  $o_IE1.Navigate2("[url=http://www.tsisports.ca/soccer/ligue14/l_cal2.aspx]http://www.tsisports.ca/soccer/ligue14/l_cal2.aspx[/url]")
0188: 0-0:  Sleep(2000)
0191: 0-0:  _IENavigate($o_IE1, prevMonthFROM())
0138: 0-0:  Local $chkFrom = "ContentPlaceHolder1_MatchsDateTerr1_cmbDateFrom"
0139: 0-0:  Local $oFrom = _IEGetObjById($o_IE1, $chkFrom)
--> IE.au3 T3.0-1 Warning from function _IEGetObjById, $_IEStatus_NoMatch (ContentPlaceHolder1_MatchsDateTerr1_cmbDateFrom)
0140: 7-2:  ConsoleWrite(_IEPropertyGet($oFrom, "innerhtml") & @CRLF)
--> IE.au3 T3.0-1 Error from function _IEPropertyGet, $_IEStatus_InvalidDataType
0
0141: 0-0:  $oFrom = _IEPropertyGet($oFrom, "innerhtml")
--> IE.au3 T3.0-1 Error from function _IEPropertyGet, $_IEStatus_InvalidDataType
0142: 3-1:  Local $startFROM = StringInStr($oFrom, "Go to the previous month") + 54
0143: 0-0:  Local $finishFROM = $startFROM + 88
0144: 0-0:  $oFrom = StringMid($oFrom, $startFROM, 88)
0146: 0-0:  ConsoleWrite("prevMonthFROM:" & $oFrom & @CRLF)
prevMonthFROM:
0147: 0-0:  Return $oFrom
--> IE.au3 T3.0-1 Error from function _IENavigate, $_IEStatus_COMError (-2147352567)
0192: 2--2147352567:  exit
+>13:14:39 AutoIt3.exe ended.rc:0
+>13:14:39 AutoIt3Wrapper Finished.
>Exit code: 0    Time: 20.33
====END FAILS====
 

===SOURCE===

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=C:\Program Files (x86)\AutoIt3\Icons\au3.ico
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
;------------------------------------------------------------------------------------------
; Script to help set logos of teams into TSSS
; v1.0
; May 29, 2013
;#AutoIt3Wrapper_run_debug_mode=Y
#include <IE.au3>
#include <Date.au3>
#include <Excel.au3>
#include <File.au3>
#include <Array.au3>
#include <Clipboard.au3>
#include <MsgBoxConstants.au3>

Global $o_IE1
Global $ArrayCont = ""

Func _StringBetween2($s, $from, $to)
    $x = StringInStr($s, $from) + StringLen($from)
    $y = StringInStr(StringTrimLeft($s, $x), $to)
    Return StringMid($s, $x, $y)
EndFunc   ;==>_StringBetween2

Const $navOpenInNewTab = 0x0800

; Calculated the number of DAYS since TSIStart (2000/01/01 00:00:00)
Local $iDateCalc = _DateDiff('d', "2000/01/01 00:00:00", _NowCalc())
;MsgBox(4096, _NowCalc(), "Number of days since 2000/01/01: " & $iDateCalc)

Local $iDaysx01 = _DateDaysInMonth(@YEAR, @MON - 1)
;MsgBox(4096, "Days in Month", @YEAR & " " & @MON - 1 & " " & " has " & String($iDaysx01) & " days in it.")

Local $iDaysx02 = _DateDaysInMonth(@YEAR, @MON - 2)
;MsgBox(4096, "Days in Month", @YEAR & " " & @MON - 2 & " " & " has " & String($iDaysx02) & " days in it.")

Local $iDaysx03 = _DateDaysInMonth(@YEAR, @MON - 3)
;MsgBox(4096, "Days in Month", @YEAR & " " & @MON - 3 & " " & " has " & String($iDaysx03) & " days in it.")

Local $iDaysx04 = _DateDaysInMonth(@YEAR, @MON - 4)
;MsgBox(4096, "Days in Month", @YEAR & " " & @MON - 4 & " " & " has " & String($iDaysx03) & " days in it.")

Local $iDaysx05 = _DateDaysInMonth(@YEAR, @MON - 5)
;MsgBox(4096, "Days in Month", @YEAR & " " & @MON - 5 & " " & " has " & String($iDaysx03) & " days in it.")

Local $iDaysx06 = _DateDaysInMonth(@YEAR, @MON - 6)
;MsgBox(4096, "Days in Month", @YEAR & " " & @MON - 6 & " " & " has " & String($iDaysx03) & " days in it.")

Local $iDaysx07 = _DateDaysInMonth(@YEAR, @MON - 7)
;MsgBox(4096, "Days in Month", @YEAR & " " & @MON - 7 & " " & " has " & String($iDaysx03) & " days in it.")

Local $iDays01 = _DateDaysInMonth(@YEAR, @MON)
;MsgBox(4096, "Days in Month", @YEAR & " " & @MON & " " & " has " & String($iDays01) & " days in it.")

Local $iDays02 = _DateDaysInMonth(@YEAR, @MON + 1)
;MsgBox(4096, "Days in Month", @YEAR & " " & @MON + 1 & " " & " has " & String($iDays02) & " days in it.")

Local $iDays03 = _DateDaysInMonth(@YEAR, @MON + 2)
;MsgBox(4096, "Days in Month", @YEAR & " " & @MON + 2 & " " & " has " & String($iDays03) & " days in it.")

Local $iDays04 = _DateDaysInMonth(@YEAR, @MON + 3)
;MsgBox(4096, "Days in Month", @YEAR & " " & @MON + 3 & " " & " has " & String($iDays04) & " days in it.")

Local $iDays05 = _DateDaysInMonth(@YEAR, @MON + 4)
;MsgBox(4096, "Days in Month", @YEAR & " " & @MON + 4 & " " & " has " & String($iDays05) & " days in it.")

Local $iDays06 = _DateDaysInMonth(@YEAR, @MON + 5)
;MsgBox(4096, "Days in Month", @YEAR & " " & @MON + 5 & " " & " has " & String($iDays06) & " days in it.")

Local $iDays07 = _DateDaysInMonth(@YEAR, @MON + 6)
;MsgBox(4096, "Days in Month", @YEAR & " " & @MON + 6 & " " & " has " & String($iDays07) & " days in it.")

; Calculated the number of DAYS since TSIStart (2000/01/01 00:00:00) for current month
Local $iCurrMonth = _DateDiff('d', "2000/01/01 00:00:00", @YEAR & "/" & @MON & "/" & "01 00:00:00")
;MsgBox(4096, _NowCalc(), "Number of days since 2000/01/01 and " & @YEAR & "/" & @MON & "/" & "01 00:00:00" &": " & $iCurrMonth,5)

Local $iMonthx01 = $iCurrMonth - $iDaysx01
Local $iMonthx02 = $iMonthx01 - $iDaysx02
Local $iMonthx03 = $iMonthx02 - $iDaysx03
Local $iMonthx04 = $iMonthx03 - $iDaysx04
Local $iMonthx05 = $iMonthx04 - $iDaysx05
Local $iMonthx06 = $iMonthx05 - $iDaysx06
Local $iMonthx07 = $iMonthx06 - $iDaysx07

Local $iMonth01 = $iCurrMonth + $iDays01
Local $iMonth02 = $iMonth01 + $iDays02
Local $iMonth03 = $iMonth02 + $iDays03
Local $iMonth04 = $iMonth03 + $iDays04
Local $iMonth05 = $iMonth04 + $iDays05
Local $iMonth06 = $iMonth05 + $iDays06
Local $iMonth07 = $iMonth06 + $iDays07
Local $dateTo = $iMonth07 - 1
Local $dateFrom = $iMonthx03

local $iCmd = ""
If $CmdLine[0] <> "" Then
    $iCmd = 1
    $var = $CmdLine[1]
    if FileExists($var) Then
    Else
        MsgBox(4096, @AutoItExe & "Error!", "Input File not found chosen")
        Exit
    EndIf
Else
    Local $sFilePath1 = "C:\Users\nickza\Desktop\TSSS\MASTER.xlsm" ;This file should already exist
    Local $message = "Please select Input MASTER.xlsm"
    Local $var = FileOpenDialog($message, @ScriptDir & "\", "XLSM (*.xlsm)", 1 + 2)
EndIf

If @error Then
    MsgBox(4096, "Error!", "No File(s) chosen")
    Exit
Else
    $var = StringReplace($var, "|", @CRLF)
    Local $szDrive, $szDir, $szFName, $szExt
    Local $TestPath = _PathSplit($var, $szDrive, $szDir, $szFName, $szExt)
    Local $sPath = $szDrive & $szDir
    ; Show current date/time in the pc's format
    $myDate = @YEAR & "-" & @MON & "-" & @MDAY
    if _NowDate() <> $myDate Then
        MsgBox(4096, "", "You chose " & $var & @CRLF & "It is RECOMMENDED you use English Canada and short date format of yyyy-MM-dd before running this script. You are currently using: " & _NowDate() & "." & @CRLF &"Please change your regional settings. Aborting script now...", 30)
        Exit
    Else
        MsgBox(4096, "", "You chose " & $var, 5)
    EndIf
EndIf

;NOT USED
Func nextMonthFROM()
    Local $chkFrom = "ContentPlaceHolder1_MatchsDateTerr1_cmbDateFrom"
    Local $oFrom = _IEGetObjById($o_IE1, $chkFrom)
    ;ConsoleWrite(_IEPropertyGet($oFrom, "innerhtml") & @CRLF)
    $oFrom = _IEPropertyGet($oFrom, "innerhtml")
    Local $startFROM = StringInStr($oFrom, "Go to the next month") + 49
    Local $finishFROM = $startFROM + 89
    $oFrom = StringMid($oFrom, $startFROM, 89)
    ;MsgBox(0,"FROM", $oFrom)
    ConsoleWrite("nextMonthFROM:" & $oFrom & @CRLF)
    Return $oFrom
EndFunc   ;==>nextMonthFROM

;USED
Func prevMonthFROM()
    Local $chkFrom = "ContentPlaceHolder1_MatchsDateTerr1_cmbDateFrom"
    Local $oFrom = _IEGetObjById($o_IE1, $chkFrom)
    ;ConsoleWrite(_IEPropertyGet($oFrom, "innerhtml") & @CRLF)
    $oFrom = _IEPropertyGet($oFrom, "innerhtml")
    Local $startFROM = StringInStr($oFrom, "Go to the previous month") + 54
    Local $finishFROM = $startFROM + 88
    $oFrom = StringMid($oFrom, $startFROM, 88)
    ;MsgBox(0,"FROM", $oFrom)
    ConsoleWrite("prevMonthFROM:" & $oFrom & @CRLF)
    Return $oFrom
EndFunc   ;==>prevMonthFROM

;NOT USED
Func prevMonthTO()
    Local $chkTo = "ContentPlaceHolder1_MatchsDateTerr1_cmbDateTo"
    Local $oTo = _IEGetObjById($o_IE1, $chkTo)
    ;ConsoleWrite(_IEPropertyGet($oTo, "innerhtml") & @CRLF)
    $oTo = _IEPropertyGet($oTo, "innerhtml")
    Local $startTO = StringInStr($oTo, "Go to the previous month") + 53
    Local $finishTO = $startTO + 87
    $oTo = StringMid($oTo, $startTO, 87)
    ;MsgBox(0,"TO", $oTo)
    ConsoleWrite("prevMonthTO:" & $oTo & @CRLF)
    Return $oTo
EndFunc   ;==>prevMonthTO

;USED
Func nextMonthTO()
    Local $chkTo = "ContentPlaceHolder1_MatchsDateTerr1_cmbDateTo"
    Local $oTo = _IEGetObjById($o_IE1, $chkTo)
    ;ConsoleWrite(_IEPropertyGet($oTo, "innerhtml") & @CRLF)
    $oTo = _IEPropertyGet($oTo, "innerhtml")
    Local $startTO = StringInStr($oTo, "Go to the next month") + 50
    Local $finishTO = $startTO + 86
    $oTo = StringMid($oTo, $startTO, 86)
    ;MsgBox(0,"TO", $oTo)
    ConsoleWrite("nextMonthTO:" & $oTo & @CRLF)
    Return $oTo
EndFunc   ;==>nextMonthTO

Func getData($sLink)
    ClipPut("")
    Local $ArrayCont
    ;MsgBox(4096, "", "Getting data for: " & $sLink & " and saving to: " & $sPath & $sLink & ".xls" & @CRLF & "Previous Monthx01:" & $iMonthx01 & @CRLF & "Previous Monthx02:" & $iMonthx02 & @CRLF & "Previous Monthx03:" & $iMonthx03 & @CRLF & "Month01:" & $iMonth01 & @CRLF & "Month02:" & $iMonth02 & @CRLF & "Month03:" & $iMonth03 & @CRLF & "Month04:" & $iMonth04 & @CRLF & "Month05:" & $iMonth05 & @CRLF & "Month06:" & $iMonth06 & @CRLF & "Month07:" & $iMonth07 & @CRLF & "Date To:" & $dateTo & @CRLF & "Date From:" & $dateFrom, 10)
    MsgBox(4096, "", "Getting data for: " & $sLink & " and saving to: " & $sPath & $sLink & ".xls", 5)
    $o_IE1 = _IECreate('http://www.tsisports.ca/soccer/ligue14/index.aspx?champ=' & $sLink)
    ; Get a handle to the IE window.

    Local $hIE1 = _IEPropertyGet($o_IE1, "hwnd")
    $o_IE1.Navigate2('http://www.tsisports.ca/soccer/ligue14/l_cal2.aspx')

;If IsObj($o_IE1) Then
;    MsgBox($MB_SYSTEMMODAL, "", "The variable is an object")
;Else
;    MsgBox($MB_SYSTEMMODAL, "", "The variable is not an object")
;EndIf


    Sleep(2000)
    ;SET THE FROM DATE
    ;_IENavigate($o_IE1,prevMonthFROM())
    _IENavigate($o_IE1, prevMonthFROM())
;   exit
    _IENavigate($o_IE1, prevMonthFROM())
    _IENavigate($o_IE1, prevMonthFROM())
    _IENavigate($o_IE1, prevMonthFROM())
    Local $dateFrom = prevMonthFROM()
    $dateFrom = StringReplace($dateFrom, "','V", "','")
    ConsoleWrite("DATE FROM:" & $dateFrom & @CRLF)
    ;MsgBox (0,"DATE FROM", $dateFrom)
    _IENavigate($o_IE1, prevMonthFROM())
    _IENavigate($o_IE1, $dateFrom)
    ;SET THE TO DATE
    ;_IENavigate($o_IE1,nextMonthTO())
    _IENavigate($o_IE1, nextMonthTO())
    _IENavigate($o_IE1, nextMonthTO())
    _IENavigate($o_IE1, nextMonthTO())
    _IENavigate($o_IE1, nextMonthTO())
    _IENavigate($o_IE1, nextMonthTO())
    _IENavigate($o_IE1, prevMonthFROM())
    Local $dateTo = nextMonthTO()
    $dateTo = StringReplace($dateTo, "','V", "','")
    ConsoleWrite("DATE TO:" & $dateTo & @CRLF)
    ;MsgBox (0,"DATE TO", $dateTo)
    _IENavigate($o_IE1, nextMonthTO())
    _IENavigate($o_IE1, $dateTo)
    ;Submit the data
    Local $oSubmit = _IEGetObjByName($o_IE1, "ctl00$ContentPlaceHolder1$MatchsDateTerr1$Button1")
    ;MsgBox("","",$oSubmit)
    _IEAction($oSubmit, "click")
    _IELoadWait($o_IE1)
    $oTable = _IETableGetCollection($o_IE1)
    Local $iNumTables = @extended
    ;   MsgBox(0, "Table Info", "There are " & $iNumTables & " tables on the page")
    ;$htmltxt = _IEBodyReadHTML ( $o_IE1)
    ;MsgBox(0,'t0',$htmltxt)
    ;$aTableData = StringRegExp($htmltxt,'(?<=>)[^<\v"]+(?=<)',3)
    ;_ArrayDisplay($aTableData)
    Local $begin = TimerInit() ;init timer
    ;$oTable = _IETableGetCollection($o_IE1, 35)
    $oTable = _IETableGetCollection($o_IE1, $iNumTables - 2)
    Local $dif = TimerDiff($begin) ; stop timer
    MsgBox(0, "DONE", _NowCalc() & @CRLF & "It took: " & Round($dif / 1000, 1) & " seconds to process." & @CRLF & "PRESS OK TO CONTINUE...", 5)
    Local $begin = TimerInit() ;init timer
    $aTableData = _IETableWriteToArray($oTable, True)
    Local $dif = TimerDiff($begin) ; stop timer
    MsgBox(0, "DONE", _NowCalc() & @CRLF & "It took: " & Round($dif / 1000, 1) & " seconds to process." & @CRLF & "PRESS OK TO CONTINUE...", 5)
    $rows = UBound($aTableData)
    $cols = UBound($aTableData, 2)
    ;ProgressOn("Progress Bar", "Sample progress bar", "Working...")
    For $m = 0 To $rows - 1
        ;   ProgressSet($m)
        For $n = 0 To $cols - 1
            $ArrayCont = $ArrayCont & Chr(9) & $aTableData[$m][$n]
        Next
        $ArrayCont = $ArrayCont & @CRLF
    Next
    ; ProgressSet(100, "Done!")
    ; Sleep(2000)
    ; ProgressOff()
    ClipPut($ArrayCont)
    If (ClipGet() <> "") Then

        Local $oExcel = _ExcelBookNew()
        ;   _ExcelWriteSheetFromArray($oExcel,$aTableData)
        ;   Exit
        ;Sleep(5000)
        WinActivate("Book1 -", "")
        WinWaitActive("Book1 -", "")
        Local $sFormat = "@" ;Format String tells _ExcelNumberFormat to make it a TEXT
        ;_ExcelNumberFormat($oExcel, $sFormat, 1, 36, 65000, 36) ;Start on Row 1, Start on Column 1, End on Row 5, End on Column 5
        _ExcelNumberFormat($oExcel, $sFormat, 1, 10, 65000, 10) ;Start on Row 1, Start on Column 1, End on Row 5, End on Column 5
        Send("^v")
        ;   Exit
        Sleep(2000)
        $oExcel.Cells.Select
        $oExcel.Cells.EntireColumn.AutoFit
        ;   $oExcel.Columns("A:AB").Select
        $oExcel.Columns("A:B").Select
        $oExcel.Selection.Delete; Shift:=xlToLeft
        $oExcel.Columns("L:IV").Select
        $oExcel.Selection.Delete; Shift:=xlToLeft
        $lastCell = $oExcel.Intersect($oExcel.ActiveSheet.Cells(1).Find("*", Default, $xlValues, $xlWhole, $xlByRows, $xlPrevious).EntireRow, $oExcel.ActiveSheet.Cells(1).Find("*", Default, $xlValues, $xlWhole, $xlByColumns, $xlPrevious).EntireColumn)
        Local $rowstoprocess = $lastCell.Row
        $oExcel.Rows($lastCell.Row + 1 & ":65000").Select
        $oExcel.Selection.Delete; Shift:=xlToLeft
        $oExcel.Range("A1").Select
        $oExcel.Cells.Select
        $oExcel.Cells.EntireColumn.AutoFit
        $oExcel.Range("A1").Select
        ;MsgBox(0, "Exiting", "Press OK to Save File and Exit")
        _ExcelBookSaveAs($oExcel, $sPath & $sLink & ".xls", "xls", 0, 1) ; Now we save it into the temp directory; overwrite existing file if necessary
        _ExcelBookClose($oExcel) ; And finally we close out
        _IEQuit($o_IE1)
    Else
        MsgBox(0, "CLIPBOARD is BLANK", "Unable to copy data to clipboard from PTS for:" & $sLink & ", aborting script now")
        Exit
    EndIf
EndFunc   ;==>getData

ProgressOn("TSSS-DataHelper", "Working on getting data from site", "Working...", 100, 100, 16)
ProgressSet(10)
getData("C3L")
ProgressSet(33)
getData("CLE")
ProgressSet(66)
getData("CLV")
ProgressSet(99)
ProgressSet(100, "Done!")
Sleep(2000)
ProgressOff()

ProgressOn("TSSS-DataHelper", "Now running MASTER.XLSM", "Working...", 100, 100, 16)
ProgressSet(50)
;MsgBox(0, "Exiting", "DONE",5)
Local $oExcel = _ExcelBookOpen($var)
;Now run the import script which will also export all the data as needed
Send("^i")
ProgressSet(100, "Done!")
Sleep(2000)
ProgressOff()
;------------------------------------------------------------------------------------------

===END SOURCE===
Edited by bullmoose20
Added code tags
Link to comment
Share on other sites
  • Moderators
JLogan3o13 Universalist

JLogan3o13

Posted
  • Moderators
Posted

Can you please use code tags, rather than the word walls? See here how to do it: http://www.autoitscript.com/forum/index.php?showtopic=150872

It will make it much more easy for people to assist, I for one got lost somewhere around chapter 4 ;)

"Profanity is the last vestige of the feeble mind. For the man who cannot express himself forcibly through intellect must do so through shock and awe" - Spencer W. Kimball

How to get your question answered on this forum!

Link to comment
Share on other sites
mLipok Universalist

mLipok

Posted
Posted (edited)

this is a bad way to use it:

$o_IE1 = _IECreate('[url=http://www.tsisports.ca/soccer/ligue14/index.aspx?champ=]http://www.tsisports.ca/soccer/ligue14/index.aspx?champ=[/url]' & $sLink)

try this:

$o_IE1 = _IECreate('http://www.tsisports.ca/soccer/ligue14/index.aspx?champ=' & $sLink)
Edited by mLipok

Signature beginning:
* Please remember: "AutoIt"..... *  Wondering who uses AutoIt and what it can be used for ? * Forum Rules *
* ADO.au3 UDF * POP3.au3 UDF * XML.au3 UDF * IE on Windows 11 * How to ask ChatGPT for AutoIt Code * for other useful stuff click the following button:

Spoiler

Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. 

My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * Chilkatsoft.au3 UDF * TeamViewer.au3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API * ErrorLog.au3 UDF - A logging Library * Include Dependency Tree (Tool for analyzing script relations) * Show_Macro_Values.au3 *

 

My contribution to others projects or UDF based on  others projects: * _sql.au3 UDF  * POP3.au3 UDF *  RTF Printer - UDF * XML.au3 UDF * ADO.au3 UDF * SMTP Mailer UDF * Dual Monitor resolution detection * * 2GUI on Dual Monitor System * _SciLexer.au3 UDF * SciTE - Lexer for console pane * 

Useful links: * Forum Rules * Forum etiquette *  Forum Information and FAQs * How to post code on the forum * AutoIt Online Documentation * AutoIt Online Beta Documentation * SciTE4AutoIt3 getting started * Convert text blocks to AutoIt code * Games made in Autoit * Programming related sites * Polish AutoIt Tutorial * DllCall Code Generator * 

Wiki: * Expand your knowledge - AutoIt Wiki * Collection of User Defined Functions * How to use HelpFile * Good coding practices in AutoIt * 

OpenOffice/LibreOffice/XLS Related: WriterDemo.au3 * XLS/MDB from scratch with ADOX

IE Related:  * How to use IE.au3  UDF with  AutoIt v3.3.14.x * Why isn't Autoit able to click a Javascript Dialog? * Clicking javascript button with no ID * IE document >> save as MHT file * IETab Switcher (by LarsJ ) * HTML Entities * _IEquerySelectorAll() (by uncommon) * IE in TaskScheduler * IE Embedded Control Versioning (use IE9+ and HTML5 in a GUI) * PDF Related: * How to get reference to PDF object embeded in IE * IE on Windows 11 * 

I encourage you to read: * Global Vars * Best Coding Practices * Please explain code used in Help file for several File functions * OOP-like approach in AutoIt * UDF-Spec Questions *  EXAMPLE: How To Catch ConsoleWrite() output to a file or to CMD *

I also encourage you to check awesome @trancexx code:  * Create COM objects from modules without any demand on user to register anything. * Another COM object registering stuff * OnHungApp handler * Avoid "AutoIt Error" message box in unknown errors  * HTML editor * 

winhttp.au3 related : * https://www.autoitscript.com/forum/topic/206771-winhttpau3-download-problem-youre-speaking-plain-http-to-an-ssl-enabled-server-port/

"Homo sum; humani nil a me alienum puto" - Publius Terentius Afer
"Program are meant to be read by humans and only incidentally for computers and execute" - Donald Knuth, "The Art of Computer Programming"
:naughty:  :ranting:, be  :) and       \\//_.

Anticipating Errors :  "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty."

Signature last update: 2023-04-24

Link to comment
Share on other sites
bullmoose20 Seeker

bullmoose20

Posted
  • Author
Posted

this is a bad way to use it:

$o_IE1 = _IECreate('[url=http://www.tsisports.ca/soccer/ligue14/index.aspx?champ=]http://www.tsisports.ca/soccer/ligue14/index.aspx?champ=[/url]' & $sLink)
try this:

$o_IE1 = _IECreate('http://www.tsisports.ca/soccer/ligue14/index.aspx?champ=' & $sLink)

Someone tagged my code as "code", and the url did not come through properly. I have since modified the post to reflect the proper links that I am using which is just like yours above, but this does not seem to be the problem.

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share
Go to topic listing

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...