Jump to content

Broken script


 Share

Recommended Posts

I have broke my script in someplace i dont know were...

It did work... i closed it when for a drink came back up tryed to load it and it crashed autoit... i got that message asking if i wanted to send error report... i get this error everytime i run it can anybody help...

#include <GUIConstants.au3>
#include <GUIStatusbar.au3>
#include <IE.au3>
#include <GuiCombo.au3>
#include <misc.au3>

_Singleton("Easy webbrowser")

Opt("GUIResizeMode", 1)
Opt("GUICloseOnEsc", 1)
Opt("GUIOnEventMode", 1)
HotKeySet("{enter}", "go")


Global $BRightEdge[2] = [600, -1], $S_Text[2] = ["", ""]
Global $Form1, $Blank = ""

$Home = "http://www.Autoitscript.com"

_IEErrorHandlerRegister()
$oIE = _IECreateEmbedded()
$Form1 = GUICreate("Easy webbrowser", 689, 520, 193, 115, $WS_SIZEBOX + $WS_MINIMIZEBOX + $WS_CAPTION + $WS_POPUP + $WS_SYSMENU + $WS_MAXIMIZEBOX)
$Net = GUICtrlCreateObj($oIE, 5, 5, 680, 430)
_IENavigate($oIE, $Home, 0)
$Go = GUICtrlCreateButton("Go", 336, 464, 75, 25, 0, $BS_ICON)
GUICtrlSetTip(-1, "Go to url above")
$Stop = GUICtrlCreateButton("Stop", 256, 464, 75, 25, 0, $BS_ICON)
GUICtrlSetTip(-1, "Stops loading the page")
$Print = GUICtrlCreateButton("Print", 96, 464, 75, 25, 0, $BS_ICON)
GUICtrlSetTip(-1, "Prints the Page")
$Home = GUICtrlCreateButton("Home", 16, 464, 75, 25, 0, $BS_ICON)
GUICtrlSetTip(-1, "Go to Homepage")
$Favorites = GUICtrlCreateButton("Favorites", 176, 464, 75, 25, 0, $BS_ICON)
GUICtrlSetTip(-1, "Opens Favorites Window")
$Url = GUICtrlCreateInput("", 17, 440, 399, 21)
$Searchtext = GUICtrlCreateInput("Search for... Supported by Google(C)", 432, 440, 185, 21)
$Search = GUICtrlCreateButton("Search", 488, 464, 83, 25, 0, $BS_ICON)
$Statusbar = _GUICtrlStatusBarCreate($Form1, $BRightEdge, $S_Text)
$progress = _GUICtrlStatusBarCreateProgress($Statusbar, 1)
GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")
GUISetOnEvent($GUI_EVENT_RESIZED, "_Resize")
GUISetOnEvent($GUI_EVENT_MAXIMIZE, "_Resize")
GUISetOnEvent($GUI_EVENT_RESTORE, "_Resize")
GUISetOnEvent($Go, "go")
GUICtrlSetOnEvent($Stop, "_Stop")
GUICtrlSetOnEvent($Print, "_Print")
GUICtrlSetOnEvent($Home, "_Home")
GUICtrlSetOnEvent($Favorites, "_Favorites")
GUICtrlSetOnEvent($Search, "_Search")
GUICtrlSetImage($Go, "shell32.dll", 176)
GUICtrlSetImage($Stop, "shell32.dll", 131)
GUICtrlSetImage($Print, "shell32.dll", 81)
GUICtrlSetImage($Home, "shell32.dll", 150)
GUICtrlSetImage($Favorites, "shell32.dll", 86)
GUICtrlSetImage($Search, "shell32.dll", 22)
GUISetState(@SW_SHOW)



While 1
    Sleep(1)
WEnd


Func go()
    _GUICtrlStatusBarSetIcon($Statusbar, 0, "shell32.dll", 148)
    _IENavigate($oIE, $Url)
    
    For $i = 0 To 100
        _GUICtrlStatusBarSetText($Statusbar, "Loading..." & _IEPropertyGet($oIE, "locationurl"))
        GUICtrlSetData($progress, $i)
        Sleep(5)
    Next
    _GUICtrlStatusBarSetIcon($Statusbar, 0, "shell32.dll", 176)
    _GUICtrlStatusBarSetText($Statusbar, "Done")
EndFunc   ;==>go


Func _Favorites()
    $Favorites = GUICreate("Favorites", 153, 495, 0, 0, BitOR($WS_CAPTION, $WS_POPUP, $WS_BORDER, $WS_CLIPSIBLINGS))
    $FavoritesMenu = GUICtrlCreateEdit("", 8, 8, 137, 441)
    $favclose = GUICtrlCreateButton("Close", 32, 456, 75, 25, 0)
    GUISetState(@SW_SHOW)
EndFunc   ;==>_Favorites



Func _Home()
    _IENavigate($oIE, $Home, 0)
