- 220 名前：名無しさん＠お腹いっぱい。 [03/04/03 04:27 ID:hyWMT1jm]
- >>219
myVar = myVar ++ "(火)"
ElseIf (&(Date.WeekDay(Date.Today)) == 3)
myVar = myVar ++ "(水)"
ElseIf (&(Date.WeekDay(Date.Today)) == 4)
myVar = myVar ++ "(木)"
ElseIf (&(Date.WeekDay(Date.Today)) == 5)
myVar = myVar ++ "(金)"
ElseIf (&(Date.WeekDay(Date.Today)) == 6)
myVar = myVar ++ "(土)"
EndIf
File.writeall(myFileDate, myVar)
*Clip MenuPaste
*File Delete &(myFileDate)
*File Delete &(myFileTime)
---------
これをテキストファイルにしておいて、*Script RunFileすればOKです。
ファイルはClipディレクトリに書き込まれるようにパスを適当に変えてください。
|
 |
