Do you need to get the current month as an integer in AppleScript? It's not necessarily trivial in OS 9's AppleScript, but it can be done with this line of code, as I found in this thread over on MacScripter:
set currMonthNum to ((date (get "1/1")) - 2500000 - (get date (get "1"))) div -2500000
[robg adds: Note: I haven't tested this one myself.]
