<%
dim rs,field,datatable	
set rs=db.rs : rs.open ("select top 25 * from testdata")

datatable="<tr>"

'get headers
for each field in rs.fields	
	datatable=datatable & "<th scope=""col"">" & aspL.sanitize(field.name) & "</th>"		
next

datatable=datatable & "</tr>"

while not rs.eof	

	datatable=datatable & "<tr>"

	for each field in rs.fields	
		datatable=datatable & "<td>" & aspL.sanitize(rs(field.name)) & "</td>"
	next
	
	datatable=datatable & "</tr>"
	
	rs.movenext

wend

set rs=nothing

set form=aspl.form
form.doscroll=true
	
'result
dim feedback : set feedback=form.field("plain")
feedback.add "html","<table class=""table table-striped""><tbody>" & datatable & "</tbody></table>"

form.build()

%>