如何将出数据库中读出的值放进变量-----

来源：百度知道 编辑：UC知道 时间：2024/05/27 06:04:21
我有一个表...里面有十条记录我想将这十条记录分别放进十个变量里...
我想用FOR 语句来实现...

set rs=server.CreateObject("ADODB.RecordSet")
sql="select * from putsort"
rs.open sql,conn,1,3
if not rs.eof then
totalji=rs.recordcount
dim sortname
for i=0 to totalji
if rs.eof then exit for
aa=(cstr("sortname")&i)
aa=rs("name")
rs.movenext
next
response.Write(sortname3) //此句输不出任何东西....
call closeconn
end if

response.Write(aa) //此句得到最后一条记录的值....

请问怎么得到sortname0到sortname5的值?

哪位帮我成功完成...我再给出五十分.....

%>

asp的应该这样。把所有的值赋给一个动态数组
set rs=server.CreateObject("ADODB.RecordSet")
sql="select * from putsort"
rs.open sql,conn,1,3
if not rs.eof then
totalji=rs.recordcount

reDim sortname(totalji) '动态数组

for i=0 to totalji
if rs.eof then exit for
sortname(i)=rs("name")
rs.movenext
next

for j=0 to totalji
response.write(sortname(j)) '输出所有的
next
response.write(sortname(2)) '当然也可以输出任意的
response.write(sortname(4))

call closeconn
end if

response.Write(aa)要换个位置放

for i=0 to totalji
if rs.eof then exit for
aa=rs("name") '此处aa就是所取得的值,你可以用一个数组来代替,比如aa(i)
response.Write(aa) '放在此处
rs.movenext
next
---------------------------------------
最终解决方案:
Dim aa(4) as String
for i=0 to totalji
if rs.eof then exit for
aa(i)=rs("name")
rs.m