📄 imageid.asp
字号:
<head><title>头像一览表</title>
</head>
<script language="javascript">
function insertsmilie(smilieface){
self.opener.xginfo.imageid.value=smilieface;
}
</script>
<%
set fso = server.CreateObject("Scripting.FileSystemObject")
set filedrive=fso.GetFolder(server.MapPath("../images/userpic"))
dim filename
Response.Write "<table>"
for each filename in filedrive.Files
%><tr><td><img src=../images/userpic/<%=filename.Name%> border=0 onload="javascript:if(this.width>150)this.width=150" onclick="insertsmilie('<%=filename.Name%>')" style="CURSOR: hand"></td></tr><%
next
Response.Write "</table>"
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -