drapdv

This is a million years old, but thanks for posting your solution!

Thank you, Jos. I think it may have something to do with the fact I got the O365 addresses through GoDaddy. It will let me use smtpout.secureserver.net, but not smtp.office365.com. When you do it through secureserver though, it only supports 5 whole relays per 24 hours 😂 Anyway, thank you for the help.

I'm using the updated _INetSmtpMailCom function Jos provided. For some reason, I'm not able to get a basic text email (or any email, for that matter) to send via an Office365 email account. I tried the same user/pass/port/ssl settings in PowerShell and can successfully send a test email. When I use Amazon SES as a proxy, it also sends correctly. When I send with what should be the correct settings (app password, port 587, TLS=True), I get the error: "The server rejected the sender address. The server response was: 451 5.7.3 STARTTLS is required to send mail" I have tried every combination I can think of: TLS, no TLS, SSL, no SSL, app password, regular password, ports 25, 465, and 587...nothing is working. I have the attached code as the line handling the TLS setting. Has anyone else run into this? Does the code need to be updated? Any help is appreciated! If $tls Then $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendtls") = True

Thank you, ioa747. I appreciate your example, too. I ended up building a function based on Nine's code, but there may well be advantages to using $GUI_GR_BEZIER. Again, thank you for replying.

Thank you again, Nine. I will play around with this and see what I can do. Cheers!

Nine, Thank you so much for this! I have just one more question. Is it possible to have more than one label/input child window? I've tried to add one, using WinMove to position it within the $hGUI parent. While both display, the first one becomes unresponsive. Thank you again for your help! #include <GUIConstants.au3> #include <WinAPIGdi.au3> #include <WinAPISysWin.au3> Global $hGUI = GUICreate("Test") Global $iW = 150, $iH = 30 Global $hLabel1 = GUICreate("", $iW, $iH, 20, 20, $WS_CHILD, 0, $hGUI) GUICtrlCreateLabel("", 0, 0, $iW, $iH) GUICtrlSetBkColor(-1, 0xFFFFFF) GUICtrlCreateInput("INPUT1", 5, 5, $iW - 10, $iH - 10, -1, $WS_EX_TOOLWINDOW) GUICtrlSetBkColor(-1, 0xFFFFFF) WinMove($hLabel1, "", 0, 30, 150, 30) _WinAPI_SetParent($hLabel1, $hGui) Global $hRgn = _WinAPI_CreateRoundRectRgn(0, 0, $iW, $iH, 20, 20) _WinAPI_SetWindowRgn($hLabel1, $hRgn) Global $hLabel2 = GUICreate("", $iW, $iH, 20, 20, $WS_CHILD, 0, $hGUI) GUICtrlCreateLabel("", 0, 0, $iW, $iH) GUICtrlSetBkColor(-1, 0xFFFF00) GUICtrlCreateInput("INPUT2", 5, 5, $iW - 10, $iH - 10, -1, $WS_EX_TOOLWINDOW) GUICtrlSetBkColor(-1, 0xFFFF00) WinMove($hLabel2, "", 0, 70, 150, 30) _WinAPI_SetParent($hLabel2, $hGui) Global $hRgn2 = _WinAPI_CreateRoundRectRgn(0, 0, $iW, $iH, 20, 20) _WinAPI_SetWindowRgn($hLabel2, $hRgn2) GUISetState(@SW_SHOW, $hGUI) GUISetState(@SW_SHOW, $hLabel1) GUISetState(@SW_SHOW, $hLabel2) While True Switch GUIGetMsg() Case $GUI_EVENT_CLOSE ExitLoop EndSwitch WEnd

