<!--#include file="conn.asp"-->
<!-- #include file="inc/const.asp" -->
<!-- #include file="inc/char.asp" -->
<!-- #include file="chkuser.asp" -->
<script>
if (top.location==self.location){
	top.location="index.asp"
}
</script>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!--#include file="forum_css.asp"-->
</head>

<body bgcolor=<%=Tablebodycolor%> text="#000000" leftmargin="0" topmargin="0">
<% 
dim UserName
UserName=htmlencode(membername)
set rs=server.createobject("adodb.recordset")
sql="select userclass,userwealth,userpower from [User] where UserName='"&UserName&"'"
rs.open sql,conn,1,1 
if htmlencode(membername)="" then
response.write "<font size=2 color=#FF0000><b>您还没有登陆，不能上传文件,<a href=login.asp target=_blank>请先登陆</a></b></font>" 
else 
if rs("userclass") < 18 then
if rs("userwealth") < 500  then 
response.write "<font color=#FF0000>您的财产小于500，不能上传文件,请继续努力！</font>"  

elseif   rs("userpower")<0 then
response.write "<fontcolor=#FF0000>您的威望值小于0，不能上传文件,请继续努力！</font>"  
else %>
<form name="form" method="post" action="saveannouce_upfile.asp?boardid=<%=request("boardid")%>" enctype="multipart/form-data" >
<input type="hidden" name="filepath" value="<%=UpLoadPath%>">
<input type="hidden" name="act" value="upload">
图片
<input type="file" name="file1" size=10>
<input type="submit" name="Submit" value="上传" onclick="parent.document.forms[0].Submit.disabled=true,
parent.document.forms[0].Submit2.disabled=true;"> 类型：<%=Forum_upload%>，限制：<%=uploadsize%>K
</form>
<% end if
else %>
<form name="form" method="post" action="saveannouce_upfile.asp?boardid=<%=request("boardid")%>" enctype="multipart/form-data" >
<input type="hidden" name="filepath" value="<%=UpLoadPath%>">
<input type="hidden" name="act" value="upload">
图片
<input type="file" name="file1" size=10>
<input type="submit" name="Submit" value="上传" onclick="parent.document.forms[0].Submit.disabled=true,
parent.document.forms[0].Submit2.disabled=true;"> 类型：<%=Forum_upload%>，限制：<%=uploadsize%>K
</form>

</body>
</html>
<%
conn.close
set conn=nothing
end if
end if
%>
