user_center.asp

全能学校管理网站源码,小草网络提供,下载试用下

document.form.title.focus();
return false;}
if(IframeID.document.body.innerHTML==""){
alert("视听内容不能为空");
IframeID.document.body.focus();
return false;}
return true;}
</Script>
<form method="post" name="form" id="form" action="?action=djok" onsubmit="return chk();">
<table width="95%" align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d>
<tr class="title"  height="22"><td><b>&nbsp;<img src=img/ie.gif border=0 width=15 height=15 align=absMiddle>&nbsp;发布视听</b></td></tr>	
<tr class=bg height="25"><td>&nbsp;视听名称：<input name="title" type="text" id="title" size="20" class=web58818 style="width:120px"><%call web58818color()%></td></tr>
<tr class=bg height="25"><td>&nbsp;视听作者：<input name="singer" type="text" id="singer" size="20" class=web58818 style="width:120px">&nbsp;<button onClick="singer.value='未知'" class=button>未知</button>&nbsp;<button onClick="singer.value='网络'" class=button>网络</button>&nbsp;<button onClick="singer.value='<%=webceo%>'" class=button><%=webceo%></button></td></tr>
<tr class=bg height="25"><td>&nbsp;视听大小：<input name="size" type="text" id="size" size="20" class=web58818 style="width:120px"></td></tr>
<tr height="25" class=bg><td>&nbsp;视听地址：<input name="url" type="text" id="url"  size="20" class=web58818 style="width:300px"><%if userup="yes" then%>&nbsp;<button onclick="document.all.updj.style.display=(document.all.updj.style.display=='none')?'':'none'" class=button>上传视听文件</button>
<table  align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d  id=updj style="position:absolute;left:270;top:40;display:none">
<tr onmousedown="MDown(updj)" style="cursor:move" height=22><td colspan="2" class=uptitle><b>&nbsp;<img src=img/ie.gif border=0 width=15 height=15 align=absMiddle>&nbsp;上传视听文件</b>
<img onclick="document.all.updj.style.display=(document.all.updj.style.display=='none')?'':'none'" style="position:absolute;right:2;top:5;cursor:hand" border="0" src="img/adminclose.gif" align=absMiddle></td></tr>
<tr class=bg>
<td align=center height=30><iframe frameborder=0 width=290 height=35 scrolling=no src="userup.asp?action=dj"></iframe>
</td>
</tr>
</table><%end if%></td></tr>
<tr class=bg height="25"><td>&nbsp;视听分类：<%call newclass("YC_djclass")%></td></tr>
<tr class=bg height="25"><td>&nbsp;播放选择：<select name=player class=web58818 style="width:120px">
<option value="media">media视听</option><option value="mediamtv">media视频</option>
<option value="real">real视听</option><option value="realmtv">real视频</option><option value="flash">FLASH</option>
</select></td></tr>
<tr><td><%call html()%></td></tr><tr><td class="hr"></td></tr>
<tr height="30" class=foot><td  align="center">
<input name="user" type="hidden"  value="<%=username%>">
<input name="dj" type="submit" class="adminbutton"  value="发 布">&nbsp;<input name="Submit2" type="reset" class="adminbutton" value="清 空" onclick="ClearReset()"></td></tr>
<textarea name="content" cols="50" rows="50" id="content" style="display:none"></textarea>
</table> 
</form>
<%elseif request("action")="pic" then%><br>
<%if userpic="no" then
response.write"<script>alert('对不起！管理员封闭了发布图片功能！！');history.go(-1);</script>"
response.end
end if%>
<script language="javascript">
function chk(){
document.all("content").value=IframeID.document.body.innerHTML;
if(document.form.title.value==""){
alert("图片标题不能为空");
document.form.title.focus();
return false;}
if(IframeID.document.body.innerHTML==""){
alert("新闻内容不能为空");
IframeID.document.body.focus();
return false;}
if(document.form.writer.value==""){
alert("图片作者不能为空");
document.form.writer.focus();
return false;}
return true;}
</Script>
<form method="post" name="form" id="form" action="?action=picok"  onsubmit="return chk();">
<table width="95%" align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d>
<tr class="title"  height="22"><td><b>&nbsp;<img src=img/ie.gif border=0 width=15 height=15 align=absMiddle>&nbsp;发布图片</b></td></tr>	
<tr class=bg height="25"><td>&nbsp;标&nbsp;题：<input name="title" type="text" id="title" size="20" class=web58818 style="width:120px"><%call web58818color()%></td></tr>
<tr class=bg height="25"><td height="25">&nbsp;原&nbsp;图：<input name="pic" type="text" id="pic"  size="20" class=web58818 style="width:300px"><%if userup="yes" then%>&nbsp;<button onclick="document.all.uppic.style.display=(document.all.uppic.style.display=='none')?'':'none'" class=button>上传原始图片</button>
<table  align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d  id=uppic style="position:absolute;left:270;top:40;display:none">
<tr onmousedown="MDown(uppic)" style="cursor:move" height=22><td colspan="2" class=uptitle><b>&nbsp;<img src=img/ie.gif border=0 width=15 height=15 align=absMiddle>&nbsp;上传原始图片</b>
<img onclick="document.all.uppic.style.display=(document.all.uppic.style.display=='none')?'':'none'" style="position:absolute;right:2;top:5;cursor:hand" border="0" src="img/adminclose.gif" align=absMiddle></td></tr><tr class=bg><td align=center height=30>
<iframe frameborder=0 width=290 height=35 scrolling=no src="userup.asp?action=pic"></iframe></td></tr></table>
<%end if%>
</td></tr>
<tr class=bg height="25"><td>&nbsp;分&nbsp;类：<%call newclass("YC_picclass")%></td></tr>
<tr><td><%call html()%></td></tr><tr><td class="hr"></td></tr>
<tr height="30" class=foot><td  align="center">
<input name="user" type="hidden"  value="<%=username%>">
<input name="pic2" type="submit" class="adminbutton" value="发 布">&nbsp;<input name="Submit2" type="reset" class="adminbutton" value="清 空" onclick="ClearReset()"></td></tr>
<textarea name="content" cols="50" rows="50" id="content" style="display:none"></textarea>
</table> 
</form>
<%elseif request("action")="down" then%><br>
<%if userdown="no" then
response.write"<script>alert('对不起！暂时不能发布软件！');history.go(-1);</script>"
response.end
end if%>
<script language="javascript">
function chk(){
document.all("content").value=IframeID.document.body.innerHTML;
if(document.form.title.value==""){
alert("下载标题不能为空");
document.form.title.focus();
return false;}
if(document.form.url1.value==""){
alert("本地下载不能为空");
document.form.url1.focus();
return false;}
if(IframeID.document.body.innerHTML==""){
alert("下载内容不能为空");
IframeID.document.body.focus();
return false;}
return true;}
</Script>
<form method="post" name="form" id="form" action="?action=downok" onsubmit="return chk();">
<table width="95%" align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d>
<tr class="title"  height="22"><td><b>&nbsp;<img src=img/ie.gif border=0 width=15 height=15 align=absMiddle>&nbsp;发布下载</b></td></tr>	
<tr class=bg height="25"><td>&nbsp;软件名称：<input name="title" type="text" id="title" size="20" class=web58818 style="width:120px"><%call web58818color()%></td></tr>
<tr class=bg height="25"><td>&nbsp;软件分类：<%call newclass("YC_downclass")%></td></tr>
<tr class=bg height="25"><td>&nbsp;软件大小：<input name="size" type="text" id="size" size="20" class=web58818 style="width:120px"></td></tr>
<tr class=bg height="25"><td>&nbsp;软件演示：<input name="show" type="text" id="show" size="20" class=web58818 style="width:300px" value="http://[e-mail]"></td></tr>
<tr class=bg height="25"><td>&nbsp;官方主页：<input name="web" type="text" id="web" size="20" class=web58818 style="width:300px" value="http://[e-mail]"></td></tr>
<tr height="25" class=bg><td>&nbsp;软件缩图：<input name="pic" type="text" id="pic" size="20" class=web58818 style="width:300px"><%if userup="yes" then%>&nbsp;<button onclick="document.all.updownpic.style.display=(document.all.updownpic.style.display=='none')?'':'none'" class=button>上传缩图</button>
<table  align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d  id=updownpic style="position:absolute;left:100;top:100;display:none">
<tr onmousedown="MDown(updownpic)" style="cursor:move" height=22><td colspan="2" class="uptitle"><b>&nbsp;<img src=img/ie.gif border=0 width=15 height=15 align=absMiddle>&nbsp;上传软件缩略图片</b>
<img onclick="document.all.updownpic.style.display=(document.all.updownpic.style.display=='none')?'':'none'" style="position:absolute;right:2;top:5;cursor:hand" border="0" src="img/adminclose.gif" align=absMiddle></td></tr>
<tr class=bg>
<td align=center height=30><iframe frameborder=0 width=290 height=35 scrolling=no src="up.asp?action=downpic"></iframe>
</td>
</tr>
</table><%end if%></td></tr>
<tr class=bg height="25"><td>&nbsp;本地下载：<input name="url1" type="text" id="url1" size="20" class=web58818 style="width:300px"><%if userup="yes" then%>&nbsp;<button onclick="document.all.updown.style.display=(document.all.updown.style.display=='none')?'':'none'" class=button>上传软件 </button>
<table  align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d  id=updown style="position:absolute;left:100;top:208;display:none">
<tr onmousedown="MDown(updown)" style="cursor:move" height=22><td colspan="2" class="uptitle"><b>&nbsp;<img src=img/ie.gif border=0 width=15 height=15 align=absMiddle>&nbsp;上传文件</b>
<img onclick="document.all.updown.style.display=(document.all.updown.style.display=='none')?'':'none'" style="position:absolute;right:2;top:5;cursor:hand" border="0" src="img/adminclose.gif" align=absMiddle></td></tr>
<tr class=bg>
<td align=center height=30><iframe frameborder=0 width=290 height=35 scrolling=no src="userup.asp?action=down"></iframe>
</td>
</tr>
</table><%end if%></td></tr>
<tr class=bg height="25"><td>&nbsp;镜像下载：<input name="url2" type="text" id="url2" size="20" class=web58818 style="width:300px"></td></tr>
<tr class=bg height="25"><td>&nbsp;友情下载：<input name="url3" type="text" id="url3" size="20" class=web58818 style="width:300px"></td></tr>
<tr><td><%call html()%></td></tr><tr><td class="hr"></td></tr>
<tr height="30" class=foot><td  align="center"> 
<input name="user" type="hidden"  value="<%=username%>">
<input name="down" type="submit" class="adminbutton" value="发 布">&nbsp;<input name="Submit2" type="reset" class="adminbutton" value="清 空" onclick="ClearReset()"></td></tr>
<textarea name="content" cols="50" rows="50" id="content" style="display:none"></textarea>
</table> 
</form>
<%
elseif  request("action")="newsok" then
set rs=server.CreateObject("adodb.recordset")
rs.open "YC_news",conn,1,3
rs.addnew
rs("title")=request.Form("title")
rs("color")=request.Form("color")
rs("class")=request.Form("class")
rs("pic")=request.Form("pic")
rs("user")=request.Form("user")
rs("content")=request.Form("content")

