mesale0077 Posted May 28, 2012 Share 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 Link to comment Share on other sites More sharing options...
barkeeper Posted August 20, 2012 Share 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.... Link to comment Share on other sites More sharing options...
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