upfile.asp

来自「宁波娱乐在线城市,丰富的内容版块」· ASP 代码 · 共 25 行

<!--#include file="UploadLib.asp"-->
<%
     if Request.ServerVariables("Request_Method") = "POST" then
        ret = Command("900|")
        if GetPart(ret,1) <> "0" then
            ShowError 3,GetPart(ret,2)
            Response.Write("<SCRIPT>window.parent.file.style.display = '';</SCRIPT>")
            Response.Write("<SCRIPT>window.parent.load.style.display = 'none';</SCRIPT>")
        else
            ShowMessage 3,"头像上传成功！"
            Response.Write("<script>window.parent.parent.document.all('iTXWJ').src = 'images/face/"&GetPart(ret,2)&"';</script>")
            Response.Write("<script>window.parent.parent.document.all('tTX').value = '"&GetPart(ret,2)&"';</script>")
            Response.Write("<SCRIPT>window.parent.file.style.display = '';</SCRIPT>")
            Response.Write("<SCRIPT>window.parent.load.style.display = 'none';</SCRIPT>")
        end if
     end if
%>
<html>
<head>
<meta NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</head>
<body style="margin:0px" bgcolor="buttonface">
</body>
</html>