rs.close
set rs=nothing
conn.execute("update YC_user set user_money = user_money + 5 where id="&session("userid")&"")
conn.execute("update YC_user set user_all = user_all + 1 where id="&session("userid")&"")
response.write"<script>alert('新闻发布成功！\n请您等待管理员审核！');location.href='user_center.asp?action=welcome';</script>"
elseif request("action")="artok" then
set rs=server.CreateObject("adodb.recordset")
rs.open "YC_art",conn,1,3
rs.addnew
rs("title")=request.Form("title")
rs("color")=request.Form("color")
rs("class")=request.Form("class")
rs("pic")=request.Form("pic")
rs("content")=request.Form("content")
rs("writer")=request.Form("writer")
rs("copyright")=request.Form("copyright")
rs("showContent")=request.Form("showContent")
rs("user")=request.Form("user")

rs.close
set rs=nothing
conn.execute("update YC_user set user_money = user_money + 5 where id="&session("userid")&"")
conn.execute("update YC_user set user_all = user_all + 1 where id="&session("userid")&"")
response.write"<script>alert('文章发布成功！\n请您等待管理员审核！');location.href='user_center.asp?action=welcome';</script>"
elseif  request("action")="djok" then
set rs=server.CreateObject("adodb.recordset")
rs.open "YC_dj",conn,1,3
rs.addnew
rs("title")=request.Form("title")
rs("color")=request.Form("color")
rs("class")=request.Form("class")
rs("url")=request.Form("url")
rs("size")=request.Form("size")
rs("singer")=request.Form("singer")
rs("user")=request.Form("user")
rs("player")=request.Form("player")
rs("content")=request.Form("content")

