今日の日付をセットしたいのですが

ＡＳＰで入力画面を作っていますが、TEXT の初期値に今日の日付をセットしたいのですが何かよい方法は有りませんでしょうか　？

<input type="text" name="xDay1" size="12" maxlength="10" value="2002/01/07">

No.2 ベストアンサー 回答者： tamaCo 回答日時： 2002/05/01 12:35

northcurlcurlさんの回答に対する補足を受けて。

。。
下記では如何でしょうか。

<input type="text" name="xDay1" size="12" maxlength="10" value="<%= Date() %>">

ただしDate関数はマシンの[地域のプロパティ]-[日付]-[短い形式]のフォーマットに
依存するので、予めコントロールパネルから「YYYY/MM/DD」の形式に設定しておく
必要があります。
サーバの設定を変更できないのであれば、以下のように。
#インデントのため全角スペース入れてます。
<%
　Dim NowDateStr
　NowDateStr = CStr(Year(Now()) & "/" & Right("00" & Month(Now()), 2) & "/" & Right("00" & Day(Now()), 2))
%>

<input type="text" name="xDay1" size="12" maxlength="10" value="<%= NowDateStr %>">

参考になれば幸いです。

この回答へのお礼

ありがとうございます。うまく動作しました。

お礼日時：2002/05/01 19:30

No.1 回答者： northcurlcurl 回答日時： 2002/05/01 03:20

VBScriptでしたら、Date関数を使えば出来ます。

ShiroNekoさんの例ですと、こんな感じです。

<input type="text" name="xDay1" size="12" maxlength="10" value="<%= date %>">

この回答への補足

早速の回答、ありがとうございます。
しかしこの方法だと date と言う、文字がセットされてしまうのですが
如何でしょうか　?

補足日時：2002/05/01 08:55

この回答へのお礼

済みません。お返事を忘れていました。

お礼日時：2006/02/06 17:51