Jump to content
Sign in to follow this  

get the day's name in your favorite language

Recommended Posts

Hi guys
In this publication I will share with you a function i have written it
This function enables you to get names of days in three languages
English, French and Arabic
It automatically recognizes the language of your system
If you want, you can customize the display language you want
English = 0
Arabic = 1
French = 2


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  

  • Recently Browsing   0 members

    No registered users viewing this page.

  • Similar Content

    • By nacerbaaziz
      Hi dear, I have a question please
      I designed a function to read the content of the playlist
      I succeeded in that
      I have a problem
      For VLC player playlists
      If the path of the files in Arabic language the path is be as follows
      I did not know how to decrypt this text to be readable
      This is the function that i used

      func M3UImport($M3UFile) dim $AM3UItems local $fileOpen = FileOpen($path, bitOr($FO_OVERWRITE,$FO_CREATEPATH,$FO_ANSI)) _FileReadToArray ($fileOpen, $AM3UItems) if @error then return setError(1) local $M3UPath for $i = 1 to $AM3UItems[0] $AM3UItems[$i] = stringReplace($AM3UItems[$i], "file:///", "") $AM3UItems[$i] = stringReplace($AM3UItems[$i], "/", "\") $AM3UItems[$i] = stringReplace($AM3UItems[$i], "%20", " ") $M3UPath = _fileGetDirPath($AM3UItems[$i]) if $M3UPath = "" then $M3UPath = @WorkingDir if not StringTrimRight($M3UPath, 1) = "\" then $M3UPath &= "\" $AM3UItems[$i] = $M3UPath & $AM3UItems[$i] endIf local $ext = _GetFileExt($AM3UItems[$i]) if fileExists($AM3UItems[$i]) and not (StringInStr($FilesExt, $ext) = 0) then $aListItems[0] += 1 GUICtrlCreateListViewItem(_GetFileName($AM3UItems[$i]) & Opt("GUIDataSeparatorChar") & " : " & Opt("GUIDataSeparatorChar") & $AM3UItems[$i], $list) endIf next return "" endFunc

      I ask for your help in this work
      with my Greetings and thanks in advance
    • By jonson1986
      I'm trying to translate with google translator but not able to translate my text file from Russian to English and my output saved in text file is 0 instead of any translated text.
      I'm using a text file which contains 5 lines of Russian language and I want to translate it into English language and want to save it in other text file translated.txt but I'm not able to let it happen.
      Please help me how can I make this possible same code was working several months ago but not now especially don't know what's going wrong with my code of google translator.
      Here are my codes
      #RequireAdmin #include <IE.au3> #include <String.au3> #include <Array.au3> ProcessClose ( 'iexplore.exe') $File1 = @ScriptDir & "\kat01.txt" $txt = FileRead($File1) ;-------------------------------Translation Started------------------------- Local $tag="* # * # *" Local $oIE=_IECreate("https://translate.google.com/#ru/en", 1, 1) Local $oForm=_IEFormGetCollection($oIE,0) Local $oQuery=_IEGetObjByName($oForm,"text") _IEFormElementSetValue($oQuery, $tag & @CR & $txt & @CR & $tag) _IEFormSubmit($oForm) _IELoadWait($oIE) Local $oText=_IEGetObjById($oIE,"gt-res-data") $lines=StringSplit(_IEPropertyGet($oText,"innerText"),@CRLF,1) ;_IEQuit($oIE) _ArrayDelete($lines,_ArraySearch($lines,$tag,1,0,0,1,0) & "-" & $lines[0]) _ArrayDelete($lines,"1-" & _ArraySearch($lines,$tag,1,0,0,1,1)) $lines[0]=UBound($lines)-1 _ArrayDisplay($lines) Local $sFilePath = @ScriptDir & "\Translated.txt" _FileWriteFromArray($sFilePath, $lines, 1)  
    • By boltonebob
      Could someone please explain to me how you can use Func_SearchLastState more than once in the same script.
      My situation is I am trying to use it in the same script under different case scenarios:
      Case 1
      Case 2
      Even though these are under different case scenarios the Func_SearchLastState is getting picked up as a duplicate function name.
      How can I use this function more than one in my script without getting the error?
    • By Servant
      For example, I have this code to get the object of an opened Microsoft Word document:
      #include <Word.au3> Global $oWord = _Word_Create() Global $oDoc = _Word_DocGet($oWord, 1) Now my question is, how can I get the current file name of that opened Microsoft Word document?
    • By MAS
      Hello all 
      I'm trying to send keys to a program and it works well, but if I changed the keyboard layout to language other than English
      it fails
      Run("Notepad.exe") $hWnd = WinWait("Untitled - Notepad2") WinActivate($hWnd) ControlSend($hWnd, "", "", "^s") this works and opens the save as dialogue if I'm using English keyboard only not Arabic keyboard for example
      I've tried using in send command
      {CTRL} , {LCTRL} , {RCTRL} but didn't work
      so how I automatically change keyboard if it's not English and then send the keys
      or what I should do
  • Create New...