1.
Dim
strStartDate
2.
intMonth
3.
i
4.
strStartDate =
"05/11/2010"
5.
intMonth = 5
6.
For
i = 1
To
7.
Response.write DateAdd(
"m"
,1,
CDate
(strStartDate)) &
"<br>"
8.
Next
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง