Work With Date Parameters

[Guest Muslica]

Hi !

Id like to create the date of yesterday. I thank, I use the $yesterday=@yday-1 formula, but I cant convert to date this format !

M.

[Jos]

  Muslica said:

Hi !

Id like to create the date of yesterday. I thank, I use the $yesterday=@yday-1 formula, but I cant convert to date this format !

M.

were did i see this before today ????

#16693

[herworth]

How about:

$yesterday = @MDAY-1 & "/" & @MON & "/" & @YEAR

If you want the month in figures you need something like this

expandcollapse popup

#include - once
Func MonthName( $MonNum, $Format,$Case )
  
; $Format- 1 = Jan, 0 = January
 ; $Case - 1 = January (Jan), 0 = JANUARY (JAN)
 
 Local $Month[13]
  $msg = "You need to enter a month number" & @CRLF & "and 0 or 1 for the format and case"
  $Month[1]  = "January"
  $Month[2]  = "February"
  $Month[3]  = "March"
  $Month[4]  = "April"
  $Month[5]  = "May"
  $Month[6]  = "June"
  $Month[7]  = "July"
  $Month[8]  = "August"
  $Month[9]  = "September"
  $Month[10] = "October"
  $Month[11] = "November"
  $Month[12] = "December"

  If StringisDigit($MonNum) And $MonNum < 13 And StringisDigit($Format) And _
StringisDigit($Case) Then
    Select
      Case $Format = 0
    Select
    Case $Case = 0
        Return StringUpper($Month[$MonNum])
    Case $Case = 1
    Return $Month[$MonNum]
    Case Else
    SetError( 1 )
        MsgBox(0,"Error",$msg)
    exit
     EndSelect
      Case $Format = 1
    Select
    Case $Case = 0
        Return StringUpper(StringLeft( $Month[$MonNum], 3 ))
    Case $Case = 1
    Return StringLeft( $Month[$MonNum], 3 )
    Case Else
    SetError( 1 )
        MsgBox(0,"Error",$msg)
    exit
     EndSelect
     Case Else
        SetError( 1 )
        MsgBox(0,"Error",$msg)
    exit
    EndSelect
  Else
    SetError( 1 )
    MsgBox(0,"Error",$msg)
    exit
  EndIf
EndFunc

All the best.

[scriptkitty]

Local $Month[13]
 $msg = "You need to enter a month number" & @CRLF & "and 0 or 1 for the format and case"
 $Month[1]  = "January"
 $Month[2]  = "February"
 $Month[3]  = "March"
 $Month[4]  = "April"
 $Month[5]  = "May"
 $Month[6]  = "June"
 $Month[7]  = "July"
 $Month[8]  = "August"
 $Month[9]  = "September"
 $Month[10] = "October"
 $Month[11] = "November"
 $Month[12] = "December"

After you know Arrays, you can condence the above part of the code like this:

$Month=StringSplit("January,February,March,April,May,June,July,August,September,October,November,December",",")
$msg = "You need to enter a month number" & @CRLF & "and 0 or 1 for the format and case"

Great showing of what the array contains for the example.

[Guest Muslica]

Thank you !