Wie bekomme ich den Monat als Zahl? - Tag:Monat

[macfan]

Wie bekomme ich den Monat als Zahl?
kann man das nicht einfacher bekommen als so?:

set datum to (current date) as string

if word 3 of datum is "Januar" then
set Monat to 1
end if

if word 3 of datum is "Februar" then
set Monat to 2
end if

if word 3 of datum is "März" then
set Monat to 3
end if

if word 3 of datum is "April" then
set Monat to 4
end if

if word 3 of datum is "Mai" then
set Monat to 5
end if

if word 3 of datum is "Juni" then
set Monat to 6
end if

if word 3 of datum is "Juli" then
set Monat to 7
end if

if word 3 of datum is "August" then
set Monat to 8
end if

if word 3 of datum is "September" then
set Monat to 9
end if

if word 3 of datum is "Oktober" then
set Monat to 10
end if

if word 3 of datum is "November" then
set Monat to 11
end if

if word 3 of datum is "Dezember" then
set Monat to 12
end if

[Snow]

Hi macfan,

schau dir doch mal den Artikel "Datum formatieren (1)" im Praxis-Teil an.

Dort habe ich es beschrieben.

Hier geht's lang...
_________________
Peter
-
Fischer-Bayern.de|Shadetreemicro.com

[WiLi]

property the_month : {January, February, March, April, May, June, July, August, September, October, November, December} -- Monatsnamen zur Ermittlung der Monatszahl

on get_datum(Heu_te)
repeat with i from 1 to count items of the_month
if (month of Heu_te) = item i of the_month then exit repeat
end repeat
return ("" & year of Heu_te & "." & "" & i & "." & day of Heu_te)
end get_datum

so hat Folker das bei mir gelöst
(ich hoffe, ich hab nichts zu kopieren vergessen)

[macfan]

Danke an snow und WiLi

kann man denn das nicht irgendwie einfacher herausbekommen?
z.B. "set x to december as number"

[Folker]

Hallo macfan,

nein, date ist dort MANCHMAL ein bißchen arm - immerhin durchaus INTERNATIONAL zu nutzen (aber warum kein integer im 'month (int?)' geliefert wird???????).
Ich habe letztens im FMM-Forum folgende Lösung gepostet (ab MacOS 8.6!):

-- irgendein Datum im AppleScript 'date' Format:
set theFile to choose file
set theDate to creation date of (info for theFile)
-- in diesem Beispiel ist "class of the result = string"  -- nicht integer!!!!
set theMonth to {mJanuary:"1", mFebruar:"2", mMarch:"3", mApril:¨
"4", mMay:"5", mJune:"6", mJuly:"7", mAugust:"8", mSeptember:¨
"9", mOctober:"10", mNovember:"11", mDecember:"12"}

--folgende Zeile mag je nach Rechner-Datumformat angepasst werden
-- macfan! - SIEHE 'GetPropÖ!!!!!!!!!!!!!!!!!!!!
set d to (day of theDate as string) & "." & GetProp(theMonth, "m" & month of theDate) & "." & (year of theDate as string)

--das ist für Dich unwichtig------ (für mich schon eher - uff - es wird
tell application "FileMaker Pro"
set cell "MeinDatum" of current record of database 1 to d
set cell "MeineZeit" of current record of database 1 to time string of theDate
end tell

--Das hier ist das Sahnestück! Leider nicht von mir - den hab' ich neulich in 'ner News_Group gefunden und find' den ja soooo gut!! (ist ja nicht nur fürs DatumÖ)::

on GetProp(theObj, theProp)
tell (run script "me
on f(theObj)
return theObj's " & theProp & "
end f") to return f(theObj)
end GetProp

Also, ist eine Alternative zuvor von WiLi genannten Möglichkeit - und außerdem läßt sich damit eine Menge Ö anstellen )

Gruß, Folker
_________________
Gruß,
Folker Brandt
=============================
Systemberatung · Datenbanken · Webdesign