| 网站首页 | 业界新闻 | 群组 | 人才 | 下载频道 | 博客 | 代码贴 | 编程论坛
共有 115 人关注过本帖
标题:这段asp代码,有没有哪里写错了? 谢谢大虾帮忙看看
只看楼主 收藏
qq387673116
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2018-3-26
结帖率:0
  已结贴   问题点数:20  回复次数:2   
这段asp代码,有没有哪里写错了? 谢谢大虾帮忙看看
程序代码:
<%@ codepage=65001%>
<!--#include file="../adminydcx/inc/conn.asp"-->
<!--#include file="../adminydcx/error.asp"-->
<%
work
=Request("work")
IF work="add" Then
set rs=server.createobject("adodb.recordset")
 sql
="select * from kuaidi WHERE KD_id='"&Request.Form("id")&"'"
 rs.open sql,conn,
3,3
  rs(
"KD_id")        =Request("KD_id")
  rs(
"KD_sname")     =Request("KD_sname")
  rs(
"KD_from")      =Request("KD_from")
  rs(
"KD_to")        =Request("KD_to")
  rs(
"KD_ftime")     =Request("KD_ftime")
  rs(
"KD_ttime")     =Request("KD_ttime")
  rs(
"KD_stel")      =Request("KD_stel")
  rs(
"KD_yb")        =Request("KD_yb")
  rs(
"KD_gz")        =Request("KD_gz")
  rs(
"KD_wl")        =Request("KD_wl")   
  rs(
"KD_gb")        =Request("KD_gb")  
  rs(
"KD_gc")        =Request("KD_gc")
  rs(
"KD_gd")        =Request("KD_gd")
  rs(
"KD_gf")        =Request("KD_gf")
  rs(
"KD_gg")        =Request("KD_gg")
  rs(
"KD_gh")        =Request("KD_gh")
  rs(
"KD_gj")        =Request("KD_gj")
  rs(
"KD_gk")        =Request("KD_gk")
  rs(
"KD_gl")        =Request("KD_gl")
  rs(
"KD_gm")        =Request("KD_gm")
  rs(
"KD_gn")        =Request("KD_gn")
  rs(
"KD_go")        =Request("KD_go")
  rs(
"KD_gp")        =Request("KD_gp")
  rs(
"KD_gq")        =Request("KD_gq")
  rs(
"KD_gr")        =Request("KD_gr")
  rs(
"KD_gs")        =Request("KD_gs")
  rs(
"KD_gt")        =Request("KD_gt")
  rs(
"KD_gu")        =Request("KD_gu")
  rs(
"KD_gv")        =Request("KD_gv")
  rs(
"KD_gw")        =Request("KD_gw")
  rs(
"KD_gx")        =Request("KD_gx")
  rs(
"KD_gy")        =Request("KD_gy")                                   
   rs.update                                            
'更新數據表記錄
   rs.close
   
set rs=nothing
   Response.Write
"<SCRIPT LANGUAGE='JavaScript'>"
   Response.Write
"alert('操作成功!\n 資料已經成功修改!');"
   Response.Write
"window.self.close()"
   Response.Write
"</SCRIPT>"
ELSE
   sql
="select * from kuaidi where KD_id='"&Request("id")&"'"
   
set rs=Conn.execute(sql)
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>

