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

框架页面注册后的跳转问题

demon301686 发布于 2007-08-23 17:01， 1962 次点击

现在同一页面内有3个框架,分别为: TOP ,LEFT,RIGHT

TOP框架内有登陆,注册2个按纽 ,点击该按纽后会在RIGHT框架内出现注册信息,填写完注册信息后(注意,问题出现了),点击"提交".我希望实现"提交"后能自动在TOP框架内显示成登陆状态,同时RIGHT框架内的页面回到首页框架内的页面!!! 求各位高手指教 ....十万火急````在线等回复!!!谢谢大家~~~~

16 回复
#2
hmhz2007-08-23 17:08
在注册页面的<body>里加个<body onunload="window.opener.location.reload();">
#3
demon3016862007-08-23 17:16
大哥啊   你不是忽悠我吧~~~还是不行   我快急死了
#4
hmhz2007-08-23 17:18

你把注册页面和TOP页面的代码发出来，我帮你修改，真是受不了你
#5
demon3016862007-08-23 17:23
谢谢啊`~~~马上发~~~
#6
demon3016862007-08-23 17:26

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" " http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns=" http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
<style type="text/css">
<!--
a:link {
color: #FF0000;
}
.STYLE6 {color: #999999}
-->
</style>


<SCRIPT language=JavaScript>
<!--
function RegFrom_onsubmit() {
if(document.Regfrom.idtext.value=="")
{
alert("请填写[会员帐号],然后再[提交申请].")
document.Regfrom.idtext.focus()
return false
}
else if(document.Regfrom.pwdtext.value=="")
{
alert("请填写[密码],然后再[提交申请].")
document.Regfrom.pwdtext.focus()
return false
}
else if(document.Regfrom.pwdtext2.value=="")
{
alert("请填写[密码确定],然后再[提交申请].")
document.Regfrom.pwdtext2.focus()
return false
}
else if(document.Regfrom.pwdtext.value!=document.Regfrom.pwdtext2.value)
{
alert("两次填写的密码不一致,请确定密码正确.")
document.Regfrom.pwdtext2.focus()
return false
}

if(document.Regfrom.wttext.value.length!=0)
{
if (document.Regfrom.wttext.value.charAt(0)=="." ||
document.Regfrom.wttext.value.charAt(0)=="@"||
document.Regfrom.wttext.value.indexOf('@', 0) == -1 ||
document.Regfrom.wttext.value.indexOf('.', 0) == -1 ||
document.Regfrom.wttext.value.lastIndexOf("@")==document.Regfrom.wttext.value.length-1 ||
document.Regfrom.wttext.value.lastIndexOf(".")==document.Regfrom.wttext.value.length-1)
{
alert("Email地址格式不正确！");
document.Regfrom.wttext.focus();
return false;
}}

else
{
alert("Email不能为空！");
document.Regfrom.wttext.focus();
return false;
}

}
-->
</SCRIPT>
<SCRIPT language=JavaScript>
function RegFrom_onsubmit() {
var strm = document.Regfrom.wttext.value
var regm = /^[a-zA-Z0-9_-]+@[a-zA-Z0-9_-]+(\.[a-zA-Z0-9_-]+)+$/;
if (!strm.match(regm) && strm!="")
{
alert("邮箱地址格式错误或含有非法字符!\n请检查！");
document.Regfrom.wttext.select();
return false;
}
{
</SCRIPT>

</head>

<body onunload="window.opener.location.reload();"><br><br><br>

<form name="Regfrom" method="post" action="regpro.asp" onSubmit="return RegFrom_onsubmit()">
<br>

<table width="750" height="300" border="0" align="center" cellpadding="0" cellspacing="0" background="images/未标题-功能3.jpg">
<tr>
<td><table width="95%" height="257" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#CCCCCC" bgcolor="#F0f0f0">
<tr>
<th width="123" height="45">会员帐号：</th>
<td width="312">&nbsp;<input name="idtext" type="text" id="idtext" size="25" maxlength="30" />
</td>
<td width="270"><div align="left">会员帐号由4-20个英文字母或数字组成（不支持中文，不能以数字开头）一旦注册成功不可修改。</div></td>
</tr>
<tr>
<th height="45">密 码：</th>
<td>&nbsp;<input name="pwdtext" type="password" id="pwdtext" size="20" maxlength="30" />
</td>
<td><div align="left">密码由6-20个英文字母（区分大小写）或数字组成。</div></td>
</tr>
<tr>
<th height="45">重复密码：</th>
<td>&nbsp;<input name="pwdtext2" type="password" id="pwdtext2" size="20" maxlength="30" />
</td>
<td><div align="left">请再输入一遍您上面填写的密码</div></td>
</tr>
<tr>
<th height="45">电子邮件：</th>
<td>&nbsp;<input name="wttext" type="text" id="wttext" value="" size="30" maxlength="100" />
</td>
<td>用于找回密码，请认真填写</td>
</tr>
<tr>
<td height="67" colspan="3"><div align="center"> <span class="STYLE7">
<input name="checkbox" type="checkbox" value="checkbox" checked="checked" />
<span class="STYLE6">您已经仔细阅读了《</span><a href="righttk.htm">用户协议</a><span class="STYLE6">》</span><br />
<input type="submit" name="Submit" value="提交" />
</div></td>
</tr>
</table>
<p></p></td>
</tr>
</table>

</form>
<p>&nbsp;</p>
</body>

</html>
#7
demon3016862007-08-23 17:26
这个是注册的````
#8
demon3016862007-08-23 17:27

<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/fttp.asp" -->
<%
' *** Validate request to log in to this site.
MM_LoginAction = Request.ServerVariables("URL")
If Request.QueryString<>"" Then MM_LoginAction = MM_LoginAction + "?" + Server.HTMLEncode(Request.QueryString)
MM_valUsername=CStr(Request.Form("name"))
If MM_valUsername <> "" Then
MM_fldUserAuthorization=""
MM_redirectLoginSuccess="topy.asp"
MM_redirectLoginFailed="topf.html"
MM_flag="ADODB.Recordset"
set MM_rsUser = Server.CreateObject(MM_flag)
MM_rsUser.ActiveConnection = MM_fttp_STRING
MM_rsUser.Source = "SELECT name, word"
If MM_fldUserAuthorization <> "" Then MM_rsUser.Source = MM_rsUser.Source & "," & MM_fldUserAuthorization
MM_rsUser.Source = MM_rsUser.Source & " FROM users WHERE name='" & Replace(MM_valUsername,"'","''") &"' AND word='" & Replace(Request.Form("psd"),"'","''") & "'"
MM_rsUser.CursorType = 0
MM_rsUser.CursorLocation = 2
MM_rsUser.LockType = 3
MM_rsUser.Open
If Not MM_rsUser.EOF Or Not MM_rsUser.BOF Then
' username and password match - this is a valid user
Session("MM_Username") = MM_valUsername
If (MM_fldUserAuthorization <> "") Then
Session("MM_UserAuthorization") = CStr(MM_rsUser.Fields.Item(MM_fldUserAuthorization).Value)
Else
Session("MM_UserAuthorization") = ""
End If
if CStr(Request.QueryString("accessdenied")) <> "" And false Then
MM_redirectLoginSuccess = Request.QueryString("accessdenied")
End If
MM_rsUser.Close
Response.Redirect(MM_redirectLoginSuccess)
End If
MM_rsUser.Close
Response.Redirect(MM_redirectLoginFailed)
End If
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>国际商业信息交流网(暂定)</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="css/ys1682.css"
type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2900.3132" name=GENERATOR>
<style type="text/css">
<!--
.STYLE2 {font-size: 5px}
.MainFront {
font-family: Tahoma;
font-size: 10px;
color: #000000;
}
-->
</style>


</HEAD>

<BODY>
<form action="<%=MM_LoginAction%>" method="POST" name="login" id="login">
<img src="未标题-7副本.jpg" >
<DIV id=topnav>
&nbsp;&nbsp;&nbsp;<a>用户名</a>
<input name="name" type="text" class="MainFront" size="13" maxlength="20">
<a >密码</a>
<input name="psd" type="password" class="MainFront" size="13" maxlength="20">



<INPUT class=stbtm type=submit value=登录 name=submit>

&nbsp;<a href="rep.htm" target="mainFrame"/><img src="images/3721.gif" border="0" align="top" ></a>

</DIV>
</form>
</body>

</html>
#9
demon3016862007-08-23 17:28

你有邮箱没啊???这里地方太小了~~~
#10
hmhz2007-08-23 17:29
老兄，你这谁看的懂啊，把regpro.asp代码也发出来，regpro.asp里可以修改自动返回首页
#11
hmhz2007-08-23 17:30
你把TOP里的文件和regpro.asp发上来就可以了，注册页面就你刚才发的那个不要动
#12
demon3016862007-08-23 17:31

<!--#include file="conn.asp"-->
<html>
<head>
<title>XXXXX</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta http-equiv="refresh" content="5; url=right.htm">
<SCRIPT language=JavaScript>
<!--
function RegFrom_onsubmit() {
if(document.Regfrom.idtext.value=="")
{
alert("请填写[会员帐号],然后再[提交申请].")
document.Regfrom.idtext.focus()
return false
}
else if(document.Regfrom.pwdtext.value=="")
{
alert("请填写[密码],然后再[提交申请].")
document.Regfrom.pwdtext.focus()
return false
}
else if(document.Regfrom.pwdtext2.value=="")
{
alert("请填写[密码确定],然后再[提交申请].")
document.Regfrom.pwdtext2.focus()
return false
}
else if(document.Regfrom.pwdtext.value!=document.Regfrom.pwdtext2.value)
{
alert("两次填写的密码不一致,请确定密码正确.")
document.Regfrom.pwdtext2.focus()
return false
}
else if(document.Regfrom.wttext.value=="")
{
alert("请填写[电子邮件],然后再[提交申请].")
document.Regfrom.wttext.focus()
return false
}
}
-->
</SCRIPT>

<style type="text/css">
<!--
body,td,th {
font-family: Tahoma;
font-size: 12px;
color: #333333;
}
.MainFront {
font-family: Tahoma;
font-size: 12px;
color: #000000;
}
.RedFront {
font-family: Tahoma;
font-size: 12px;
color: #FF0000;
}
.STYLE3 {font-size: 16px}
.STYLE4 {font-size: 14px}
-->
</style>
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="500" height="250" border="0" align="left" cellspacing="0">
<tr>
<td align="center"><p>

<table width="384" border="0" cellspacing="0" cellpadding="0">
<tr>
<%
if request.Form("idtext")<>"" then
set myrec=server.CreateObject("ADODB.Recordset")
set rs=server.CreateObject("ADODB.Recordset")
myrec.open "Users",conn,3,3
sql="select * from users where name='"&request.Form("idtext")&"'"
rs.open sql,conn,1,1
if not rs.eof then
conn.close
set rs=nothing
set myrec=nothing
set conn=nothing
%>
<td width="113"><p><span class="STYLE4">很遗憾 你的帐号已被人注册</span></p>
<p><a href="rep.htm">请从新注册</a>
<%else%>
</p>
<td width="205"><p><span class="STYLE4">恭喜你 你的帐号注册成功.<br>请在上方登陆您的帐号</span></p>
<p>
<%
myrec.addnew
myrec("name")=request.Form("idtext")
myrec("word")=request.Form("pwdtext")
myrec("key1")=request.Form("wttext")
myrec.update
conn.close
set rs=nothing
set myrec=nothing
set conn=nothing
end if
else
response.Redirect("right.htm")
end if
%>


</p></td>
</tr>
<tr>
<td></td>
</tr>
</table>
<p>
</td>
</tr>
</table>
</body>
</html>
#13
demon3016862007-08-23 17:33

<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/fttp.asp" -->
<%
' *** Validate request to log in to this site.
MM_LoginAction = Request.ServerVariables("URL")
If Request.QueryString<>"" Then MM_LoginAction = MM_LoginAction + "?" + Server.HTMLEncode(Request.QueryString)
MM_valUsername=CStr(Request.Form("name"))
If MM_valUsername <> "" Then
MM_fldUserAuthorization=""
MM_redirectLoginSuccess="topy.asp"
MM_redirectLoginFailed="topf.html"
MM_flag="ADODB.Recordset"
set MM_rsUser = Server.CreateObject(MM_flag)
MM_rsUser.ActiveConnection = MM_fttp_STRING
MM_rsUser.Source = "SELECT name, word"
If MM_fldUserAuthorization <> "" Then MM_rsUser.Source = MM_rsUser.Source & "," & MM_fldUserAuthorization
MM_rsUser.Source = MM_rsUser.Source & " FROM users WHERE name='" & Replace(MM_valUsername,"'","''") &"' AND word='" & Replace(Request.Form("psd"),"'","''") & "'"
MM_rsUser.CursorType = 0
MM_rsUser.CursorLocation = 2
MM_rsUser.LockType = 3
MM_rsUser.Open
If Not MM_rsUser.EOF Or Not MM_rsUser.BOF Then
' username and password match - this is a valid user
Session("MM_Username") = MM_valUsername
If (MM_fldUserAuthorization <> "") Then
Session("MM_UserAuthorization") = CStr(MM_rsUser.Fields.Item(MM_fldUserAuthorization).Value)
Else
Session("MM_UserAuthorization") = ""
End If
if CStr(Request.QueryString("accessdenied")) <> "" And false Then
MM_redirectLoginSuccess = Request.QueryString("accessdenied")
End If
MM_rsUser.Close
Response.Redirect(MM_redirectLoginSuccess)
End If
MM_rsUser.Close
Response.Redirect(MM_redirectLoginFailed)
End If
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>国际商业信息交流网(暂定)</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="css/ys1682.css"
type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2900.3132" name=GENERATOR>
<style type="text/css">
<!--
.STYLE2 {font-size: 5px}
.MainFront {
font-family: Tahoma;
font-size: 10px;
color: #000000;
}
-->
</style>


</HEAD>

<BODY>
<form action="<%=MM_LoginAction%>" method="POST" name="login" id="login">
<img src="未标题-7副本.jpg" >
<DIV id=topnav>
&nbsp;&nbsp;&nbsp;<a>用户名</a>
<input name="name" type="text" class="MainFront" size="13" maxlength="20">
<a >密码</a>
<input name="psd" type="password" class="MainFront" size="13" maxlength="20">



<INPUT class=stbtm type=submit value=登录 name=submit>

&nbsp;<a href="rep.htm" target="mainFrame"/><img src="images/3721.gif" border="0" align="top" ></a>

</DIV>
</form>
</body>

</html>
#14
demon3016862007-08-23 17:36
你有电子邮件没???给我个   我发到你邮箱你吧```这里地方太小了
#15
hmhz2007-08-23 17:38
注册成功后跳转到首页页面，首页是right.htm 吗？不是，就改成首页地址

