การสร้าง Table แบบ dynamic

การสร้าง Table แบบ dynamic





<%
Option Explicit
Dim row,numTD
Dim iLoop,kLoop

CONST allData = 19 'จำนวนข้อมูล
CONST column = 2  'จำนวน หลัก
row = 0
numTD = 0

If allData mod column > 0 Then
row = (allData/column)+1
Else
row = allData/column
End if

Response.Write ""

For iLoop = 1 To row
Response.Write "
"
For kLoop = 1 To column
numTD = numTD+1

Response.Write "
"
Next
Response.Write "
"
Next

Response.Write "
"
 
If numTD > allData Then
Response.wRite " "
Else
Response.Write numTD
End if

Response.Write "
"
 
%>

 


 


ฝากติดตามผลงานด้านล่างด้วยครับ
--------------------------
► Website : https://www.siamfocus.com/
► LINE@ : https://line.me/ti/p/@siamfocus.com
► Facebook : https://www.facebook.com/fanpage.siamfocus
► Twitter : https://twitter.com/siamfocus
► Google+ : https://plus.google.com/+TAAMSiAMFOCUS
► Instagram : https://www.instagram.com/iamtaam
--------------------------










บทความ แนะนำ

อันตรายจากบุหรี่

อันตรายจากบุหรี่

การสูบบุหรี่ เป็นปัญหาเกี่ยวกับสุขภาพอนามัยที่สำคัญปัญหาหนึ่งของโลกในปัจจุบัน โรคภัยอันเกี่ยวเนื่องม...

SEO คืออะไร

SEO คืออะไร

SEO คืออะไร??? ใครรู้บ้าง??? หลายๆ คนคงได้ยินคำว่า SEO มาบ้าง ซึ่งคำว่า SEO นั้นย่อมาจากคำว่า Sea...




หมวดหมู่บทความ