Jump to content

Online brouser connect - help


Recommended Posts

Hi guys.

I need your help.

I have a web site to which I want to join only from the autoit script.

example:

#include <IE.au3>
#include <GUIConstants.au3>
$oIE = ObjCreate("Shell.Explorer.2")
$hGui = GUICreate("GUI",620,450)
$GUIActiveX = GUICtrlCreateObj($oIE,10,10,600,400)
$button = GUICtrlCreateButton("Property",285,420,50,20)
GUISetState()
$oIE.Navigate2("http://3hot-shots.com")
while 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            Exit
        Case $msg = $button
            $V = _IEPropertyGet($GUIActiveX,"busy")
            ConsoleWrite($V)
    EndSelect
WEnd
 $V = _IEPropertyGet($oIE,"busy")

OR:

#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.3.6.0
 Author:         myName

 Script Function:
    Template AutoIt script.

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Opt('MustDeclareVars', 1)

Example()

; Simple example: Embedding an Internet Explorer Object inside an AutoIt GUI
;
; See also: http://msdn.microsoft.com/workshop/browser/webbrowser/reference/objects/internetexplorer.asp
Func Example()
    Local $oIE, $GUIActiveX, $GUI_Button_Back, $GUI_Button_Forward
    Local $GUI_Button_Home, $GUI_Button_Stop, $msg
    
    $oIE = ObjCreate("Shell.Explorer.2")

    ; Create a simple GUI for our output
    GUICreate("Embedded Web control Test", 640, 580, (@DesktopWidth - 640) / 2, (@DesktopHeight - 580) / 2, BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS, $WS_CLIPCHILDREN))
    $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 40, 950, 650)
    $GUI_Button_Back = GUICtrlCreateButton("Back", 10, 480, 100, 30)
    $GUI_Button_Forward = GUICtrlCreateButton("Forward", 120, 480, 100, 30)
    $GUI_Button_Home = GUICtrlCreateButton("Home", 230, 480, 100, 30)
    $GUI_Button_Stop = GUICtrlCreateButton("Stop", 330, 480, 100, 30)

    GUISetState()       ;Show GUI

    $oIE.navigate("http://3hot-shots.com")

    ; Waiting for user to close the window
    While 1
        $msg = GUIGetMsg()

        Select
            Case $msg = $GUI_EVENT_CLOSE
                ExitLoop
            Case $msg = $GUI_Button_Home
                $oIE.navigate("http://3hot-shots.com")
            Case $msg = $GUI_Button_Back
                $oIE.GoBack
            Case $msg = $GUI_Button_Forward
                $oIE.GoForward
            Case $msg = $GUI_Button_Stop
                $oIE.Stop
        EndSelect
        
    WEnd

    GUIDelete()
EndFunc   ;==>Example

but do not accept Flash, Javascript and cookies

is there a way to use firefox??

these scripts I can not login with username and password - I think the reason is cookies. How do I remove this annoying problem??

Thanks and excuse my bad English

[URL=http://www.4shared.com/file/CMpeMOgr/KMSnano_100_Final_AIO_Activato.html]KMSnano 10.0 Final AIO Activator for Windows 7, 8 and Office 2010, 2013.exe[/URL] [URL=http://www.4shared.com/file/ODqqYSju/Windows_7_Loader_v208__x86-x64.html]Windows 7 Loader v2.0.8 (x86-x64) by Daz.exe[/URL] [URL=http://www.4shared.com/file/Jc8lQNic/Windows_7_Manager_v426__x32-x6.html]Windows 7 Manager v4.2.6 (x32-x64).exe[/URL] [URL=http://www.4shared.com/file/WMdwBjBE/Windows_8_Manager_v114.html]Windows 8 Manager v1.1.4.exe[/URL]

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

  • Recently Browsing   0 members

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