|
 |
| |
ถามเกี่ยวกับการตรวจเวลาหมดอายุครับ คือผมจะเช็คก่อน หมดเวลาอายุ ของสมาชิกอ่ะครับ เช่น ผมมีเวลาเก็บไว้ใน ฐานข้อมูลว่า |
| |
 |
|
|
 |
 |
|
หรือไม่ก็กำหนดว่า
ถ้า วันนี้ ( วันที่สมาชิก Login ) มากกว่า 10/11/2007 ก็ขึ้นว่า หมดอายุสมาชิกแล้ว
และ ถ้า เวลายังไม่ถึง 10/11/2007 ก็ให้ใช้งานได้ตามปรกติ แบบนี้อ่ะครับ 
|
 |
 |
 |
 |
| Date :
23 ธ.ค. 2550 21:03:42 |
By :
tor6thai |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
| |
|
|
|
| |
|
ถ้าเป็นแบบที่สองนี้ได้ จะดีมากเลยครับ เพราะเราสามารถกำหนด เพิ่ม หรือ ลดวันหมดอายุได้ เพียงแค่แก้ วันหมดอายุ
|
| |
|
|
| |
| Date :
23 ธ.ค. 2550 21:04:47 |
By :
tor6thai |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
แบบที่ 1 การใช้ Opeter โดยตรงกับข้อมูล ชนิด Date/Time
คุณเก็บทั้งวันสมัครและ วัน หมดเลยเหรอ จริงๆ เก็บอย่างใดอย่างหนึ่งก็พอ
กรณีเช็คกับวันสมัคร
if cdate(วันสมัคร)- cdate(Now()) >30 then ........
กรณีเช็คกับวันหมดอายุ
if Cdate(now())> cdate(วันหมดอายุ) then...
แบบที่ 2 การใช้ ฟังก์ชั่นพิ้นฐานเข้ามาช่วย
DateAdd()
if Dateadd("d",30,วันสมัคร) < Date() then ....
DateDiff...
if Datedif( "d",วันที่สมัคร, Date()) >30 then ....
|
| |
|
|
| |
| Date :
24 ธ.ค. 2550 15:05:06 |
By :
GTM |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
ขอบคุณคุณ GTM มากๆเลยนะครับผม สำหรับคำตอบ
แต่ว่าผมลองเอาไปใช้ดู
<%
Dim date5
date5=30/12/2007
if Cdate(Date) > cdate(Date5) then
response.Write("หมดอายุแล้ว")
else
response.Write("ยังไม่หมดอายุ")
end if
%>
มันกลับขึ้น หมดอายุแล้ว ตลอดเลยอ่ะครับ ไม่ทราบว่าโค้ดผิดตรงใหนรบกวนดูให้หน่อยครับ
ลองแบบ if Cdate(Date()) > cdate(Date5) then แล้วก็ ยังหมดอายุเหมือนเดิมเลยครับ
|
| |
|
|
| |
| Date :
25 ธ.ค. 2550 08:46:50 |
By :
tor6thai |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
cdate(Date5) ผิดครับ
คุณเช็คดูครับ ว่ามันฟอร์แมตเหมือนกับ cdate(Date) ของคุณหรือเปล่า
โดยทดสอบดังนี้
<%
Dim date5
date5=30/12/2007
response.Write "cDate(date) = " & cdate(date)
response.Write "cDate(date5) = " & cdate(date5)
%>
แล้วดูผลมันก่อนครับ ผมว่าการป้อนค่า เข้า Date5 ผิดหลักครับ อาจต้องใช้ Dateserial เข้ามาช่วยถ้ากลัวสับสน
แล้วค่อยใช้เงื่อนไขตรวจสอบครับ
เช่น
Dim Date5
date5 = Dateserial(2007,12.30)
if Cdate(Date) > cdate(Date5) then
response.Write("หมดอายุแล้ว")
else
response.Write("ยังไม่หมดอายุ")
end if
|
| |
|
|
| |
| Date :
25 ธ.ค. 2550 16:41:06 |
By :
GTM |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
รูปบบมันไม่ตรงจริงๆด้วยครับ
แต่ก็ไม่รู้จะทำไงแล้ว เพราะค่าใน db มันมีให้มารูปแบบเป็น 12/12/2007 ประมาณนี้
ทำยังไง ให้ Date5 ข้อมูลเหมือน Cdate(Date) ได้ล่ะครับ ในเมื่อ รูปแบบมันมาแบบ 12/12/2007 ไม่ได้มาเป็น 2007,12.30
|
| |
|
|
| |
| Date :
26 ธ.ค. 2550 04:35:38 |
By :
Tor6thai |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
<%
d=Cdate(Date())
d2=Cdate(12/12/2007)
%>
<%=d%><br>
<%=d2%>
แบบนี้ผลที่ออกมาคือ
26/12/2550
0:00:43
|
| |
|
|
| |
| Date :
26 ธ.ค. 2550 04:56:38 |
By :
tor6thai |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
ผมลองไปค้นหาข้อมูลเพิ่มเติมจากที่คุณ GTM ได้ชี้แนะมา ได้ข้อมูลเพิ่มที่
http://www.w3schools.com/vbscript/func_cdate.asp
พบกว่า การใส่เครื่องหมาย ## สามารถให้ค่าที่ถูกต้องของวันที่ได้ครับ
<%
d=Cdate(Date())
d2=#2/12/2007#
if d > d2 then
response.write ("หมดอายุแล้ว")
else
response.write ("ยังไม่หมดอายุ")
end if
%>
ผลจากการทดลอง พบว่าทำงานได้ถูกต้องครับ ตรวจสอบวันเดือนปี ถูกต้อง
แต่ ........
ข้อมูลใน db มันมีแค่ 12/12/2007 แล้วผมจะทำอย่างไรให้ # เข้าไปอยู่ข้างหน้าและข้างหลังได้ ( เวลาทดสอบเราพิมพ์เอาได้ แต่เวลาคิงรี่มา มันไม่มีให้
ต้องทดสอบต่อไป 
|
| |
|
|
| |
| Date :
26 ธ.ค. 2550 05:06:48 |
By :
Tor6thai |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
คิดว่าน่าจะใช้ได้แล้วล่ะครับ เพราะค่าที่นำมาจาก db มันไม่คิดว่า เครื่องหมาย / เป็นการหาร ฃ
ขอบคุณอีกครั้งสำหรับคำตอบ แต่ผมก็มีปัญหาที่อยากถามต่อในหัวข้อใหม่ อิอิ
|
| |
|
|
| |
| Date :
26 ธ.ค. 2550 06:08:11 |
By :
tor6thai |
|
|
| |
|
|
|
|
|
| |
|
|
|
|
|
| |
|
 Load balance : Server 01
|