rs.close
set rs=nothing
conn.execute("update YC_user set user_money = user_money + 5 where id="&session("userid")&"")
conn.execute("update YC_user set user_all = user_all + 1 where id="&session("userid")&"")
response.write"<script>alert('视听发布成功！\n请您等待管理员审核！');location.href='user_center.asp?action=welcome';</script>"
elseif request("action")="picok" then
set rs=server.CreateObject("adodb.recordset")
rs.open "YC_pic",conn,1,3
rs.addnew
rs("title")=request.Form("title")
rs("color")=request.Form("color")
rs("class")=request.Form("class")
rs("pic")=request.Form("pic")
rs("content")=request.Form("content")
rs("user")=request.Form("user")

rs.close
set rs=nothing
conn.execute("update YC_user set user_money = user_money + 5 where id="&session("userid")&"")
conn.execute("update YC_user set user_all = user_all + 1 where id="&session("userid")&"")
response.write"<script>alert('图片发布成功！\n请您等待管理员审核！');location.href='user_center.asp?action=welcome';</script>"
elseif  request("action")="downok" then
set rs=server.CreateObject("adodb.recordset")
rs.open "YC_down",conn,1,3
rs.addnew
rs("title")=request.Form("title")
rs("color")=request.Form("color")
rs("class")=request.Form("class")
rs("pic")=request.Form("pic")
rs("content")=request.Form("content")
rs("size")=request.Form("size")
rs("show")=request.Form("show")
rs("web")=request.Form("web")
rs("url1")=request.Form("url1")
rs("url2")=request.Form("url2")
rs("url3")=request.Form("url3")
rs("user")=request.Form("user")

rs.close
set rs=nothing
conn.execute("update YC_user set user_money = user_money + 5 where id="&session("userid")&"")
conn.execute("update YC_user set user_all = user_all + 1 where id="&session("userid")&"")
response.write"<script>alert('软件发布成功！\n请您等待管理员审核！');location.href='user_center.asp?action=welcome';</script>"
end if
sub web58818color()
end sub
call closedata()%>