看看这代码有什么问题？（急！！！！！）

[dgsrest]

<tr>
<td><center>分类代码</center></td>
<td><select name="fcode" size="1">
<%
set rs3=server.createobject("ADODB.recordset")
rs3building="select * from capitalcode where left(fldm,1)='b'"
rs3.open rs3building,dbJWC,3,2
Do While Not rs3.EOF
%>
<option vaule=<%=rs3("fldm")%>><%=rs3("lbmc")%></option>
<%
session("flag_code")=rs3("fldm")
m=session("flag_code")
rs3.movenext
loop
%>
<%
rs3.close
set rs3=nothing
%>
</select>
</td>
<td><center>资产编号</center></td>
<%
set rs4=server.createobject("ADODB.recordset")
rs4flag="select zcbh from capital where fldm=&m order by zcbh"
rs4.open rs4flag,dbJWC,3,2
rs4.movelast
%>
<td><input type="text" name="zcode" size="20" value=<%=cstr(cint(rs4("zcbh")+1))%> readonly></td>
</tr>
提示的错误是：Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
所出错的行是：rs4flag="select zcbh from capital where fldm=&m order by zcbh"
该怎么样改正才行呢？麻烦大家了！！！！！

[cxyong1476]

看你也是高手了,怎么犯这种错误呢?
[e-mail]

[vulcan]

rs4flag="select zcbh from capital where fldm='"& m &"' order by zcbh"

[hubinasm]

rs4flag="select zcbh from capital where fldm=&m order by zcbh"

--->


rs4flag="select zcbh from capital where fldm="&m&" order by zcbh"

[lmstone]

rs4flag="select zcbh from capital where fldm=&m order by zcbh"
改为:
rs4flag="select zcbh from capital where fldm="&m&" order by zcbh"
如果字段fldm字段不为数字型则

rs4flag="select zcbh from capital where fldm='"&m&"' order by zcbh"

[炜娓道来程序人生]

m是字符型rs4flag="select zcbh from capital where fldm='"& m &"' order by zcbh"
m是数字型rs4flag="select zcbh from capital where fldm="& m &" order by zcbh"

[dgsrest]

这样改了之后提示 rs4.movelast 有错。
具体是：ADODB.Recordset (0x800A0BCD)

[luckyhongyu]

rs4flag="select zcbh from capital where fldm='"&m&"' order by zcbh"

[dgsrest]

这样改了之后提示 rs4.movelast 有错。
具体是：ADODB.Recordset (0x800A0BCD

[vulcan]

if not rs4.eof then
rs4.movelast
.....


end if