📄 gzl.asp
字号:
<%
dim user
user=request.querystring("user")'获得当前正在用户名
if session(user&"gzl")<>"true" then '进行更改资料验证让每个用户只能更改自己的资料
'response.redirect "error.asp?errorid=8"
end if
dim sql
dim rs
dim shenfen '看登陆者是待审站点还是正式会员
dim currenttype
dim sel
shenfen=request.querystring("shenfen") '从querystring获取shenfen
%>
<!--#include file="conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>::::52CM梦工场::::52CM DREAM Work Place::::网页品点联盟</title>
<style>
a{text-decoration:none}
a{color:#000000}
td{font-size:9pt}
.stedit { background-color:#cccccc;BORDER-BOTTOM: #000000 1px solid; BORDER-LEFT: #000000 1px solid; BORDER-RIGHT: #000000 1px solid; BORDER-TOP: #000000 1px solid; FONT-SIZE: 9pt; border-color: #333333;font-color:#ffffff;}
</style>
<script>
function winpop()
{
window.open("aboutme.htm","","toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=1,resizable=0,width=550,height=370,top=0,left=0")
}
</script>
</head>
<body topmargin=0 leftmargin=0 bgcolor="#000000">
<!--#include file="head.asp"-->
<CENTER>
<TABLE border=0 cellPadding=0 cellSpacing=0 height=513 width=778>
<tr>
<td valign=top width=533 bgcolor=#999999 valign=top>
<table width=533 cellspacing=0 cellpadding=0>
<tr><td width=270 bgcolor=#000000 colspan=3 height=5></td></tr>
<tr><td width=270 bgcolor=#000000></td>
<td bgcolor=#000000><img src="pic/j3.gif" valign=top></td>
<td bgcolor=#999999 width=250></td>
</tr>
</table>
</td>
<td rowspan=2>
<td valign=top rowspan=2 align=center>
<Iframe frameborder=0 scrolling=no width=245 height=540 src="mb/mb_jm.asp">
</iframe>
</td></tr>
<tr>
<TD bgColor=#999999 height=490 rowSpan=12 width=512 valign=top>
<TABLE border=0 cellPadding=0 cellSpacing=1 width="100%" bgcolor=#999999>
<TBODY>
<tr><td></td><td colspan=2>
<table width=410 cellspacing=0 cellpadding=0>
<tr><td colspan=2 height=15></td></tr>
<tr><td height=25 bgcolor=#666666>
<img src="pic/j1.gif"></td><td height=25 bgcolor=#666666 align=right><font color=#cccccc>用 户 更 改 资 料 </font></td>
</td></tr>
<tr><td colspan=2 height=15></td></tr>
</table>
</td></tr>
<TR>
<TD width="8%"></TD>
<TD width="78%">
<FORM action="savezl.asp" language=javascript method="post">
<SPAN class=unnamed3>网站类型：</SPAN>
<%
sql="select type from lm where username='" & user & "'"
set rs=conn.execute(sql) '选出登陆用户的资料
currenttype=rs("type")
rs.close
%>
<SELECT name="select" class="stedit">
<%
sql="select * from type"
set rs=conn.execute(sql)
if rs.eof and rs.bof then
response.write "现在还没有分类"
else
do while not rs.eof
if rs("type")=currenttype then '根据当前的记录中的type来选定select的项目
sel="selected"
else
sel=""
end if
response.write "<option " & sel & " value='" & rs("type") & "' name=typeid>" & rs("typename") & "</option>"
rs.movenext
loop
rs.close
end if
%>
</SELECT>
<SPAN class=unnamed3>*</SPAN><BR>
<%
if shenfen="dsmember" then '根据shenfen的值来确定sql语句
sql="select * from lm where pass=false and username='" & user & "'"
elseif shenfen="member" then
sql="select * from lm where pass=true and username='" & user & "'"
end if
set rs=conn.execute(sql)
if rs.eof and rs.bof then
response.redirect "error.asp?errorid=1"
else
%>
<SPAN class=unnamed3>密 码：</SPAN>
<INPUT maxLength=8 name=text2 class="stedit" type="password" value=<%=rs("password")%>> <SPAN class=unnamed3>*少于8位</SPAN><BR>
<SPAN class=unnamed3>确认密码：</SPAN>
<INPUT maxLength=8 name=text3 class="stedit"type="password" value=<%=rs("password")%>> <SPAN class=unnamed3>*少于8位</SPAN><BR>
<SPAN class=unnamed3>网站名称：</SPAN> <INPUT maxLength=15 name=text4 class="stedit" value=<%=rs("pagename")%>>
*少于8个字<BR>
<SPAN class=unnamed3>网 址：</SPAN>
<INPUT maxLength=100 name=text5 class="stedit" value=<%=rs("url")%>> <SPAN class=unnamed3>*</SPAN><BR>
<SPAN class=unnamed3>站长大名：</SPAN>
<INPUT maxLength=8 name=text6 class="stedit" value=<%=rs("name")%>>
<SPAN class=unnamed3>* </SPAN><BR><SPAN class=unnamed3>电子邮件：</SPAN>
<INPUT maxLength=30 name=text7 class="stedit" value=<%=rs("email")%>>
<SPAN class=unnamed3>*</SPAN><BR><SPAN class=unnamed3>首页缩图：</SPAN>
<INPUT maxLength=100 name=text8 class="stedit" value=<%=rs("pic")%>> <SPAN class=unnamed3>*(<FONT
face="Arial, Helvetica, sans-serif">120 x 90</FONT>大小的<FONT
face="Arial, Helvetica, sans-serif">gif</FONT>或<FONT
face="Arial, Helvetica, sans-serif">jpeg</FONT>图片)</SPAN><BR>
<SPAN class=unnamed3><BR><BR>网站简介：*</SPAN></SPAN><BR></FONT>
<TEXTAREA cols=48 name=text9 rows=8 class=stedit><%=rs("note")%></TEXTAREA>
<%
end if
rs.close
%>
<BR>
* 请把字数控制在100字以内
<br>
<BR><INPUT name=Submit class="stedit" type=submit value=提交 padding-bottom:1px?>
<INPUT name=Submit2 class="stedit" type=reset value=重填 padding-bottom:1px?>
<input type="hidden" name="user" value="<%=user%>">
<input type="hidden" name="shenfen" value="<%=shenfen%>">
</FORM></TD>
<TD width="14%"></TD></TR></TBODY></TABLE></TD>
</tr>
</table>
</center>
<table width="100%" valign=bottom cellspacing=0 cellpadding=0>
<tr><td align="right" bgcolor=#999999><img src="pic/bottom2.gif"></td>
<td width="53" bgcolor="#000000"></td>
</tr>
</table>
<table width="100%" height="45" bgcolor="#000000" cellspacing=0 cellpadding=0>
<tr><td align="center" align="center"><font color="#ffffff">Modification And Program By : 52CM工作室</font></td></tr>
</table>
</BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -