Sign in to follow this  
Followers 0
Golbez

Webpage wont load?

6 posts in this topic

soo im trying to make something that will load a webpage i use to watch tv on:  http://www.dishanywhere.com/live-tv

i pay for dish network soo i dont see how this would breaking any rules, im just simply macroing something so i dont have to do it manually every time.

soo ive come to realised chrome crashes alot so i figured id try and make myself a code that would open the webpage. then navigate to the tv site.  then maximize it but double clicking on the middle of the video.  i also wanted to make this code because i have to have an active window connected to the tv site for some reason.  if i was to close the webpage it will close the popout thing for the tv.

k my problem.

1. i keep getting a pop up saying to use internet explorer 11...

asda.png

i have internet explorer 11...

123123123fd.png

 

2. it seems to just sit at initializing, not sure why.  it works fine when i open internet explorer myself and do it

123123.jpg

 

my code so far

#RequireAdmin
#include <Misc.au3>
#include <GUIedit.au3>
#include <GDIPlus.au3>
#include <GUIbutton.au3>
#include <GUIConstants.au3>
#include <FileConstants.au3>
#include <editconstants.au3>
#include <GUIConstantsEx.au3>
#include <ComboConstants.au3>
#include <StaticConstants.au3>
#include <ButtonConstants.au3>
#include <WindowsConstants.au3>


Global $site = "http://www.dishanywhere.com/live-tv"
Global $GUIWidth = 1442
Global $GUIHeight = 802
Global $BrowsWidth = 1440
Global $BrowsHeight = 800
Global $title = "Dish Network TV"
Global $account = "************"
Global $password = "***********"
Global $ClickContiuneX = 543
Global $ClickContiuneY = 220
Global $ClickLiveTVx = 535
Global $ClickLiveTVy = 29
Global $classID = "Internet Explorer_Server"

Global $sleepSTART = 1000
Global $sleepContinue = 3000
Global $sleepLiveTV = 5000


Opt("GUIOnEventMode", 1)    ;1
Opt("MouseCoordMode", 2);1=absolute, 0=relative, 2=client
Opt("PixelCoordMode", 2);1=absolute, 0=relative, 2=client
Opt("WinTitleMatchMode", 3) ;1=start, 2=subStr, 3=exact, 4=advanced, -1 to -4=Nocase


#Region ;**** GUI  ****
_GDIPlus_Startup()
$oIE = ObjCreate("Shell.Explorer.2")
$Form1 = GUICreate($title, $GUIWidth, $GUIHeight ,(@DesktopWidth-$GUIWidth)/2, (@DesktopHeight-$GUIHeight)/2)
$GUIActiveX = GUICtrlCreateObj ( $oIE, 0, 0, $BrowsWidth, $BrowsHeight)
GUISetOnEvent($GUI_EVENT_CLOSE, "Terminate", $Form1)
GUISetState ()
$oIE.navigate($site)
#EndRegion ;**** GUI ****

While 1
        Switch GUIGetMsg()
            Case $GUI_EVENT_CLOSE
                Terminate()
        EndSwitch
    WEnd

Func start()
    Sleep($sleepSTART)
    ControlClick($title, "", "", "left", 1, $ClickContiuneX, $ClickContiuneY)
    Sleep($sleepContinue)
    ControlClick($title, "", "", "left", 1, $ClickLiveTVx, $ClickLiveTVy)
    Sleep($sleepLiveTV)

EndFunc
Func Terminate()
    GUIDelete ($Form1)
    Exit
EndFunc   ;==>Terminate

Share this post


Link to post
Share on other sites



Suggest that you read >this thread. I seem to recall several other similar discussions in the forums.

Share this post


Link to post
Share on other sites

#3 ·  Posted (edited)

Suggest that you read >this thread. I seem to recall several other similar discussions in the forums.

 

ty im sure this is the answer i need. i just have to read it a few more times to understand what i need to do. :)

 

thanks dude!!!! you are the best!! got it working!

