close
Dim dd = Calendar1.SelectedDates
Dim ddstr As String = ""
For Each mm In dd
ddstr = ddstr + mm.ToString.Substring(0, 10) + ">>用日期去搜索資料庫" + vbNewLine
Next
TextBox_Calendar.Text = ddstr
'---------------------
Response.Write("根目錄：" + Server.MapPath("~\\") + "
")
Response.Write("檔案目前位置：" + Server.MapPath(".\\") + "
")
全站熱搜
留言列表
