※ ChatGPTを利用し、要約された質問です(原文:selecetタブで同じ値を取得する方法について)
selectタブで同じ値を取得する方法について
このQ&Aのポイント
selectタブで日付を当日から30日分表示させる方法を探していますが、解決できません。
ニッポンレンタカーのトップページのように、出発日を選択すると返却日も同日になるようにしたいです。
ご教示いただける方がいらっしゃいましたら、よろしくお願いします。
selecetタブで日付を当日から30日分表示させるようにしております。
開始日と終了日ともにname以外は、全く同じソースです。
開始日の日付を選択したら、終了日の日付が開始日と同日にしたいと思ってます。
色々と調べてみたのですが、解決できません。
ニッポンレンタカー(http://www.nipponrentacar.co.jp/)のトップページにある
「ご希望の出発日時・返却日時」のイメージです。
出発日を選択すると返却日も同日になる。
<select name="yoyakustart">
<%
objNow = Date()
objWeekDayNo = Weekday(Date)
Cnt = 1
Do Until Cnt > 30
objWeekDay = WeekdayName(objWeekDayNo, True)
strDate = FormatDateTime(objNow, 2)
sDate = month(strDate) & "/" & day(strDate)
%>
<option value="<%=Response.Write(objNow)%>"><%=Response.Write(sDate)%> (<%=Response.Write(objWeekDay)%>)</option>
<%
objNow = objNow + 1
Cnt = Cnt + 1
objWeekDayNo = objWeekDayNo + 1
if objWeekDayNo = 8 then
objWeekDayNo = 1
end if
Loop
%>
</select>
お分かりの方がいらっしゃいましたらご教示お願いします。
お礼
回答ありがとうございます。 思い通りに動作しました。 困っていたので、大変助かりました。