<!--#include file="toubu.asp" -->
<!--#include file="conn.asp" -->
<%
dim c,d
c=request.form("c")
d=request.form("d")
yx=request.form("yx")
mm=request.form("mm")
if request.form("yx")="" then
response.write"登入失败,邮箱不能为空"
%>
<table width="980" height="30" border="0" align="center" cellpadding="0" cellspacing="0" background="img/bankuai.jpg">
<tr>
<td width="980" align="center"><a href="yhdr.asp"><font color="#000000" style="font-size:18px">返回上一页重新登入</font></a></td>
</tr>
</table>
<%
elseif request.form("mm")<6 then
response.write"密码不能少于6位!!!"
%>
<table width="980" height="30" border="0" align="center" cellpadding="0" cellspacing="0" background="img/bankuai.jpg">
<tr>
<td width="980" align="center"><a href="yhdr.asp"><font color="#000000" style="font-size:18px">返回上一页重新登入</font></a></td>
</tr>
</table>
<%
elseif c<>d then
response.write"验证码不正确,请核实!!!"
%>
<table width="980" height="30" border="0" align="center" cellpadding="0" cellspacing="0" background="img/bankuai.jpg">
<tr>
<td width="980" align="center"><a href="yhdr.asp"><font color="#000000" style="font-size:18px">返回上一页重新登入</font></a></td>
</tr>
</table>
<%
elseif c=d then
set rs=server.createobject("adodb.recordset")
sql="select * from zc where yx='"+yx+"' and mm='"+mm+"'"
rs.open sql,conn,1,1
response.write"登入成功"
session("yx")=rs("yx")
session("nc")=rs("nc")
session("id")=rs("id")
session("zt")=rs("zt")
session("jb")=rs("jb")
session("sj")=rs("sj")
session("file1")=rs("file1")
session("file2")=rs("file2")
response.redirect "wodejiayuan.asp"
end if
conn.close
set conn=nothing
%>
<!--#include file="tweibu.asp" -->
以上代码如何传递用户名yx
我是要把阿用户名传递到下一个页面,如何传递,请高手指教
Smart猫小萌
神不在的星期二
暮色呼如