然后登陆页面，TOP里的是登陆页面吗？你怎么发了两次登陆代码都是这样的，看不清楚
#16
demon3016862007-08-23 17:43
    我打开一个页面里面加一段JAVA的代码它能控制其他框架的跳转  这个代码应该怎么写啊???
#17
demon3016862007-08-23 17:46
回复：（hmhz）注册成功后跳转到首页页面，首页是righ...

<%@
MM_rsUser.CursorLocation = 2
MM_rsUser.LockType = 3
MM_rsUser.Open
If Not MM_rsUser.EOF Or Not MM_rsUser.BOF Then
' username and password match - this is a valid user
Session("MM_Username") = MM_valUsername
If (MM_fldUserAuthorization <> "") Then
Session("MM_UserAuthorization") = CStr(MM_rsUser.Fields.Item(MM_fldUserAuthorization).Value)
Else
Session("MM_UserAuthorization") = ""
End If
if CStr(Request.QueryString("accessdenied")) <> "" And false Then
MM_redirectLoginSuccess = Request.QueryString("accessdenied")
End If
MM_rsUser.Close
Response.Redirect(MM_redirectLoginSuccess)
End If
MM_rsUser.Close
Response.Redirect(MM_redirectLoginFailed)
End If
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>国际商业信息交流网(暂定)</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="css/ys1682.css"
type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2900.3132" name=GENERATOR>
<style type="text/css">
<!--
.STYLE2 {font-size: 5px}
.MainFront {
font-family: Tahoma;
font-size: 10px;
color: #000000;
}
-->
</style>


</HEAD>

<BODY>
<form action="<%=MM_LoginAction%>" method="POST" name="login" id="login">
<img src="未标题-7副本.jpg" >
<DIV id=topnav>
&nbsp;&nbsp;&nbsp;<a>用户名</a>
<input name="name" type="text" class="MainFront" size="13" maxlength="20">
<a >密码</a>
<input name="psd" type="password" class="MainFront" size="13" maxlength="20">



<INPUT onclick="goUrl()" class=stbtm type=submit value=登录 name=submit >
<script>
function goUrl
{
window.parent.mainFrame.location.href="right.htm";
}
</script>


&nbsp;<a href="rep.htm" target="mainFrame"/><img src="images/3721.gif" border="0" align="top" ></a>

</DIV>
</form>
</body>

</html>
1
©2025, BC-CN.NET
电脑版