字符串与变量拼凑
日期：2014-05-16 浏览次数：20918 次
字符串与变量拼接
红色那句话总是提示出错：缺少对象
是不是第九行的rs1("dbxx_m"&i&"") 的字符串与变量拼接错了？？
------解决方案--------------------
rs1("dbxx_m"&i&"") 修改為 rs1("dbxx_m" & i )
"update ems_dbxx set dbxx_lastmonth='"&i&"'" 修改為 "update ems_dbxx set dbxx_lastmonth='" & i & "'"
就可以了
------解决方案--------------------
请问你是否想设置记录集中的内容的重复区域
一下是代码，已经测试成功！希望对你有帮助！
别忘了引用数据库驱动！
<body>
<%
sql1="select * from ems_dbxx"
Set rs1=Server.CreateObject("ADODB.RecordSet")
rs1.Open sql1,Conn,1,2
%>
<table width="200" border="1">
<tr>
<td> </td>
<td> </td>
<td><%
if rs1.eof and rs1.bof then
response.write"<script>alert('错误！');</script>"
else
while not(rs1.eof)
for i=2 to 1
if rs1("dbxx_m"&i)<>"" then
Conn.Execute("update ems_dbxx set dbxx_lastmonth='"&i&"'" )
end if
next
%></td>
</tr>
<tr>
<td> </td>
<td><%=rs1("dbxx_m"&i)%></td>
<td><%
rs1.movenext
wend
end if %> </td>
</tr>
</table>
</body>
sql1="select * from ems_dbxx "
Set rs1=Server.CreateObject("ADODB.RecordSet")
rs1.Open sql1,Conn,3,3
if rs1.eof and rs1.bof then
response.write"<script>alert('错误！');</script>"
else
while not(rs1.eof)
for i=12 to 1 Step -1
if rs1("dbxx_m"&i&"") is not null then
Conn.Execute("update ems_dbxx set dbxx_lastmonth='"&i&"'")
end if
next
rs1.movenext
wend
end if
红色那句话总是提示出错：缺少对象
是不是第九行的rs1("dbxx_m"&i&"") 的字符串与变量拼接错了？？
------解决方案--------------------
rs1("dbxx_m"&i&"") 修改為 rs1("dbxx_m" & i )
"update ems_dbxx set dbxx_lastmonth='"&i&"'" 修改為 "update ems_dbxx set dbxx_lastmonth='" & i & "'"
就可以了
------解决方案--------------------
请问你是否想设置记录集中的内容的重复区域
一下是代码，已经测试成功！希望对你有帮助！
别忘了引用数据库驱动！
<body>
<%
sql1="select * from ems_dbxx"
Set rs1=Server.CreateObject("ADODB.RecordSet")
rs1.Open sql1,Conn,1,2
%>
<table width="200" border="1">
<tr>
<td> </td>
<td> </td>
<td><%
if rs1.eof and rs1.bof then
response.write"<script>alert('错误！');</script>"
else
while not(rs1.eof)
for i=2 to 1
if rs1("dbxx_m"&i)<>"" then
Conn.Execute("update ems_dbxx set dbxx_lastmonth='"&i&"'" )
end if
next
%></td>
</tr>
<tr>
<td> </td>
<td><%=rs1("dbxx_m"&i)%></td>
<td><%
rs1.movenext
wend
end if %> </td>
</tr>
</table>
</body>
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
