注册 登录
编程论坛 ASP技术论坛

submit之后该页跳转到哪了,郁闷中

Kettyjin1983 发布于 2007-11-28 15:50, 1375 次点击
Submit之后是跳转到所谓的nextpage,可我并没有找到啊,请问下该页submit之后跳到哪去了,我完全找不到。

<%@ Language="VBSCRIPT" %>
<!--#include virtual ="/Include/Conn.asp"-->
<!--#include virtual ="/Include/Frequent.asp"-->
<%
MyAccount=GetAccount()
Badge=GetBadge(MyAccount)
if(Badge = "6969CE") then
 Badge = "7477ME"
end if
'response.Write(Badge)
IsSecretary="T"
If IsSecretary="F" then
 Response.Write("<BR>" & "<BR>" & "<ul>")
 Response.Write("Error detected:" & "<BR>")
 Response.Write("<ul>" & "<BR>")
 Response.Write("<li> You are NOT secretary, or Server time is out.</li>" & "<BR>")
 Response.Write("<BR>")
 Response.Write("</ul>" & "<BR>")
 Response.Write("Please click BACK button retry." & "<BR>")
 Response.Write("<BR> </ul>")
 Response.Write("<ul><ul><a href='../Delegation.htm' target='_parent'>")
 Response.Write("<img src='../Image/Back.gif' width='63' height='24' border='0'")
 Response.Write(" alt='Back and Login retry'></a> </ul> </ul>")
 Response.End
End if
NextPage=Request.Form("NextPage") & "?Flag=S"
Sub Candidate(ReadDele,MyAccount)
 Dim Sql,Conn,rs
' Sql="Select * From DeleCache Where NTAccount='" & MyAccount & "'  AND CacheType='For' Order by Times DESC,TargetBadge"
 Sql="select e.badge,e.engname from employee e,orginfo o where deptid in (select distinct deptid from dept where secretary = '"& Badge &"') and servicestatus = 1 and e.badge = o.owner order by engname"
 Set conn=server.createobject("adodb.connection")
 Conn.open=ReadDele
 Set rs=Conn.Execute(Sql)
 If rs.EOF then
  rs.Close
  Set rs=Nothing
  Conn.Close
  Set Conn=Nothing
'  Response.Redirect("AddNewTarget.asp")
 Else
     Response.Write("<select name='SelectMgr'>")
  Response.Write("<option value='-'>*** Please Select ***</option>")
 
  Do While NOT rs.EOF
      Response.Write("  <option value='" & Trim(rs("badge")) & "'>")
   Response.Write(  rs("badge") & " "  & rs("engname"))
   Response.Write(  "</option>")
   rs.MoveNext
  Loop
     Response.Write("</select>")
  Response.Write("&nbsp")
  rs.Close
  Set rs=Nothing
  Conn.Close
  Set Conn=Nothing
 End if
End Sub
%>

<html>
<head>
<title>Delegation System: Secretary Module</title>
<meta http-equiv="Content-Type" c>
<link rel="stylesheet" href="../Dele.css" type="text/css">
</head>
<body bgcolor="#FFFFFF" background="../Image/ForSecretary.gif">
<table width="600" border="0">
  <tr>
    <td height="43">
      <div align="center"><font face="Arial, Helvetica, sans-serif" size="4" color="#FF0000">SECRETARY
        FUNCTION</font></div>
    </td>
  </tr>
</table>
  
<p> </p>
<form name="form01" method="post" action="<%=NextPage%>">
  <table width="600" border="0" height="120">
    <tr>
      <td>
        <table width="570" border="0">
          <tr>
            <td width="140" height="19">  
            
            </td>
            <td width="145" height="19">
              <div align="left"><font face="Arial, Helvetica, sans-serif" size="2"><b><font color="#0000FF">Select Employee</font></b></font></div>
            </td>
            <td width="303" height="19">
              <%Call Candidate(ReadDele,MyAccount)%>
            </td>
          </tr>
        </table>
        
      </td>
    </tr>
  </table>
  <table width="600" border="0" height="57">
    <tr>
      <td width="270">
        <div align="right">
          <input type="image" border="0" name="imageField" src="../Image/OK.gif" width="63" height="24" alt="Submit the form">
        </div>
      </td>
      <td width="60"> </td>
      <td width="270"><a href="javascript:history.back(1)"><img src="../Image/Back.gif" width="63" height="24" alt="Back to previous page" border="0"></a></td>
    </tr>
  </table>
</form>
</body>
</html>
5 回复
#2
yms1232007-11-28 15:56
NextPage=Request.Form("NextPage") & "?Flag=S"
这个NextPage是从另外一个页面得到的。
#3
Kettyjin19832007-11-28 15:59
那这个页面submit之后去哪了、
#4
yms1232007-11-28 16:06
这个页面的NextPage是从另外一个页面的表单中提交过来的,最简单的办法就是
Response.Write NextPage这个变量看看显示什么?
#5
MikeFT2007-11-28 16:06
那要看Request.Form("NextPage")接收的值了,Request.Form("NextPage")接收什么,就去什么页!!!
#6
Kettyjin19832007-11-28 16:32
谢谢yms123,通过你的方法,我已经找到了,问题也解决了,谢谢你啊。
1