<!--#include file="Top.asp" -->
<!--#include FILE="UpLoadClass.asp"-->
<%
Server.ScriptTimeOut=5000
response.Buffer=true
dim request2,path
set request2=New UpLoadClass
request2.TotalSize= 10*1024*1024
request2.MaxSize  = 10*1024*1024
request2.FileType = "mp3/wma/wmv"
Path=CblogObj.GetUpLoadDir(Session("UserID")) & "/"
request2.SavePath=Path
request2.UserID = Session("UserID")
request2.open()
Path=Path&Request2.Form("strFile1")
if request2.Error>0 then
%>
<table width="100%" border="0" align="center" cellpadding="5" cellspacing="0" bgcolor="#FFFFFF" style="border:1px solid #999999">
  <tr> 
    <td> <div align="center"> 你的文件格式不正确或上传文件过大(mp3/wma/wmv)10M以内</div></td>
  </tr>
</table>
<%
Response.End
End IF
%>
<table width="100%" border="0" align="center" cellpadding="5" cellspacing="0" bgcolor="#FFFFFF" style="border:1px solid #999999">
  <tr> 
    <td> <div align="center"> 
        <p>您好,您的音乐已经上传成功,以下是您上传音乐的</p>
        <p>音乐的相对地址: 
          <input name="textfield222" type="text" value="<%=Path%>" size="50" />
          <br />
          发布时用的代码: 
          <input name="textfield23" type="text" value="[wmv]<%=Path%>[/wmv]" size="50" />
        </p>
      </div></td>
  </tr>
</table>
<div align="center">
<%
set request2=nothing
Set CbLOGoBJ=nOTHING
%>
</div>
</body>
</html>
