如何 在VS2005中 使用JavaScript開日曆新視窗功能

1.         準備日曆視窗Calendar.aspx, 加入日曆控制項

2.   在日曆視窗頁的後端, SelectionChanged事件中撰寫程式, 將點選的值帶回呼叫頁的textbox中

        '將選擇的日期帶回呼叫頁的textbox
        Dim script As String = ""
        '選擇的日期
        Dim returnValue As String = Me.Calendar1.SelectedDate.ToShortDateString
        '組出javascript將值傳回
        script += "<script>"
        script += "window.opener.document.all." + Request.QueryString("fieldClientID") + ".value='" + returnValue + "';"
        script += "window.close();"
        script += "</script>"
        ClientScript.RegisterStartupScript(Me.GetType, "", script)

3.   在呼叫頁,拉出一個textbox和一個html的input button控制項, 並取好ID名稱

4.   在inputbutton控制項點選右鍵, 選擇”以伺服器控制項執行”

5.   在aspx頁撰寫Javascript

<script language=javascript type="text/javascript" >
function choiceDate(fieldClientID)
{   
    window.open('Calendar.aspx?fieldClientID='+fieldClientID.id,'','width=220,height=220','');  
}
</script>

6.   在aspx.vb頁撰寫下列程式

        Dim btn As HtmlInputButton
        Dim txb As TextBox
        '設定訂購日期選取
        txb = Me.FindControl("Order_Date")
        btn = Me.FindControl("btn_Calendar_OrderDate")
        btn.Attributes("onclick") = "choiceDate(" + txb.ClientID + ");"

7.     大功告成, 可以使用日曆彈出功能~!