Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 06/24/2024 in all areas

  1. Jblz619

    smtp mailer by jos

    Hi there I have The smtp mailer by Jos working perfectly I wrote a user friendly GUI for it and everything. Just one question can you send signatures at the bottom of the email through the smtp. I assume maybe clipboard put and clipboard get to copy and paste the email into the body of the script email. Idk please help. Maybe use html idk im looking every where and can't find any awnsers. Maybe if I get the full html code for the email signature save it to a txt file. And then use file read and put it at the bottom of the email body? I will test it and let you guys know.
    1 point
  2. CTRL+A selects ALL files, not just .jpg's.
    1 point
  3. yes, but that example has a error, missing a space after /c!
    1 point
  4. You can run more than one command using Ampersand "&" Run(@ComSpec & " /c Calc & Notepad", "", @SW_HIDE) Using double "&&" the second command only executes if the first was successful.
    1 point
  5. Hi everybody There is a new version #9 of the script "Google Translate with GUI" (code in 1st post) Now the user can display all 133 traductable language names not only in English, but in a language choosen amongst the 39 ones showed in the pic below : All 133 language names will be translated "on the fly" (no need to quit the script) and they will appear like this in both combobox, for example in German if the user ticks the German GUI language from the menu : For those who tick a right-to-left GUI language (such as Arabic, Hebrew or Persian), then all checkbox & combobox will be displayed right-to-left, like this : In all cases, the list of traductable languages that you ticked in checkbox will be preserved when you choose a new GUI language, so no need to tick them again in case you switch from one GUI language to another, nothing will be lost. If some languages appear too small in the combobox, then you can click the appropriate label to increase / decrease their font, as shown in this pic : Please remember that the 2 Input controls and their associated Updown control shown in the preceding pic (displaying "11") refer to the 2 big EDIT fields which contain the original & translated text (in case the original or translated text appear too big or too small) All 39 GUI languages are found in a single separate UTF-8 text file, named "Google Translate (languages list #3).txt" . Please do not rename this file as its name is required once during the script. Its size is 111 Kb (unzipped) so I choosed to zip it (32 KB) and you can download it at the end of 1st post, unzip it, then place it in the same folder as the script. It's a good idea to keep this text file read-only. Happy translations
    1 point
  6. The example zip in this excellent UDF by @LarsJ contains all required includes. This code will select all jpgs in the topmost Windows Explorer window. #include "Includes\AutomatingWindowsExplorer.au3" #include <Array.au3> Opt("MustDeclareVars", 1) Example() Func Example() ; Windows Explorer on XP, Vista, 7, 8 Local $hExplorer = WinGetHandle("[REGEXPCLASS:^(Cabinet|Explore)WClass$]") If Not $hExplorer Then MsgBox(0, "Automating Windows Explorer", "Could not find Windows Explorer. Terminating.") Return EndIf ; Get an IShellBrowser interface GetIShellBrowser($hExplorer) If Not IsObj($oIShellBrowser) Then MsgBox(0, "Automating Windows Explorer", "Could not get an IShellBrowser interface. Terminating.") Return EndIf ; Get other interfaces GetShellInterfaces() ; Get all items with full path Local $aFiles = GetItems(False, True) ; _ArrayDisplay( $aFiles, "All files" ) For $i = 0 To UBound($aFiles) - 1 If StringRight($aFiles[$i], 4) = ".jpg" Then SetSelectedItem($i) Next EndFunc ;==>Example
    1 point
  7. https://www.autoitscript.com/autoit3/docs/libfunctions/_FileListToArray.htm
    1 point
  8. @ioa747 Man, this actually works. Although its a dirty hack, lol. Framerate drops to 1/10th, lol. BUT it works! 😅
    1 point
  9. If you set the GUI background colour with GUISetBkColor() and happen to forget the colour you set it as, then why not try GUIGetBkColor() Function: #include-once #include <WinAPIGdi.au3> ; #FUNCTION# ==================================================================================================================== ; Name ..........: GUIGetBkColor ; Description ...: Retrieves the RGB value of the GUI background. ; Syntax ........: GUIGetBkColor($hWnd) ; Parameters ....: $hWnd - A handle of the GUI. ; Return values .: Success - RGB value ; Failure - 0 ; Author ........: guinness ; Example .......: Yes ; =============================================================================================================================== Func GUIGetBkColor($hWnd) Local $iColor = 0 If IsHWnd($hWnd) Then Local $hDC = _WinAPI_GetDC($hWnd) $iColor = _WinAPI_GetBkColor($hDC) _WinAPI_ReleaseDC($hWnd, $hDC) EndIf Return $iColor EndFunc ;==>GUIGetBkColor Example use of Function: #include <MsgBoxConstants.au3> #include 'GUIGetBkColor.au3' Example() Func Example() Local $hGUI = GUICreate('GUIGetBkColor() Example', 500, 350) GUISetState(@SW_SHOW, $hGUI) Local $aColor = [0x0000FF, 0x8FFF9F, 0xEC4841, 0xB0E35D, 0x440BFD] ; Random colour array. Local $iColor = 0 For $i = 0 To UBound($aColor) - 1 GUISetBkColor($aColor[$i]) Sleep(20) $iColor = GUIGetBkColor($hGUI) ; Pass the GUI handle to the function. MsgBox($MB_SYSTEMMODAL, '', 'Background Color: ' & _ConvertToHexFormat($aColor[$i]) & @CRLF & _ 'GUIGetBkColor() Hex Format: ' & _ConvertToHexFormat($iColor) & @CRLF & _ 'GUIGetBkColor() Returned: ' & $iColor, 0, $hGUI) Next GUIDelete($hGUI) EndFunc ;==>Example Func _ConvertToHexFormat($iColor) Return Hex($iColor, 6) EndFunc ;==>_ConvertToHexFormat
    1 point
×
×
  • Create New...