reg_viewportrait.asp

来自「在线考试系统」· ASP 代码 · 共 79 行

ASP

79 行

<%@ Language=VBScript %>

<% option explicit %>

<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>新会员注册 - 头像浏览</title>
<link rel="stylesheet" type="text/css" href="../main.css">
</head>


<body bgcolor="#FFFFFF">

<div align="center">
  <center>

<table border="0" width="600" cellspacing="0">
  <tr>
    <td width="100%" height="25" bgcolor="#6B718C"><p align="center"><b><font color="#FFFFFF">头 像 浏 览</font></b></p>
    </td>
  </tr>
  <tr>
    <td width="100%" valign="top" align="center">
	  <p>&nbsp;</p>
      <table border="0" width="100%" cellspacing="0">


<%
	dim x
	dim y
	dim i

	dim sTmp
	for x=1 to 6

		response.write "<tr>" & vbcrlf

		for y=1 to 6
			i=i+1
			sTmp=right("000" & cstr(i),3)
			response.write "<td width='14.2%' align='center'>"
			response.write "<img src='images/portrait/" & stmp & ".gif' alt='No." & stmp & "'>" & "<br>" & sTmp
			response.write "</td>" & vbcrlf
		next

        response.write "</tr>" & vbcrlf
    next

%>

      </table>

	</td>
  </tr>
  <tr>
    <td width="100%" valign="top">
      &nbsp;</td>
  </tr>
  <tr>
    <td width="100%" valign="top">
        <p align="center"><a href="#" onClick="window.close()"><b>
        关 闭</b></a></td>
  </tr>
</table>


  </center>
</div>


</body>

</html>

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?

reg_viewportrait.asp

reg_viewportrait.asp - 源码说明

⌨️ 快捷键说明