bajopalabra said:
ok, i suspect we have something
try changing
session("data") = rs.GetRows( i )
for
session("data") = rs.GetRows( )
OK, I made the change. Still no problem:
<%
if len(Request.Form("rows"))=0 then
session("test1") = "Here I am"
session("test2") = "I am here too"
end if
dim rs, i,j
i=Request.Form("rows")
if len(i)=0 then i = 5
set rs=createobject("adodb.recordset")
rs.Fields.append "id",3
rs.Fields.append "col1",200,50
rs.Fields.append "col2",200,50
rs.Open
for j = 1 to i
rs.AddNew array("id","col1","col2"), _
array(j,"this is some test data ","this is some more test data")
next
'Response.Write rs.RecordCount
rs.MoveFirst
session("data") = rs.GetRows()
rs.Close
%>
<html><body><form method="post">
Enter rows to store: <input name="rows" type="text" value="<%=i%>"><BR>
Session("test1"): <%=Session("test1")%><BR>
Session("test2"): <%=Session("test2")%><BR>
Session("data"): <BR>
Contains <%=ubound(session("data"),2) + 1%> records<BR>
First record: <%=Session("data")(0,0) & " - " & Session("data")(1,0)%><BR>
<INPUT type="submit" value="Submit" id=submit1 name=submit1>
</form></body></html>