So, I feel like this is going to be a really stupid question, but I'm going to ask it anyway. I want to make an input control with rounded corners. I'd be fine with an edit control with rounded corners, or a label with rounded corners which I could then place a borderless input control over the top of. It's not going to be extravagant. It's going to be a white control, with (probably) a thin, light gray border, on a white GUI. I've dug through the forum, but the posts I'm finding are years old, and often take hundreds of lines to accomplish not-exactly what I'm looking for. I'm hoping someone familiar with modern GUI design will see this and just be like, "Oh yeah, you just do [blank]." Any help is appreciated. Edit: I built a function based on Nine's code. I've attached it. #include <GUIConstants.au3> #include <GuiEdit.au3> #include <WinAPIGdi.au3> #include <WinAPISysWin.au3> Const $SC_MOVE = 0xF010 Dim $hGUI = GUICreate("Multiple Childs"), $hLabel1, $hLabel2, $iW = 250, $iH = 30, $sBkColor = 0xFFFFFF, $sTxtColor = 0x000000 GUISetFont(10, 500, 0, "Calibri") GUISetBkColor(0x5D6D7E) GUISetState() $hLabel1 = _GuiCtrlCreateRoundedInput($hGUI, "Cats", $iW, $iH, 20, 20, $sBkColor, $sTxtColor, "Input 1", 11, -1, -1, "Segoe UI") $hLabel2 = _GuiCtrlCreateRoundedInput($hGUI, "Dogs", $iW, $iH, 20, 70, $sBkColor, $sTxtColor, "Input 2", 11, -1, -1, "Segoe UI") While True Switch GUIGetMsg() Case $GUI_EVENT_CLOSE ExitLoop EndSwitch WEnd Func _GuiCtrlCreateRoundedInput($hParent, $sText, $iWd, $iHt, $iLeft, $iTop, $sBkClr = 0xFFFFFF, $sTxtClr = 0x000000, $sCue = "", $iFontSize = 10, $iFontWt = 500, $iFontAttrib = 0, $sFontName = "Calibri") Local $hGui_Inp, $hRgn, $hInp $hGui_Inp = GUICreate("", $iWd, $iHt, $iLeft, $iTop, $WS_CHILD, $WS_EX_CONTROLPARENT, $hParent) GUISetBkColor($sBkClr) GUICtrlCreateLabel("", 0, 0, $iWd, $iHt) GUICtrlSetState(-1, $GUI_DISABLE) GUICtrlSetBkColor(-1, $sBkClr) $hInp = GUICtrlCreateInput($sText, 5, 5, ($iWd - 10), ($iHt - 10), BitOR($ES_UPPERCASE, $SS_CENTERIMAGE), $WS_EX_TOOLWINDOW) GUICtrlSetFont(-1, $iFontSize, $iFontWt, $iFontAttrib, $sFontName) GUICtrlSetColor(-1, $sTxtClr) GUICtrlSetBkColor(-1, $sBkClr) _GUICtrlEdit_SetCueBanner(-1, $sCue) $hRgn = _WinAPI_CreateRoundRectRgn(0, 0, $iWd, $iHt, 20, 20) _WinAPI_SetWindowRgn($hGui_Inp, $hRgn) GUIRegisterMsg($WM_SYSCOMMAND, "On_WM_SYSCOMMAND") GUISetState() Return $hGui_Inp EndFunc ;==>_GuiCtrlCreateRoundedInput Func On_WM_SYSCOMMAND($hWnd, $Msg, $wParam, $lParam) If BitAND($wParam, 0xFFF0) = $SC_MOVE Then If $hWnd = $hGUI Then Return Return False EndIf Return $GUI_RUNDEFMSG EndFunc ;==>On_WM_SYSCOMMAND

Really helped me out. Thank you, this was a perfect solution for sending email with office365!

First of all, thank you for your reply, and for developing this UDF. I literally couldn't do my job without it! Second, I figured it out...I ran SciTE as admin, but compiled so it would run without requiring admin rights. The (poorly obfuscated) screenshot below shows what simplespy could identify when run as admin (left) and when run with standard rights (right). With admin rights, it cycled through 40 objects to get the one I needed. Without admin rights, it cycled through only 16, and they were different than the first 16 found when run with admin rights. Weird deal, but that's how it goes. Anyway, basic reminder to UIA people - check your 32/64-bit settings and admin privileges if things aren't behaving.

So, I have this odd issue happening with UIAWrappers. When I run simplespy.au3 through SciTE, it finds the object I'm trying to work with, no problem. But, when I compile simplespy.exe, it can't find it. Another script that utilizes UIAWrappers is experiencing the same phenomenon. EDIT: Compiling as 32-bit or 64-bit does not affect this behavior. The trouble starts at the very first object I try to get via _UIA_getObjectByFindAll, so I included the $properties2Match array and the object properties that were returned by _UIA_getPropertyValue for that first object both when running from SciTE and when compiled. It always finds the matches for the title and control type properties. But when compiled, it fails to find the Automation ID property. Any ideas as to why this would be happening? Hoping junkew will see this and have an idea. These are the $properties2Match 30005|Screen/PVN - ###.###.##.## - CDK Drive|0|False 30003|50032|0|False 30011|Portal|0|False Object properties when running from SciTE: <propertymatching> j:1 propID:[30005] expValue:[Screen/PVN - ###.###.##.## - CDK Drive]actualValue:[Screen/PVN - ###.###.##.## - CDK Drive]1 j:2 propID:[30003] expValue:[50032]actualValue:[50032]1 j:3 propID:[30011] expValue:[Portal]actualValue:[Portal]1 </propertymatching> Object properties when script is compiled: <propertymatching> j:1 propID:[30005] expValue:[Screen/PVN - ###.###.##.## - CDK Drive]actualValue:[Screen/PVN - ###.###.##.## - CDK Drive]1 j:2 propID:[30003] expValue:[50032]actualValue:[50032]1 j:3 propID:[30011] expValue:[Portal]actualValue:[]0 </propertymatching>

