| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 | 
登录
注册
用户控制面板
搜索
道具
风格
短消息
论坛展区
帮助
编程论坛 → WEB开发 → 『 ASP技术论坛 』 → 这段代码哪里出错了，怎么显示不出来啊？
我的收件箱(0)
欢迎加入我们，一同切磋技术
用户名：   
 
密　码：  
共有 922 人关注过本帖
标题：这段代码哪里出错了，怎么显示不出来啊？
取消只看楼主 加入收藏
jessicecat
Rank: 1
等　级：新手上路
帖　子：22
专家分：7
注　册：2010-8-31
结帖率：100%
楼主
收藏
 已结贴√  问题点数：10 回复次数：8 
这段代码哪里出错了，怎么显示不出来啊？
程序代码：
<!--#include file="conn.asp"-->
<% Response.Buffer = true%>
<html>
<head>
<title>密码修改</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK

href="images/css.css" type=text/css rel=stylesheet>
</HEAD>
<script language="JavaScript" type="text/JavaScript">
<!--
<!--#include file="top.asp"-->

</head>

<BODY bgColor=#f0f0f0 leftMargin=0 topMargin=0 MARGINWIDTH="0" MARGINHEIGHT="0">
<%
set rs1=Server.CreateObject("ADODB.Recordset")
id=SafeRequest("name",0)
UserType=SafeRequest("UserType",0)
if     UserType="student" then
    sql="select * from 学生表_student where xuehao='"&ID&"'"
   

    elseif UserType="student" then
    sql="select * from 学生表_studentwhere id='"&rename&"'"
    else
    sql="select * from 学生表_student where 5=6"
end if
'
response.end   

    'end if
%>
<table width="785" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr>
   

    <td align="center" valign="top"><form name="formReg" method="post" action="password_xg_save.asp" onSubmit="return chkform1(formReg)">
    <INPUT TYPE="hidden" name="userid" value="<%=rs("ID")%>">
    <INPUT TYPE="hidden" name="UserType" value="<%=UserType%>">
        <table width="98%" border="0" cellpadding="0" cellspacing="0" bgcolor="#99cc00">
          <tr>
            <td align="center" valign="top"><table width="100%" border="0" cellspacing="1" cellpadding="4">
                <tr align="center" background="images/title_cell.gif">

                  <td colspan="2" background="images/title_cell.gif" bgcolor="#78F2FC">
                 <strong><%=rs("rename")%>  <%=rs("xuehao")%> 的 密 码 修 改</strong></td>
                </tr>
                <!--<tr bgcolor="#ffffff">

                  <td align="right">请输入原有密码：</td>
                  <td><input type="password" name="orgpasswd"></td>
                </tr>-->
                <tr bgcolor="#ffffff">

                  <td align="right" bgcolor="#ffffff">请输入新的密码：</td>
                  <td><input type="password" name="newpasswd"></td>
                </tr>
                <tr bgcolor="#ffffff">

                  <td align="right">请再次确认新密码：</td>
                  <td><input type="password" name="renewpasswd"></td>
                </tr>
                <tr align="center" bgcolor="#ffffff">

                  <td colspan="2"><input type="submit" name="Submit" value="确 定 提 交">
                    &nbsp;&nbsp;&nbsp;

                    <input type="button" onClick="history.back();" value="放 弃 返 回">
                    &nbsp;&nbsp;&nbsp;

                    <input type="reset" name="Submit3" value="重 新 填 写"></td>
                </tr>
              </table></td>
          </tr>
        </table>
      </form> </td>
  </tr>
</table>
</body>
</html>

搜索更多相关主题的帖子: 代码　
2010-09-05 12:09
jessicecat
Rank: 1
等　级：新手上路
帖　子：22
专家分：7
注　册：2010-8-31
第 2 楼
收藏
 得分:0 
我是菜鸟不清楚~~~~
2010-09-05 15:56
jessicecat
Rank: 1
等　级：新手上路
帖　子：22
专家分：7
注　册：2010-8-31
第 3 楼
收藏
 得分:0 
原来是在后台运行可以修改的，现在弄到前台就不行。。。。
2010-09-05 15:59
jessicecat
Rank: 1
等　级：新手上路
帖　子：22
专家分：7
注　册：2010-8-31
第 4 楼
收藏
 得分:0 
程序代码：
<!--#include file="Conn.asp"-->
<!--#include file="xuanke_CheckRight.asp"-->


<SCRIPT language=JavaScript>
<!--
function changeto(highlightcolor){
source=event.srcElement
if (source.tagName=="TR"||source.tagName=="TABLE")
return
while(source.tagName!="TD")
source=source.parentElement
if (source.style.backgroundColor!=highlightcolor&&source.id!="ignore")
source.style.backgroundColor="#accbf1"
}

function changeback(originalcolor){
if (event.fromElement.contains(event.toElement)||source.contains(event.toElement)||source.id=="ignore")
return
if (event.toElement!=source)
source.style.backgroundColor=originalcolor
}
//-->
</SCRIPT><style type="text/css">
<!--
body,td,th {
    font-size: 16px;
   

}




