Forgot Password ??

PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone

	Registered : 109,027

HOME > ASP > ASP Forum > ช่วยแก้โค้ดหน่อยครับ คือถ้าหากต้องการให้รัน ปี อัตโนมัตเป็น ปีของไทยต้องแก้อย่างไรครับ

ช่วยแก้โค้ดหน่อยครับ คือถ้าหากต้องการให้รัน ปี อัตโนมัตเป็น ปีของไทยต้องแก้อย่างไรครับ

เริ่มหัวข้อใหม่

Guest

คือถ้าหากต้องการให้รัน ปี อัตโนมัตเป็น ปีของไทยต้องแก้อย่างไรครับ
ขอบพระคุณครับ
<%
curYear = request("curYear") ' สร้างตัวแปรชื่ออะไรก็ได้ เพื่อรับค่าจากการใส่ปี
if curYear = "" then
curYear = Year(date)
end if

Dim cyear(5)
cyear(0) =2543 ' ตัวเลขของปี ต้องดูก่อนว่าเครื่องเป็น web server น่ะ ตั้งเป็นปี อังกฤษ หรือ ปีไทย แต่แนะนำว่าควรตั้งเป็นปีอังกฤษ (ค.ศ.) จะดีกว่า
cyear(1) =2544
cyear(2) =2545
cyear(3) =2546
cyear(4) =2547
cyear(5) =2548

ycount = 0 ' สร้างตัวนับค่าใน Array ชื่อ cyear เพื่อ ว่าต่อไปถ้าต้องการเพิ่มปี ก็ใส่เป็น cyear(6) = 2007 เป็นต้น แล้วเปลี่ยน cyear(5) เป็น cyear(6)
for each item in cyear
ycount = ycount+1
next
%>
<SELECT NAME="curYear">
<% for i = 1 to ycount %>
<option <%if cyear(ycount-i) = Cint(curYear) then%>selected <%end if%>value=<%=cyear(ycount-i)%>> <%=cyear(ycount-i)%>  
<% next %>
</select>

Tag : - - - -

Date : 25 Mar 2546 06:19:40

By : มอส

View : 3276

Reply : 1

No. 1

Guest

Go to : ASP Session.CodePage() - Session Object

ตัวนี้ช่วยได้

Date : 2011-07-02 18:40:09

By : thaicreate

ค้นหาข้อมูล

แสดงความคิดเห็น

Re : ช่วยแก้โค้ดหน่อยครับ คือถ้าหากต้องการให้รัน ปี อัตโนมัตเป็น ปีของไทยต้องแก้อย่างไรครับ

รายละเอียด

เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

อัพโหลดแทรกรูปภาพ

Notice

เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ
อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง

เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง

โดย

อีเมล์

บวกค่าให้ถูก

<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)

Exchange: นำเข้าสินค้าจากจีน, Taobao, เฟอร์นิเจอร์, ของพรีเมี่ยม, ร่ม, ปากกา, power bank, แฟลชไดร์ฟ, กระบอกน้ำ

Load balance : Server 02

Registered : 109,027

No. 1

ค้นหาข้อมูล

อัพโหลดแทรกรูปภาพ

Notice