I have a GUI with a parent window that has a menu and shortcut buttons at the top, and a child window which displays a list which is scrolled vertically. When the list is relatively small, like no more than 100 or so lines then it scrolls fine. As the list gets larger, scrolling begins to slow, and if you start mixing up the scroll method (mousewheel, left-clicking the scrollbar box, etc) then it begins to hang. When it hangs, dwm.exe CPU usage maxes out, and I can't even switch to another window. Each line in the list is 1000px wide X 30px tall, and the lines alternate between a gray background and a white background, in case that matters. When a non-Aero theme is active, everything works fine. So, I could disable DWM every time someone fires it up, but changing a client's color scheme is not ideal. I tried to utilize _WinAPI_DwmSetWindowAttribute($oGui_Parent, $DWMWA_NCRENDERING_POLICY, $DWMNCRP_DISABLED), and although it succeeds in disabling DWM for that window, it doesn't seem to make any difference as far as the scrolling lag is concerned. The code is several thousand lines long and contains proprietary information, so I'm trying to avoid posting that, but these are the lines which are creating the GUIs. Is there anything that anyone can think of off the top of their heads, or is there anything jumping out at you from this snippet of code? Any help is appreciated! $oGui_Parent = GUICreate("Data Viewer", 700, 500, Default, Default, BitOR($WS_CAPTION, $WS_MINIMIZEBOX, $WS_POPUPWINDOW)) WinSetTrans($oGui_Parent, "", 255) _WinAPI_DwmSetWindowAttribute($oGui_Parent, $DWMWA_NCRENDERING_POLICY, $DWMNCRP_DISABLED) GUISetFont(9, 500, 0, "Calibri") GUISetBkColor(0xFFFFFF) $oGui_Child = GUICreate("", 700, 400, 0, 100, $WS_POPUP, $WS_EX_MDICHILD, $oGui_Parent) WinSetTrans($oGui_Child, "", 255) _WinAPI_DwmSetWindowAttribute($oGui_Child, $DWMWA_NCRENDERING_POLICY, $DWMNCRP_DISABLED) GUISetFont(9, 500, 0, "Calibri") GUISetBkColor(0xFFFFFF)

It's not enough code to be able to tell. For sure we'd need to see: 1) _CreateBulkInput 2) _DestroyBulkInput 3) What is the variable for the spreadsheet icon you click to create the .CSV input? There may be more that we'd need to see, but that's a start.

Okay, I have 8 identical computers (all the same model, all created from the same image) that are all running the same compiled script. 7 of them can connect to the ftp server via _FTP_Connect, 1 can't. So I began working on the 1 that could not connect. I can ping the ftp server from the computer just fine. It is set up the same as all the other computers, so I don't get why it can't connect. Additionally, it is supposed to return the results of _WinAPI_GetLastError() as the @extended value when it returns @error. It returns "0". So all I get is "ERR: -1, EXT: 0" from the MsgBox. Thoughts? #include <FTPEx.au3> $server = 'the ip' $username = 'username' $pass = 'password' $Open = _FTP_Open('MyFTP Control') $Conn = _FTP_Connect($Open, $server, $username, $pass, 1) If @error Then MsgBox(0, "ERROR", "ERR: "&@error&", EXT: "&@extended) $Ftpc = _FTP_Close($Open)

Thank you gents, that should do the trick! Appreciate the fast responses!

Hi czardas, Thank you for the quick reply! That is very close, but that's the function that will check a single edit input for modification. I'm wondering if there is a universal flag that gets set if any input within a GUI (or even entire script for that matter) is changed. Like, when you fire up the GUI to begin with, $GUI_INPUTMODIFY = 0 and then as soon as you modify any of the inputs, $GUI_INPUTMODIFY = 1. Really, even a method of running _GUICtrlEdit_GetModify when moving focus off of an input would do the trick, as I have a Sleep(10) loop that checks for events.