|
|
主题: 怎样把Recordset里的数据存成数组？
|
天堂魔神
职务：普通成员
等级：1
金币：0.0
发贴：42
注册：2002/7/10 5:27:25
|
#12003/6/27 11:04:14
<%
function memberinfo(userid)
if isnull(userid) or isempty(userid) then
data = "Invalid data"
else
sql = "SELECT * FROM members WHERE userid = "&userid&""
set rs = conn.execute(sql)
end if
end function
%>
我想把 rs 存成一个数组，请问怎样实现？
Dim info as array
info = rs
8行啊~~
|
janlay
职务：管理员
等级：7
金币：28.0
发贴：7244
注册：2003/11/27 18:07:11
|
#22003/6/27 11:57:28
....
dim arrInfo,intRow,intRows
arrInfo=rs.GetRows
intRows=UBound(arrInfo,2)
rs.close
For intRow=0 To intRows
...
|
天堂魔神
职务：普通成员
等级：1
金币：0.0
发贴：42
注册：2002/7/10 5:27:25
|
#32003/6/27 12:32:13
噢~~~~
这样啊~~~
谢谢~！
|
{ 在指尖上绽放的花朵 }
职务：普通成员
等级：5
金币：14.0
发贴：3209
注册：2002/7/25 21:24:11
|
#42003/6/27 13:00:32
来晚了……
|
