📄 inc_profile_with_random_pass_and_maillist_manager.asp
字号:
<OPTION VALUE="Russia">Russia
<OPTION VALUE="Rwanda">Rwanda
<OPTION VALUE="Saint Barthelemy">Saint Barthelemy
<OPTION VALUE="Saint Croix">Saint Croix
<OPTION VALUE="Saint Helena">Saint Helena
<OPTION VALUE="Saint Kitts and Nevis">Saint Kitts and Nevis
<OPTION VALUE="Saint Lucia">Saint Lucia
<OPTION VALUE="Saint Pierre and Miquelon">Saint Pierre and Miquelon
<OPTION VALUE="Saint Vincent and Grenadi">Saint Vincent and Grenadi
<OPTION VALUE="San Marino">San Marino
<OPTION VALUE="Sao Tome and Principe">Sao Tome and Principe
<OPTION VALUE="Saudi Arabia">Saudi Arabia
<OPTION VALUE="Senegal">Senegal
<OPTION VALUE="Seychelles">Seychelles
<OPTION VALUE="Sierra Leone">Sierra Leone
<OPTION VALUE="Singapore">Singapore
<OPTION VALUE="Slovakia">Slovakia
<OPTION VALUE="Slovenia">Slovenia
<OPTION VALUE="Solomon Islands">Solomon Islands
<OPTION VALUE="Somalia Northern Region">Somalia Northern Region
<OPTION VALUE="Somalia Southern Region">Somalia Southern Region
<OPTION VALUE="South Africa">South Africa
<OPTION VALUE="South Sandwich Islands">South Sandwich Islands
<OPTION VALUE="Spain">Spain
<OPTION VALUE="Sri Lanka">Sri Lanka
<OPTION VALUE="Sudan">Sudan
<OPTION VALUE="Suriname">Suriname
<OPTION VALUE="Swaziland">Swaziland
<OPTION VALUE="Sweden">Sweden
<OPTION VALUE="Switzerland">Switzerland
<OPTION VALUE="Syria">Syria
<OPTION VALUE="台湾">台湾
<OPTION VALUE="Tajikistan">Tajikistan
<OPTION VALUE="Tanzania">Tanzania
<OPTION VALUE="Thailand">Thailand
<OPTION VALUE="Togo">Togo
<OPTION VALUE="Tonga">Tonga
<OPTION VALUE="Trinidad and Tobago">Trinidad and Tobago
<OPTION VALUE="Tunisia">Tunisia
<OPTION VALUE="Turkey">Turkey
<OPTION VALUE="Turkmenistan">Turkmenistan
<OPTION VALUE="Turks and Caicos Islnd">Turks and Caicos Islnd
<OPTION VALUE="Tuvalu">Tuvalu
<OPTION VALUE="美国">美国
<OPTION VALUE="Uganda">Uganda
<OPTION VALUE="Ukraine">Ukraine
<OPTION VALUE="United Arab Emirates">United Arab Emirates
<OPTION VALUE="United Kingdom">United Kingdom
<OPTION VALUE="Uruguay">Uruguay
<OPTION VALUE="Uzbekistan">Uzbekistan
<OPTION VALUE="Vanuatu">Vanuatu
<OPTION VALUE="Vatican City">Vatican City
<OPTION VALUE="Venezuela">Venezuela
<OPTION VALUE="Vietnam">Vietnam
<OPTION VALUE="Virgin Islands (United Kingdom)">Virgin Islands (United Kingdom)
<OPTION VALUE="Wallis and Futuna Islands">Wallis and Futuna Islands
<OPTION VALUE="Western Sahara">Western Sahara
<OPTION VALUE="Western Samoa">Western Samoa
<OPTION VALUE="Yemen">Yemen
<OPTION VALUE="Zambia">Zambia
<OPTION VALUE="Zimbabwe (Rhodesia)">Zimbabwe (Rhodesia)
</select></font></td>
</tr>
<%end if
if strAge = "1" then
%>
<tr>
<td bgColor="<% =strPopUpTableColor %>" align=right nowrap valign=top><b><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">年 龄: </font></b></td>
<td bgColor="<% =strPopUpTableColor %>"><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><INPUT name="Age" size="7" value="<% =ChkString(RS("M_AGE"), "display") %>"></font></td>
</tr>
<%
end if
if strSex = "1" then
%>
<tr>
<td bgColor="<% =strPopUpTableColor %>" align=right nowrap><b><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">性 别: </font></b></td>
<td bgColor="<% =strPopUpTableColor %>"><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><select name="Sex" size="1">
<OPTION selected VALUE="<% =RS("M_SEX") %>"><% =RS("M_SEX") %>
<OPTION VALUE="男性">男性
<OPTION VALUE="女性">女性
</select></font></td>
</tr>
<%
end if
if strMarStatus = "1" then
%>
<tr>
<td bgColor="<% =strPopUpTableColor %>" align=right nowrap valign=top><b><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">婚姻状况: </font></b></td>
<td bgColor="<% =strPopUpTableColor %>"><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><INPUT name="MarStatus" size="25" value="<% =ChkString(RS("M_MARSTATUS"), "display") %>"></font></td>
</tr>
<%
end if
if strOccupation = "1" then
%><tr>
<td bgColor="<% =strPopUpTableColor %>" align=right nowrap valign=top><b><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">现任职业: </font></b></td>
<td bgColor="<% =strPopUpTableColor %>"><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><INPUT name="Occupation" size="25" value="<% = ChkString(RS("M_OCCUPATION"), "display") %>"></font></td>
</tr>
<%
end if
if Request.Querystring("mode") = "goModify" then %>
<tr>
<td bgColor="<% =strPopUpTableColor %>"align=right nowrap><b><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">文章总数: </font></b></td>
<td bgColor="<% =strPopUpTableColor %>"><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><INPUT name="Posts" size="25" value="<% = ChkString(RS("M_POSTS"), "display") %>"></font></td>
</tr>
<%end if
strTxtSig = RS("M_SIG") %>
<tr>
<td bgColor="<% =strPopUpTableColor %>" align=right valign=top nowrap><b><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">个人签名: </font></b></td>
<td bgColor="<% =strPopUpTableColor %>"><textarea maxLength="255" name="Sig" cols="25" rows=4><% =Trim(cleancode(strTxtSig)) %></textarea></td>
</tr>
<%if Request.Form("Method_Type") = "Modify" then %>
<tr>
<td bgColor="<% =strPopUpTableColor %>" align=right valign=top nowrap><b><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">会员等级: </font></b></td>
<td bgColor="<% =strPopUpTableColor %>" valign=top>
<%if rs("M_NAME") = "Admin" then %>
<font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">管理员</font>
<input type="hidden" value="3" name="Level">
<%else %>
<SELECT value="1" name="Level">
<OPTION VALUE="1"<% if rs("M_LEVEL") = 1 then Response.Write(" selected") %>>一般会员
<OPTION VALUE="2"<% if rs("M_LEVEL") = 2 then Response.Write(" selected") %>>版主
<OPTION VALUE="3"<% if rs("M_LEVEL") = 3 then Response.Write(" selected") %>>管理员
</SELECT>
<%end if %>
</td>
</tr>
<%end if %>
<!--</table>
</td> -->
<%
if not(strUseExtendedProfile) then
%>
<tr>
<td align=center bgcolor="<% =strCategoryCellColor %>" colspan="2"><b><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>" color="<% =strHeadFontColor %>"> 联系方法 </font></b></td>
</tr>
<tr>
<td bgColor=<% =strPopUpTableColor %> align=right width="10%"" nowrap><b><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><FONT color=#ff0000>*</FONT> 电子邮件: </font></b></td>
<td bgColor=<% =strPopUpTableColor %>><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><INPUT name="Email" size="25" value="<% = ChkString(RS("M_EMAIL"), "display") %>">
<INPUT type="hidden" name="Email2" value="<% =RS("M_EMAIL") %>"></font></td>
</tr>
<%if strICQ = "1" then%>
<tr>
<td bgColor=<% =strPopUpTableColor %> align=right nowrap width="10%""><b><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">ICQ号码: </font></b></td>
<td bgColor=<% =strPopUpTableColor %>><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><INPUT name="ICQ" size="25" value="<% = ChkString(RS("M_ICQ"), "display") %>"></font></td>
</tr>
<%end if
if strYAHOO = "1" then
%><tr>
<td bgColor=<% =strPopUpTableColor %> align=right nowrap width="10%""><b><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">YAHOO号码: </font></b></td>
<td bgColor=<% =strPopUpTableColor %>><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><INPUT name="YAHOO" size="25" value="<% = ChkString(RS("M_YAHOO"), "display") %>"></font></td>
</tr>
<%end if
if strAIM = "1" then
%><tr>
<td bgColor=<% =strPopUpTableColor %> align=right nowrap width="10%""><b><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">OICQ号码: </font></b></td>
<td bgColor=<% =strPopUpTableColor %>><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><INPUT name="AIM" size="25" value="<% = ChkString(RS("M_AIM"), "display") %>"></font></td>
</tr>
<%end if
end if
if (strHomepage + strFavLinks) > 0 and not(strUseExtendedProfile) then %>
<tr>
<td align=center bgcolor="<% =strCategoryCellColor %>" colspan="2">
<b><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>" color="<% =strHeadFontColor %>">相关连接 </font></b></td>
</tr>
<%if strHomepage = "1" then %>
<tr>
<td bgColor=<% =strPopUpTableColor %> align=right nowrap width="10%""><b><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">个人主页: </font></b></td>
<td bgColor=<% =strPopUpTableColor %>><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><INPUT name="Homepage" size="25" value="<% if RS("M_Homepage") <> " " and lcase(RS("M_Homepage")) <> "http://" then Response.Write(ChkString(RS("M_Homepage"), "display")) else Response.Write("http://") %>"></font></td>
</tr>
<%end if
if strFavLinks = "1" then
strLINK1 = rs(M_LINK1)
strLINK2 = rs(M_LINK2)
%>
<tr>
<td bgColor=<% =strPopUpTableColor %> align=right nowrap width="10%""><b><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">推荐连接: </font></b></td>
<td bgColor=<% =strPopUpTableColor %>><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><INPUT name="Link1" size="25" value="<% if strLINK1 <> " " and strLINK1 <> "http://" then Response.Write(ChkString(strLINK1, "display")) else Response.Write("http://") %>"></font></td>
</tr>
<tr>
<td bgColor=<% =strPopUpTableColor %> align=right nowrap width="10%""><b><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"> </font></b></td>
<td bgColor=<% =strPopUpTableColor %>><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><INPUT name="Link2" size="25" value="<% if strLINK2 <> " " and lcase(strLINK2) <> "http://" then Response.Write(ChkString(strLINK2, "display")) else Response.Write("http://") %>"></font></td>
</tr>
<%end if
end if
%>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<% if strUseExtendedProfile then %>
</table>
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td bgColor="<% =strPageBGColor %>" align=center nowrap <%= strColspan %>>
<br>
<INPUT type="hidden" value="<% =Request.Form("MEMBER_ID") %>" name="MEMBER_ID">
<INPUT type="submit" value="提 交" name=Submit1>
</td>
</tr>
<% else%>
<tr>
<td bgColor="<% =strPageBGColor %>" align=center nowrap <%= strColspan %>>
<br>
<INPUT type="hidden" value="<% =Request.Form("MEMBER_ID") %>" name="MEMBER_ID">
<INPUT type="submit" value="提 交" name=Submit1>
</td>
</tr>
<tr>
<td bgColor="<% =strPageBGColor %>" align=center nowrap>
<% end if%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -