急!!ASP问题!怎样读取数据后转存另外一数据表
麻烦帮忙看下下面代码哪里有问题...
如果答案不方便在此发布可以发到我邮箱best-web@163.com或联系MSN:stone@77itcn.com


<!---#include file= "conn.asp "--->
<%
set rs=server.createobject( "adodb.recordset ")
rs.open "select * from sdhm ",conn,1,1
%>
<%
if not rs.eof then
do while not rs.eof
%>
<%
a=rs( "设备号码 ")
c=rs( "网话费 ")
d=rs( "市话费 ")
e1=rs( "国内费用 ")
e2=rs( "国际费用 ")
e3=rs( "港澳台长话 ")
e4=rs( "IP国内费用 ")
e5=rs( "IP国际费用 ")
e6=rs( "IP港澳台费 ")
e=cdbl (e1) + cdbl (e2) + cdbl (e3) + cdbl (e4) + cdbl (e5) + cdbl (e6)

'到这里读取和求和完成了，后面的rs.close不知道需要不需要

rs.close
%>

<%
'这里我是想打开第二个表，然后找号码字段等于变量a的数据，然后将变量写入对应字段

set rs2=server.createobject( "adodb.recordset ")
sqltext= "select * from [号码表] where [号码]= " & a
rs2.open sqltext,conn,3,3
%>
<%
rs2( "网话 ")=c
rs2( "市话 ")=d
rs2( "长途 ")=e
rs2.update
rs2.close
'但是好像写不了...
%>


<%
'这里要再次打开下一条匹配记录，再次执行写入
rs.movenext
loop
end if
%>

访问这个程序的时候什么错误提示也没有，所有变量也都可以输出，只是不能转写入另外一个表中的对应字段...... 也就是说能读取但没有实现写入


[解决办法]
sqltext= "select * from [号码表] where [号码]= " & a

& a和&a一样吗?
看看是不是这里的问题.....