viewclip.asp 爱美尔女性商城源码 1.0源码程序 - php源码程序

gusucode.com > 爱美尔女性商城源码 1.0源码程序 > admintouch/viewclip.asp
    <html><head><title>查看剪贴板</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body>
<p>查看剪贴板<br><br>
<span style="font:9 pt"> 
  <%
  if Request.QueryString("act")="clear"  then
   Session("bufferdir")=""
   Session("bufferfile")=""
  end if
  
  if Session("bufferdir")="" and Session("bufferfile")="" then 
   response.write "<script language=javascript>window.opener.refreshit();</script><br><br><p align=center>无数据 [<a href=javascript:window.close();>关闭</a>]</p>"
   response.end
  end if
  sArr=split(Session("bufferdir"),"|")  
  if sArr(0)="cut" then
   response.write "<font color=#0000ff>操作方式:</font>剪切"
  else
   response.write "操作方式:拷贝"
  end if
  response.write "<br><br><font color=#0000ff>选中的目录:</font>"
  for i=2 to ubound(sArr)
     sStr=sArr(1)&sArr(i)
	 response.write "<br>&nbsp;"&sArr(1)&sArr(i)
  next
   response.write"<br><br><font color=#0000ff>选中的文件:</font>"
  sArr=split(Session("bufferfile"),"|")
  for i=2 to ubound(sArr)
     sStr=sArr(1)&sArr(i)
	 response.write "<br>&nbsp;"&sArr(1)&sArr(i)
  next
%>
</span></p>
<p><span style="font:9 pt"> 
  <input type="button" name="submit" value="清空剪贴板" onclick="clearit();">
  <input type="button" name="submit2" value="关闭" onClick="window.close();">
  <script language=javascript>
function clearit()
{
 location.href='<%=Request.ServerVariables("SCRIPT_NAME")%>?act=clear';
 }
</script>
</span></p>
</body>
</html>