回 帖 发 新 帖 刷新版面

主题:[讨论]急,急,急,急!!!请大家帮忙解决更新过程中的问题?急!!!

当把代码中更新日期的部分去掉,可以实现数据库里一张表的更新,但时间没有更新;当加上更新时间的代码,其他表里的字段不可以更新.更新时间代码为注释的地方
代码如下:
<!--#include file="conn.asp"-->
<html>
<head>
<% sqlrq="select * from system"
   set rsrq=server.createobject("adodb.recordset")
   rsrq.open sqlrq,conn,1,3
   if(datediff("d",date,rsrq("tq_csh")))=0 then
   response.redirect("6_11_1.asp")
   else
   sql="select * from weather"
   set rs=server.createobject("adodb.recordset")
   rs.open sql,conn,1,3
%>
<title>天气情况添加管理</title>
<style type="text/css">
<!--
.STYLE1 {color: #990000}
-->
</style>
</head>
<style>
td{font-family:"宋体";
   font-size:12px;
   }
</style>
<body>
<center><h1><font color="#000099">天气预报管理</font></h1></center>
<hr color="green"><br/>
<form name="form3" method="post" action="">
<input type=hidden name=ctype value=types>
<table width="100%" border="1" cellpadding="0" cellspacing="0">
  <tr>
    <td><div align="center" class="STYLE1"><strong>城市</strong></div></td>
    <td><div align="center" class="STYLE1"><strong>天气</strong></div></td>
    <td><div align="center" class="STYLE1"><strong>最高温度-最低温度</strong></div></td>
    <td><div align="center" class="STYLE1"><strong>风向风力</strong></div></td>
    <td><div align="center" class="STYLE1"><strong>紫外线强度</strong></div></td>
    <td><div align="center" class="STYLE1"><strong>穿衣指数</strong></div></td>
    <td><div align="center" class="STYLE1"><strong>舒适度</strong></div></td>
    <td><div align="center" class="STYLE1"><strong>空气质量指数</strong></div></td>
    <td><div align="center" class="STYLE1"><strong>旅行指数</strong></div></td>    
  </tr>
<% 
   do while not rs.eof
   j=j+1
%>
   <tr><td><input type="text" name="cs<%=j%>" value="<%=split(rs("city"),",")(0)%>" size=6 style="background-color:yellowgreen"></td></tr>
<% for i=1 to 2 %>
  <tr>
    <td></td>
    <td><select name="tianqi<%=j%>">
    <option value="<%=trim(split(rs("tq"),",")(i))%>" selected><%=trim(split(rs("tq"),",")(i))%></option>
    <option value="晴">晴</option>
<option value="多云">多云</option>
<option value="阴">阴</option>
<option value="晴转多云">晴转多云</option>
<option value="阴转多云">阴转多云</option>
<option value="小雨">小雨</option>
<option value="中雨">中雨</option>
<option value="阵雨">阵雨</option>
<option value="雷阵雨">雷阵雨</option>
</select></td>
    <td>
      <input type="text" name="max<%=j%>" size=4 value="<%=trim(split(rs("wd1"),",")(i))%>">
      --
      <input type="text" name="min<%=j%>" size=4 value="<%=trim(split(rs("wd2"),",")(i))%>">    </td>
    <td>
      <input type="text" name="fxfl<%=j%>" size=20 value="<%=trim(split(rs("feng"),",")(i))%>">    </td>
    <td><select name="zwxqd<%=j%>">
    <option value="<%=split(rs("zwx"),",")(i)%>" selected><%=trim(split(rs("zwx"),",")(i))%></option>
    <option value="0">0</option>
<option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
<option value="6">6</option>
<option value="7">7</option>
<option value="8">8</option>
<option value="9">9</option>
<option value="10">10</option>
</select>级</td>
    <td><select name="cyjs<%=j%>">
    <option value="<%=trim(split(rs("cy"),",")(i))%>" selected><%=trim(split(rs("cy"),",")(i))%></option>
    <option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
</select>级</td>
    <td><select name="ssdjs<%=j%>">
    <option value="<%=trim(split(rs("ssd"),",")(i))%>" selected><%=trim(split(rs("ssd"),",")(i))%></option>
    <option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
</select>级</td>
    <td><select name="kqjs<%=j%>">
    <option value="<%=trim(split(rs("kq"),",")(i))%>" selected><%=trim(split(rs("kq"),",")(i))%></option>
    <option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
</select>级</td>
    <td><select name="lxjs<%=j%>">
    <option value="<%=trim(split(rs("lx"),",")(i))%>" selected><%=trim(split(rs("lx"),",")(i))%></option>
    <option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
</select>级</td> 
  </tr>
<% next %>
<tr>
    <td></td>
    <td><select name="tianqi<%=j%>">
    <option value="晴">晴</option>
<option value="多云">多云</option>
<option value="阴">阴</option>
<option value="晴转多云">晴转多云</option>
<option value="阴转多云">阴转多云</option>
<option value="小雨">小雨</option>
<option value="中雨">中雨</option>
<option value="阵雨">阵雨</option>
<option value="雷阵雨">雷阵雨</option>
</select></td>
    <td>
      <input type="text" name="max<%=j%>" size=4>
      --
      <input type="text" name="min<%=j%>" size=4>    </td>
    <td>
      <input type="text" name="fxfl<%=j%>" size=20>    </td>
    <td><select name="zwxqd<%=j%>">
    <option value="0">0</option>
<option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
<option value="6">6</option>
<option value="7">7</option>
<option value="8">8</option>
<option value="9">9</option>
<option value="10">10</option>
</select>级</td>
    <td><select name="cyjs<%=j%>">
    <option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
</select>级</td>
    <td><select name="ssdjs<%=j%>">
    <option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
</select>级</td>
    <td><select name="kqjs<%=j%>">
    <option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
</select>级</td>
    <td><select name="lxjs<%=j%>">
    <option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
</select>级</td> 
  </tr>
<%  if request("ok")="管理更新" then
    if trim(request("max"&j))<>"" and trim(request("min"&j))<>"" and trim(request("fxfl"&j))<>""  then
    rs("city")=trim(request("cs"&j))
    rs("tq")=trim(request("tianqi"&j))
    rs("wd1")=trim(request("max"&j))
    rs("wd2")=trim(request("min"&j))
    rs("feng")=trim(request("fxfl"&j))
    rs("zwx")=trim(request("zwxqd"&j))
    rs("cy")=trim(request("cyjs"&j))
    rs("ssd")=trim(request("ssdjs"&j))
    rs("kq")=trim(request("kqjs"&j))
    rs("lx")=trim(request("lxjs"&j))
    rs.update 
    end if
end if
    rs.movenext
    loop
    rs.close
    set rs=nothing
'    rsrq("tq_csh")=date
'rsrq.update
'rsrq.close
'set rsrq=nothing
    end if  
%>
</table>
<br/>
<center><input type="submit" value="管理更新" name="ok"></center>
</form>
<a href="6_11_1.asp">管理</a>
<hr>
</body>
</html>

rsrq("tq_csh")=date
rsrq.update
rsrq.close
set rsrq=nothing
加上之后就不能更新,天气表里的数据,数据库是access,.system表里存放了tq_csh变量,另外对本程序有用的是weather表,去掉上面的代码可以实现对weather表的更新,加上之后weather表里的数据不改变,system表里的日期改变.上面的代码想实现更新weather表里的数据之后更新system表里的tq_csh(日期)
[color=000000][/color][em10]

回复列表 (共1个回复)

沙发

代码太多,格式不好,而且没有必要的注释,很难让我有信心看下去,抱歉.
第七行代码很别扭
if(datediff("d",date,rsrq("tq_csh")))=0 then 
而且没有缩进,END IF 似乎找不到.所以只好帮你分析下可能的原因.

数据更新失败原因很多,特别是日期时间上的。如果字段的数据类型是日期时间类型,那么你可以试下改用字符类型来存放时间日期数据.
另外,更新操作中,如果对一条记录中某个字段更新失败,那么显然这条记录也同样不会更新,所以你说把更新日期的代码去掉就能正常更新,而加上则不能,也是这个原因,在这里也可以发现确实是日期更新的代码错误了.(可能是代码错误,也可能是数据类型的错误,但是代码错误一般应该有出错提示,而数据类型导致更新失败的话就不会有错误提示出现.)

我来回复

您尚未登录,请登录后再回复。点此登录或注册