Sign in to follow this  
Followers 0
cdkid

another useless script

1 post in this topic

#1 ·  Posted (edited)

#include <IE.au3>
#include <GUIConstants.au3>
opt("GUIOnEventMode",1)


$root = GuiCreate("Select Forum",200,200)
$bob = GuiCtrlCreateRadio("v3 Scripts And Scraps",-1,40)
$bob1 = GuiCtrlCreateRadio("v3 Support",-1,60)
$bob2 = GuiCtrlCreateRadio("v3 GUI (Graphical User Interface)",-1,80)
$bob3 = GuiCtrlCreateRadio("v3 Idea Lab",-1,100)
$okbtn = GuiCtrlCreateButton("Go!",100,150)
guictrlsetonevent($okbtn,"ok")
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")

func CLOSEClicked()
    GUIDelete($root)
    exit
    endfunc
func ok()
    $b = GuiCtrlRead($bob)
    $b1 = GuiCtrlRead($bob1)
    $b2 = GuiCtrlRead($bob2)
    $b3 = GuiCtrlRead($bob3)
    
    
    if $b = "1" Then
        $m = _IECreate()
_IENavigate($m,"Http://www.autoitscript.com/forum")
_IEClickLinkByText($m,"v3 Scripts and Scraps")
exit
    EndIf
    
    
    if $b1 = "1" Then
        $m = _IECreate()
_IENavigate($m,"Http://www.autoitscript.com/forum")
_IEClickLinkByText($m,"v3 Support")
exit
EndIf

if $b2 = "1" then
    $m = _IECreate()
    _IENavigate($m,"Http://www.autoitscript.com/forum")
_IEClickLinkByText($m,"v3 GUI (Graphical User Interface)")
exit
EndIf

if $b3 = "1" Then
    $m = _IECreate
    _IENavigate($m,"Http://www.autoitscript.com/forum")
_IEClickLinkByText($m,"v3 Idea Lab")
exit
EndIf
endfunc


GuiSetState()
While 1
    $msg = GuiGetMsg()
    Select
     Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case Else
   ;;;
    EndSelect
WEnd
Exit

bored.... opens a GUI with 4 radio buttons to go to the forums on the autoit site

Edited by cdkid

AutoIt Console written in C#. Write au3 code right at the console :D_FileWriteToLineWrite to a specific line in a file.My UDF Libraries: MySQL UDF Library version 1.6 MySQL Database UDF's for AutoItI have stopped updating the MySQL thread above, all future updates will be on my SVN. The svn location is:kan2.sytes.net/publicsvn/mysqlnote: This will still be available, but due to my new job, and school hours, am no longer developing this udf.My business: www.hirethebrain.com Hire The Brain HireTheBrain.com Computer Consulting, Design, Assembly and RepairOh no! I've commited Scriptocide!

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