mesale0077 Posted May 28, 2012 Posted May 28, 2012 (edited) hi sorry but, This msn address does not belong to me only I used html code expandcollapse popup#include <ButtonConstants.au3> #include <StaticConstants.au3> #include <WinAPI.au3> #include <IE.au3> #include <inet.au3> #include <GUIConstantsEx.au3> #include <GuiButton.au3> #include <WindowsConstants.au3> ;This msn address does not belong to me SplashTextOn("", "The program is preparing "& @CRLF&"......Please wait......",400,70,"-1","-1",3) #Region ### START Koda GUI section ### Form= Global $html ='<body oncontextmenu="return false" onselectstart="return false" ondragstart="return false" scroll="no" > <iframe src="http://settings.messenger.live.com/Conversation/IMMe.aspx?invitee=d0d94056ed33c2ac@apps.messenger.live.com&mkt=en-EN&useTheme=true&themeName=blue&foreColor=333333&backColor=E8F1F8&linkColor=333333&borderColor=AFD3EB&buttonForeColor=333333&buttonBackColor=EEF7FE&buttonBorderColor=AFD3EB&buttonDisabledColor=EEF7FE&headerForeColor=0066A7&headerBackColor=8EBBD8&menuForeColor=333333&menuBackColor=FFFFFF&chatForeColor=333333&chatBackColor=FFFFFF&chatDisabledColor=F6F6F6&chatErrorColor=760502&chatLabelColor=6E6C6C" width="100" height="70" style="overflow: hidden; position:absolute; width: 500 px; height: 70px; top: -45px; left: -4px; " frameborder="0" scrolling="no"></iframe></body>' $PanTask_1 = _IECreateEmbedded() $Forhh = GUICreate("[#] ONLİNE HELP [#]", 623, 442, 192, 124) $Pub = _GetIP() $jhg = stringlen($Pub) if $jhg > 2 then $Pandora_BUTTON = _web_help_button("ONLİNE_HELP",424, 130,100) endif $Button1 = GUICtrlCreateButton("Button1", 424, 32, 161, 41) $Button2 = GUICtrlCreateButton("Button2", 424, 80, 161, 49) SplashOff() DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $Forhh , "int", 1500, "long", 0x00040008);slide-in from bottom GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $Forhh, "int", 1500, "long", 0x00050004);slide-out to bottom GUIDelete($Forhh ) _IEErrorHandlerDeRegister() Exit EndSwitch WEnd Func _web_help_button($title,$xbutton,$ybutton,$withbutton) $web_help = GUICtrlCreateButton($title,$xbutton+20, $ybutton, $withbutton, 30) $PanGUI_1 = GUICtrlCreateObj($PanTask_1,$xbutton, $ybutton, 22, 30) _IENavigate($PanTask_1, "About:Blank") _IEDocWriteHTML($PanTask_1, $html) _IEAction($PanTask_1, "refresh") return $web_help EndFunc Edited June 14, 2012 by mesale0077
barkeeper Posted August 20, 2012 Posted August 20, 2012 Nice work! but how do you change the http://settings.messenger.live.com/Conversation/IMMe.aspx?invitee= part to work for another e-mail address? can't get it to work with another....
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now