EndFunc   ;==>_Home


Func _Search()
    Local $Read
    If GUICtrlRead($Searchtext) = "" Then
        GUICtrlSetData($Searchtext, "Search for...Supported by Google(C)")
        Return
    Else
        $Read = GUICtrlRead($Searchtext)
        
        _GUICtrlStatusBarSetIcon($Statusbar, 0, "shell32.dll", 148)
        For $i = 0 To 100
            _GUICtrlStatusBarSetText($Statusbar, "Loading... Google Search")
            GUICtrlSetData($progress, $i)
            Sleep(5)
        Next
        _GUICtrlStatusBarSetIcon($Statusbar, 0, "shell32.dll", 176)
        _GUICtrlStatusBarSetText($Statusbar, "Done")
        
        _IENavigate($oIE, "http://www.google.com", 0)
        Sleep(1500)
        $oForm = _IEFormGetCollection($oIE, 0)
        $oQuery = _IEFormElementGetCollection($oForm, 1)
        _IEFormElementSetValue($oQuery, $Read)
        _IEFormSubmit($oForm)
    EndIf
EndFunc   ;==>_Search


Func _Stop()
    _IEAction($oIE, "stop")
EndFunc   ;==>_Stop


Func _Print()
    _IEAction($oIE, "print")
EndFunc   ;==>_Print


Func _Exit()
    Exit
EndFunc   ;==>_Exit


Func _Resize()
    _GUICtrlStatusBarResize($Statusbar)
EndFunc   ;==>_Resize

please help

Link to comment
Share on other sites

poeple need to stop stealing other peoples scripts. :P:) (!) :) (!) (!) (!) (!) :) (!) (!) (!) (!) (!)

i doubt its yours (source : Generator) If you actually troubleshooted it, it would work. i got it to work nice. the controls dont work well. badly redone

Edited by JustinReno
Link to comment
Share on other sites

poeple need to stop stealing other peoples scripts. :P:) (!) :) (!) (!) (!) (!) :) (!) (!) (!) (!) (!)

i doubt its yours (source : Generator)

urm yea thanks for that.... I havent stole his script i have just used bits for excample the picture buttons... and the status bar... which i can't get working the rest i have wrote myself

(!)

Link to comment
Share on other sites

sorry. but anyways, Autoit doesnt like your:

CODE

GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")

GUISetOnEvent($GUI_EVENT_RESIZED, "_Resize")

GUISetOnEvent($GUI_EVENT_MAXIMIZE, "_Resize")

GUISetOnEvent($GUI_EVENT_RESTORE, "_Resize")

GUISetOnEvent($Go, "go")

it crashed autoit

and you need these:

#include <GuiCombo.au3>

#include <GUIConstants.au3>

#include <IE.au3>

#include <INet.au3>

#include<Math.au3>

#include<File.au3>

#include<String.au3>

#include<array.au3>

#include<GUIStatusbar.au3>

Edited by JustinReno
Link to comment
Share on other sites

poeple need to stop stealing other peoples scripts. :P:) (!) :) (!) (!) (!) (!) :) (!) (!) (!) (!) (!)

i doubt its yours (source : Generator)

the last week we had approximiatly 4 "web browsers"

Link to comment
Share on other sites

sorry. but anyways, Autoit doesnt like your:

CODE

GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")

GUISetOnEvent($GUI_EVENT_RESIZED, "_Resize")

GUISetOnEvent($GUI_EVENT_MAXIMIZE, "_Resize")

GUISetOnEvent($GUI_EVENT_RESTORE, "_Resize")

GUISetOnEvent($Go, "go")

it crashed autoit

and you need these:

#include <GuiCombo.au3>

#include <GUIConstants.au3>

#include <IE.au3>

#include <INet.au3>

#include <Math.au3>

#include <File.au3>

#include <String.au3>

#include <array.au3>

#include <GUIStatusbar.au3>

Any ideas why... btw can u help me make the fav's bit please for the gui and the when clciked it goes to page...

Also is it slow to you...

Link to comment
Share on other sites

Yes we didnt make IE of Ie.au3... but we did all the work programing it correctly into our gui's

so there about 50-50

:):P:) , you programmed with dalehohm's ie and you think thats 50-50???! take a look at IEau3 and tell me if there was a chance of even writing the smallest piece of code in that file...

anyway, lets end this, i think you understand my point

PS: the first trend was notepad-like scripts, then media players and now "web-browsers"... pfffff

Edited by Gif
Link to comment
Share on other sites

:):P:) , you programmed with dalehohm's ie and you think thats 50-50???! take a look at IEau3 and tell me if there was a chance of even writing the smallest piece of code in that file...

anyway, lets end this, i think you understand my point

PS: the first trend was notepad-like scripts, then media players and now "web-browsers"... pfffff

i bet you next thing will be someting that JustinReno and me release

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...