记录集给变量赋值

[coobing]

我不知道记录集如何给变量赋值的格式是怎么样的，请帮助，谢谢

[coobing]

谢谢了，我好像就是这么赋的值，但说错误

[sky0120]

??

Dim Name,age
set rs=conn.execute("select name,age from userinfo where id=1")
if not rs.eof then
Name=rs("name")
age=rs("age")
end if