#RequireAdmin
#include <IE.au3>
#include <Misc.au3>
#include <GUIedit.au3>
#include <GDIPlus.au3>
#include <Process.au3>
#include <GUIbutton.au3>
#include <GUIConstants.au3>
#include <FileConstants.au3>
#include <editconstants.au3>
#include <GUIConstantsEx.au3>
#include <ComboConstants.au3>
#include <StaticConstants.au3>
#include <ButtonConstants.au3>
#include <WindowsConstants.au3>

Local $regValue = "0x2AF8"
If RegRead("HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION", _ProcessGetName(@AutoItPID), "REG_DWORD") <> $regValue) Then
    RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION", _ProcessGetName(@AutoItPID), "REG_DWORD", $regValue)
EndIf

If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\MicrosoftInternet Explorer\MAIN\FeatureControl\FEATURE_BROWSER_EMULATION", _ProcessGetName(@AutoItPID), "REG_DWORD") <> $regValue) Then
    RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\MicrosoftInternet Explorer\MAIN\FeatureControl\FEATURE_BROWSER_EMULATION", _ProcessGetName(@AutoItPID), "REG_DWORD", $regValue)
EndIf

Global $site = "http://www.dishanywhere.com/live-tv"
Global $GUIWidth = 1175
Global $GUIHeight = 802
Global $BrowsWidth = 1440
Global $BrowsHeight = 1000
Global $title = "Dish Network TV"
Global $account = "*************"
Global $password = "************"
Global $ClickContiuneX = 543
Global $ClickContiuneY = 220
Global $ClickLiveTVx = 535
Global $ClickLiveTVy = 29
Global $maxX = 500
Global $maxY = 200
Global $guiLEFT = -125
Global $guiTOP = -180

Global $classID = "SlingPlayer_NormalWnd"

Global $sleepSTART = 1000
Global $sleepContinue = 3000
Global $sleepLiveTV = 5000

Global $Form1

Opt("GUIOnEventMode", 1)    ;1
Opt("MouseCoordMode", 2)    ;1=absolute, 0=relative, 2=client
Opt("PixelCoordMode", 2)    ;1=absolute, 0=relative, 2=client
Opt("WinTitleMatchMode", 3) ;1=start, 2=subStr, 3=exact, 4=advanced, -1 to -4=Nocase

_GUIFUNZ()

Func _GUIFUNZ()
    #Region ;**** GUI  ****
        _GDIPlus_Startup()
        $oIE = ObjCreate("Shell.Explorer.2")
        $Form1 = GUICreate($title, $GUIWidth, $GUIHeight ,(@DesktopWidth-$GUIWidth)/2, (@DesktopHeight-$GUIHeight)/2)
        $GUIActiveX = GUICtrlCreateObj ( $oIE, $guiLEFT, $guiTOP, $BrowsWidth, $BrowsHeight)
        GUISetOnEvent($GUI_EVENT_CLOSE, "Terminate", $Form1)
        GUISetState ()
        $oIE.navigate($site)
    #EndRegion ;**** GUI ****

    While 1
        Switch GUIGetMsg()
            Case $GUI_EVENT_CLOSE
                Terminate()
        EndSwitch
    WEnd
EndFunc
Func start()
    Sleep($sleepSTART)
    ControlClick($title, "", "", "left", 1, $ClickContiuneX, $ClickContiuneY)
    Sleep($sleepContinue)
    ControlClick($title, "", "", "left", 1, $ClickLiveTVx, $ClickLiveTVy)
    Sleep($sleepLiveTV)
EndFunc
Func Terminate()
    GUIDelete ($Form1)
    Exit
EndFunc   ;==>Terminate
Edited by Golbez

Share this post


Link to post
Share on other sites

is there a way to hide the taskbar icon, not the tray icon. i want the tray icon. i do not want the taskbar icon.

Share this post


Link to post
Share on other sites

Yes... See this >thread.

 

thanks again!!!  i was searching the forum for hours with no luck!

Share this post


Link to post
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
Sign in to follow this  
Followers 0