การสร้าง 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 : http://www.siamfocus.com/
► LINE@ : http://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
--------------------------








บทความ แนะนำ




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