<title>後台</title>
<style type="text/css">
<!--
body
{
    background-color
: #999999;
}
body,td,th
{
    font-size
: 12px;
}
.style1
{
    color
: #FFFFFF;
    font-weight
: bold;
}
-->
</style>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8"></head>
<body>
<form name="form1" method="post" action="../adminydcx/KD_edit.asp?work=add">
  <table width="100%"  border="0" cellpadding="3" cellspacing="1" bgcolor="#FFFFFF">
    <tr bgcolor="#666666">
      <td colspan="4"><span class="style1">快遞資料修改</span></td>
    </tr>
    <tr bgcolor="#CCCCCC">
      <td>提單號:</td>
      <td><input name="KD_id" type="text" id="KD_id" value="<%=rs("KD_id")%>"></td>
      <td>備註說明:</td>
      <td><input name="KD_sname" type="text" id="KD_sname" value="<%=rs("KD_sname")%>"></td>
    </tr>
    <tr bgcolor="#CCCCCC">
      <td>始發地:</td>
      <td><input name="KD_from" type="text" id="KD_from" value="<%=rs("KD_from")%>"></td>
      <td>目的地:</td>
      <td><input name="KD_to" type="text" id="KD_to" value="<%=rs("KD_to")%>"></td>
    </tr>
    <tr bgcolor="#CCCCCC">
      <td>發出日期:</td>
      <td><input name="KD_ftime" type="text" id="KD_ftime" value="<%=rs("KD_ftime")%>"></td>
      <td>轉運單:</td>
      <td><input name="KD_ttime" type="text" id="KD_ttime" value="<%=rs("KD_ttime")%>"></td>
    </tr>
    <tr bgcolor="#CCCCCC">
      <td>清關日期:</td>
      <td><input name="KD_stel" type="text" id="KD_stel" value="<%=rs("KD_stel")%>"></td>
      <td>郵件數量:</td>
      <td><input name="KD_yb" type="text" id="KD_yb" value="<%=rs("KD_yb")%>"></td>
    </tr>
    <tr bgcolor="#CCCCCC">
      <td>到站日期:</td>
      <td><input name="KD_gz" type="text" id="KD_gz" value="<%=rs("KD_gz")%>"></td>
      <td>國外物流信息:</td>
      <td><input name="KD_wl" type="text" id="KD_wl" value="<%=rs("KD_wl")%>"></td>
    </tr>   
    <tr bgcolor="#CCCCCC">
      <td>跟蹤1:</td>
      <td><input name="KD_gb" type="text" id="KD_gb" value="<%=rs("KD_gb")%>"></td>
      <td>跟蹤2:</td>
      <td><input name="KD_gc" type="text" id="KD_gc" value="<%=rs("KD_gc")%>"></td>
    </tr>   
    <tr bgcolor="#CCCCCC">
      <td>跟蹤3:</td>
      <td><input name="KD_gd" type="text" id="KD_gd" value="<%=rs("KD_gd")%>"></td>
      <td>跟蹤4:</td>
      <td><input name="KD_gf" type="text" id="KD_gf" value="<%=rs("KD_gf")%>"></td>
    </tr>   
    <tr bgcolor="#CCCCCC">
      <td>跟蹤5:</td>
      <td><input name="KD_gg" type="text" id="KD_gg" value="<%=rs("KD_gg")%>"></td>
      <td>跟蹤6:</td>
      <td><input name="KD_gh" type="text" id="KD_gh" value="<%=rs("KD_gh")%>"></td>
    </tr>   
    <tr bgcolor="#CCCCCC">
      <td>跟蹤7:</td>
      <td><input name="KD_gj" type="text" id="KD_gj" value="<%=rs("KD_gj")%>"></td>
      <td>跟蹤8:</td>
      <td><input name="KD_gk" type="text" id="KD_gk" value="<%=rs("KD_gk")%>"></td>
    </tr>   
    <tr bgcolor="#CCCCCC">
      <td>跟蹤9:</td>
      <td><input name="KD_gl" type="text" id="KD_gl" value="<%=rs("KD_gl")%>"></td>
      <td>跟蹤10:</td>
      <td><input name="KD_gm" type="text" id="KD_gm" value="<%=rs("KD_gm")%>"></td>
    </tr>   
    <tr bgcolor="#CCCCCC">
      <td>跟蹤11:</td>
      <td><input name="KD_gn" type="text" id="KD_gn" value="<%=rs("KD_gn")%>"></td>
      <td>跟蹤12:</td>
      <td><input name="KD_go" type="text" id="KD_go" value="<%=rs("KD_go")%>"></td>
    </tr>   
    <tr bgcolor="#CCCCCC">
      <td>跟蹤13:</td>
      <td><input name="KD_gp" type="text" id="KD_gp" value="<%=rs("KD_gp")%>"></td>
      <td>跟蹤14:</td>
      <td><input name="KD_gq" type="text" id="KD_gq" value="<%=rs("KD_gq")%>"></td>
    </tr>   
    <tr bgcolor="#CCCCCC">
      <td>跟蹤15:</td>
      <td><input name="KD_gr" type="text" id="KD_gr" value="<%=rs("KD_gr")%>"></td>
      <td>跟蹤16:</td>
      <td><input name="KD_gs" type="text" id="KD_gs" value="<%=rs("KD_gs")%>"></td>
    </tr>   
    <tr bgcolor="#CCCCCC">
      <td>跟蹤17:</td>
      <td><input name="KD_gt" type="text" id="KD_gt" value="<%=rs("KD_gt")%>"></td>
      <td>跟蹤18:</td>
      <td><input name="KD_gu" type="text" id="KD_gu" value="<%=rs("KD_gu")%>"></td>
    </tr>   
    <tr bgcolor="#CCCCCC">
      <td>跟蹤19:</td>
      <td><input name="KD_gv" type="text" id="KD_gv" value="<%=rs("KD_gv")%>"></td>
      <td>跟蹤20:</td>
      <td><input name="KD_gw" type="text" id="KD_gw" value="<%=rs("KD_gw")%>"></td>
    </tr>   
    <tr bgcolor="#CCCCCC">
      <td>跟蹤21:</td>
      <td><input name="KD_gx" type="text" id="KD_gx" value="<%=rs("KD_gx")%>"></td>
      <td>跟蹤22:</td>
      <td><input name="KD_gy" type="text" id="KD_gy" value="<%=rs("KD_gy")%>"></td>
    </tr>   
    <tr bgcolor="#CCCCCC">
      <td colspan="4"><div align="center">
        <input type="submit" name="Submit" value="提交">
        <input type="reset" name="Submit2" value="重置">
      </div></td>
    </tr>
  </table>
</form>
</body>
</html>
<%
rs.close
set rs=nothing
END IF
%>
2018-03-26 15:52
qq387673116
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2018-3-26
  得分:0 
回复 楼主 qq387673116
现在就是我保存数据的时候提示错误...KD_edit.asp?work=add   
然后500错误了
2018-03-26 16:04
kingfangden
Rank: 4
来 自:深圳
等 级:贵宾
威 望:11
帖 子:44
专家分:247
注 册:2013-12-20
  得分:20 
KD_id这个字段的数据类型为文本吗?

做一个好的Asp人员,做一个好的互联网公司!
仕方文章管理系统---www-4fwen-com
2018-03-30 20:19







关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.099290 second(s), 9 queries.
Copyright©2004-2018, BCCN.NET, All Rights Reserved