-->
</style><DIV align=center>
<TABLE width=774 height="250" border=0 cellPadding=0 cellSpacing=0 class="STYLE8" id=table1>
  <TBODY>
  <TR>
    <TD><img src="images/字5.jpg" width="943" height="245" />
      <script language="javascript" src="date.js"></script></TD>
  </TR>
  <TR>
    <TD bgColor=#f6f6f6 height=27>
      <DIV align=center>
      <TABLE id=table4 height=25 cellSpacing=0 cellPadding=0 width=768

        border=0><TBODY>
        <TR>
          <TD width=83 align=center

          bgColor=#f6f6f6 class="STYLE9" onMouseOver="changeto('#accbf1')"

          onmouseout="changeback('#f6f6f6')"><A

            href="index.asp" class="STYLE12">选课首页</A></TD>
                 <TD width=84 align=center

          bgColor=#f6f6f6 class="STYLE9" onMouseOver="changeto('#accbf1')"

          onmouseout="changeback('#f6f6f6')"><A

            href="kcsbb.asp" class="STYLE12">课程申报</A></TD>
                 <TD width=86 align=center

          bgColor=#f6f6f6 class="STYLE9" onMouseOver="changeto('#accbf1')"

          onmouseout="changeback('#f6f6f6')"><A HREF="login.asp" class="STYLE12">学生登陆</A></TD>
   <TD width=86 align=center

          bgColor=#f6f6f6 class="STYLE9" onMouseOver="changeto('#accbf1')"

          onmouseout="changeback('#f6f6f6')"><A

            href="kclist.asp" class="STYLE12">课程列表</A></TD>
          <TD width=86 align=center

          bgColor=#f6f6f6 class="STYLE9" onMouseOver="changeto('#accbf1')"

          onmouseout="changeback('#f6f6f6')"><A

            href="xuanke.asp" class="STYLE12">开始选课</A></TD>
          <TD width=86 align=center

          bgColor=#f6f6f6 class="STYLE9" onMouseOver="changeto('#accbf1')"

          onmouseout="changeback('#f6f6f6')"><A

            href="wdkc.asp" class="STYLE12">我的课程</A></TD>
          <TD width=86 align=center

          bgColor=#f6f6f6 class="STYLE9" onMouseOver="changeto('#accbf1')"

          onmouseout="changeback('#f6f6f6')"><A

            href="logout.asp" class="STYLE12">退出选课</A></TD>
          <TD width=86 align=center

          bgColor=#f6f6f6 class="STYLE9" onMouseOver="changeto('#accbf1')"

          onmouseout="changeback('#f6f6f6')"><A

            href="help.asp" class="STYLE12">选课说明</A></TD>
          <TD width=85 align=center

          bgColor=#f6f6f6 class="STYLE9" onMouseOver="changeto('#accbf1')"

          onmouseout="changeback('#f6f6f6')"><a href="glydl.asp" class="STYLE12">后台管理</a></TD>
        </TR></TBODY>
      </TABLE>
  </DIV></TD></TR></TBODY></TABLE>
</DIV>

2010-09-05 19:33
jessicecat
Rank: 1
等　级：新手上路
帖　子：22
专家分：7
注　册：2010-8-31
第 5 楼
收藏
 得分:0 
那为什么同样的代码在管理员登录的页面可以运行？
2010-09-05 19:59
jessicecat
Rank: 1
等　级：新手上路
帖　子：22
专家分：7
注　册：2010-8-31
第 6 楼
收藏
 得分:0 
那应该怎样修改？
2010-09-06 11:09
jessicecat
Rank: 1
等　级：新手上路
帖　子：22
专家分：7
注　册：2010-8-31
第 7 楼
收藏
 得分:0 
数据表名字为学生表_student
2010-09-06 11:21
jessicecat
Rank: 1
等　级：新手上路
帖　子：22
专家分：7
注　册：2010-8-31
第 8 楼
收藏
 得分:0 
是的
2010-09-06 17:59
jessicecat
Rank: 1
等　级：新手上路
帖　子：22
专家分：7
注　册：2010-8-31
第 9 楼
收藏
 得分:0 
<!--#include file="conn.asp"-->
<!--#include file="top2.asp"-->
<!--#include file="md5.asp"-->
<%

    userid=request.form("userid")
    if userid="" then

    errmsg=" 您没有成功登录"
    'str="系统没有此用户，或者你没有权限修改此账号!谢谢合作"
    MsgShow str,"2",url  

    'str： 提示消息内容；flag：0：返回，标志1：跳转到URL，标志2：关闭窗口 标志3：用于显示  标志4： 刷新页面 标志5： 刷新父窗口

    response.end   

    end if
'    if cint(userid) <> session("XZWID") THEN
'    errmsg=" 请勿越权操作"
'    url="login.asp"
'    MsgShow errmsg,1,url
'    Call CloseDatabase() ' 关闭数据库对象
'    response.end
'    end if
    UserType=request.form("UserType")

set rs=server.createobject("adodb.recordset")
if     UserType="student" then
    sql="select * from 学 生表_student where ID="&cint(userid)
    elseif UserType="teacher" then
    'sql="select * from Tinfor where ID="&cint(userid)
'end if
    'rs.open sql,conn,1,3
    'if rs.eof and rs.bof then
        'str=" 系统没有此用户，或者你没有权限修改此账号!谢谢合作"
        MsgShow str,"2",url  


        response.end   

    else
        orgpasswd=trim(request.form("orgpasswd"))
        newpasswd=trim(request.form("newpasswd"))
        renewpasswd=trim(request.form("renewpasswd"))
        if  newpasswd="" or newpasswd<>renewpasswd then
            str=" 密码不能为空，而且两次输入的新密码必须一致。"
            MsgShow str,"2",url  

           

            Call CloseDatabase() ' 关闭数据库对象
            response.end
        end if
        rs("pwd")=MD5(newpasswd)
        RS("wuyongde")=newpasswd
        rs.update
        rs.close
        set rs=nothing
        str=" 恭喜，您的密码修改成功。"
        url="xuesheng.asp"
        MsgShow str,"5",url  


        response.end   

        Call CloseDatabase()
    end if
%>

</body>
</html>
以上是保存页面代码
2010-09-06 18:04
快速回复：这段代码哪里出错了，怎么显示不出来啊？
数据加载中...
 
　　　



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

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