This grid was created using the SimpleGrid plug-in!
Compare it to ex1simple.asp - which is a LiveGrid.
<%
dim grid,r,c
const numcol=15
set grid=new SimpleGrid ' create instance of class
' define heading
grid.AddHeadingRow true
for c=1 to numcol
grid.AddCell "Column " & c
next
' define data
for r=1 to 100
grid.AddDataRow
grid.AddCell r
for c=2 to numcol
grid.AddCell "Cell " & r & ":" & c
next
next
select case lcase(Request.QueryString("fmt"))
case "xl": grid.RenderExcel "rico.xls"
case "csv": grid.RenderDelimited "rico.csv", ",", ""
case else: grid.Render "ex1", 1 ' output html
end select
set grid=Nothing ' clean up
%>