UC知道请教有关sql的问题
来源：百度知道 编辑：UC知道 时间：2024/05/22 14:16:01
我有一个表就一个字段test，其有5条记录，值分别为：A,B,C,D,E .
请问我怎么样才能做到将至个表test改写成一条记录，其值为"A B C D E"
我有一段代码，将各条记录的值已经遍历查出来了，可是下面我不会了，请哪位高手指点一下啊！
If rs.EOF = False Then
For i = 0 To rs.RecordCount - 1
aa(i) = rs("pwd")
rs.MoveNext
MsgBox aa(i)
Next i
End If
我昨晚在大街上溜达了一会儿，回去，一下就弄出来了，呵呵，不过大家回答的都挺好，就把分儿给回答的详细又最早的那个朋友吧，呵呵：）
请问我怎么样才能做到将至个表test改写成一条记录，其值为"A B C D E"
我有一段代码，将各条记录的值已经遍历查出来了，可是下面我不会了，请哪位高手指点一下啊！
If rs.EOF = False Then
For i = 0 To rs.RecordCount - 1
aa(i) = rs("pwd")
rs.MoveNext
MsgBox aa(i)
Next i
End If
我昨晚在大街上溜达了一会儿，回去，一下就弄出来了，呵呵，不过大家回答的都挺好，就把分儿给回答的详细又最早的那个朋友吧，呵呵：）
楼主可以参考以下代码:
这里假定,
表名:test
字段名:FldName
conn是数据库连接对象,并已经连接到了数据库.
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from test"
rs.open sql,conn,1,3
while not rs.eof
str=trim(str&" "&rs("FldName"))
rs.movenext
wend
response.Write(str)'回显在屏幕上,看是否正确.
'如果要存回原来的表中,并删除原来表中的记录,那么就增加以下两行代码:
sql="delete from test insert into test values ('"&str&"')"
conn.execute sql
%>
你可以把记录全部去出来然后用字符串把他们拼接出来就可以拉啊。
SELECT A+B+C+D+E FROM TEST
dim str as string
If rs.EOF = False Then
For i = 0 To rs.RecordCount - 1
aa(i) = rs("pwd")
rs.MoveNext
str=str & aa(i)
Next i
msgbox str '看看str是不是你想要的东西
End If
str就是所有字段合并的内容
先执行一个（delete语句）删除语句：把5条记录都删掉
再执行一个（insert语句）添加语句：把取好的5条记录的合并后的STR添加到数据库中