图库网站源码
android/apps/package/Gallery3D/
❷ 求一个学校网站首页的源代码
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="generator" content="贵州省">
<meta name="keywords" content="凯里一中欢迎您!">
<meta name="description" content="首页">
<title>凯里一中 - 首页 - 凯里一中欢迎您!</title>
<link rel="shortcut icon" href="/images/favicon.ico">
<link type="text/css" href="/Skin/Skin_1.css" rel=stylesheet>
<script language=javascript src="/style/YSvoid_Functions.js"></script>
<script language=javascript src="/style/YSvoid_Title.js"></script>
<body topmargin=0 leftmargin=0>
<center>
<OBJECT style="WIDTH: 965px; HEIGHT: 190px" codeBase=http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0 height=198 width=1000 classid=clsid:D27CDB6E-AE6D-11cf-96B8-444553540000 196px? HEIGHT: 100%?;><PARAM NAME="_cx" VALUE="26458"><PARAM NAME="_cy" VALUE="5239"><PARAM NAME="FlashVars" VALUE=""><PARAM NAME="Movie" VALUE="/Upload/htmledit/2008812205023787.swf"><PARAM NAME="Src" VALUE="/Upload/htmledit/2008812205023787.swf"><PARAM NAME="WMode" VALUE="Window"><PARAM NAME="Play" VALUE="-1"><PARAM NAME="Loop" VALUE="-1"><PARAM NAME="Quality" VALUE="High"><PARAM NAME="SAlign" VALUE=""><PARAM NAME="Menu" VALUE="-1"><PARAM NAME="Base" VALUE=""><PARAM NAME="AllowScriptAccess" VALUE=""><PARAM NAME="Scale" VALUE="ShowAll"><PARAM NAME="DeviceFont" VALUE="0"><PARAM NAME="EmbedMovie" VALUE="0"><PARAM NAME="BGColor" VALUE=""><PARAM NAME="SWRemote" VALUE=""><PARAM NAME="MovieData" VALUE=""><PARAM NAME="SeamlessTabbing" VALUE="1"><PARAM NAME="Profile" VALUE="0"><PARAM NAME="ProfileAddress" VALUE=""><PARAM NAME="ProfilePort" VALUE="0"><PARAM NAME="AllowNetworking" VALUE="all"><PARAM NAME="AllowFullScreen" VALUE="false">
<embed src='/Upload/htmledit/2008812205023787.swf' quality=high pluginspage='http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash' type='application/x-shockwave-flash' width="100%"
height=300>/Upload/htmledit/2008812205023787.swf</embed></OBJECT>
<TABLE borderColor=#000000 cellSpacing=2 cellPadding=3 width=965 bgColor=#ffffff border=0 heihgt="">
<TBODY>
<UL id=menuItem 99%?;>
<P align=center><li id='menuHome'><li id='menuHomes'><a href='/'><span>首页</span></a></li></li>
<li id='menuNews'><a href='/News/'><span>学校新闻</span></a> </li>
<li id='menuArticle'><a href='/Article/'><span>德育之窗</span></a> </li>
<li id='menuBaiNian'><a href='/BaiNian/' title='学校简介'><span>学校概况</span></a> </li>
<li id='menuxiaoyou'><a href='/xiaoyou/' title='欢迎新老校友常来看看'><span>校友天地</span></a> </li>
<li id='menuBuMeng'><a href='/BuMeng/'><span>部门时讯</span></a> </li>
<li id='menuZhaoSheng'><a href='/ZhaoSheng/' title='关于考试'><span>招生录取</span></a> </li>
<li id='menuJiaoYan'><a href='/JiaoYan/' title='关于教学'><span>教研教学</span></a> </li>
<li id='menuShiZill'><a href='/ShiZill/' title='师资力量'><span>师资力量</span></a> </li>
<li id='menuDown'><a href='/Down/'><span>试题资源</span></a> </li>
<li id='menuVideo'><a href='/Video/'><span>一中视频</span></a> </li>
<li id='menuPhoto'><a href='/Photo/'><span>校园图库</span></a> </li>
<li id='menuForum'><a href='/Forum/'><span>论 坛</span></a> </li>
<P></P>
<UL></UL>
<DIV></DIV>
<P></P>
<UL></UL>
<P></P>
<UL></UL>
<P></P>
<UL></UL>
<P></P>
<UL></UL>
<P></P>
<UL></UL></P></UL></TBODY>
<TBODY>
<DIV id=headFind>
<DIV id=headForm><SPAN id=menuFind>今天是：2009年5月27日星期三 | 您现在位于：<A class=h_menu href="http://172.16.1.167:81/Editor//">网站首页</A> → <font title='首页'>首页</font></SPAN> </DIV></DIV></TBODY></TABLE>
<DIV></DIV><TBODY></TBODY></TABLE>
<table border=0 width="965" cellspacing=0 cellpadding=0>
<tr>
<td width=* align=center class=bg>
<table border=0 width='100%' cellspacing=0 cellpadding=0>
<tr>
<td align=center>
<!---------------------------------登陆、新闻、文章、调查、公告、搜索 开始--------------------------------->
<table border=0 cellspacing=0 cellpadding=0 width="100%">
<tr valign=top>
<td width='74%' height="49">
<table border=0 cellspacing=0 cellpadding=0 width='100%'>
<tr valign=top>
<td><table width="100%" border=0 cellpadding=0 cellspacing=0>
<tr valign=top>
<td width='25%'><table border=0 cellspacing=0 cellpadding=0 width='100%'>
<tr>
<td width='25%'><script language="JavaScript" src="/style/YSvoid_keyboard.js" type="text/javascript"></script>
<table cellspacing=1 cellpadding=1 class=table_Home>
<TBODY>
<TR>
<TD class=td0_Home>用户登陆</TD></TR>
<TR class=bg_td>
<TD align=middle>
<TABLE border=0 cellspacing=0 cellpadding=2>
<FORM name=login_frm onSubmit="return login_true()" action=/User/login.asp?action=login_chk method=post>
<INPUT type=hidden value=yes name=chk>
<INPUT type=hidden value=yes name=re_log>
<TBODY>
<TR>
<TD>用户名:</TD>
<TD><INPUT type=text class=username size=18 name=username maxlegth="20" title="用户名，输入正确的用户名"></TD></TR>
<TR>
<TD>密 码:</TD>
<TD><INPUT class=password type=password size=18 name=password maxlegth="20" onclick="showkeyboard('login_frm.password')" title="用软键盘输入密码，防止黑客软件记录键盘的录入信息,如不使用键盘可直接输入密码!"></TD></TR>
<tr>
<td>验证码:</td>
<td><input type=text class=txt name=CodeStr maxlength=4 size=4><img src='/Include/YSvoid_GetCode.asp' align=absMiddle title= '验证码，看不清楚。请点击刷新验证码！' onclick="this.src='/Include/YSvoid_GetCode.asp'"></td>
</tr>
<tr>
<td height="3"></td>
</tr>
<TR>
<TD align=middle colSpan=2>
<A href="/User/register.asp"><img src="/Skin/Skin_1/main/user_login_butreg.gif" border=0 title="注册用户，点这里可以注册新用户"></A>
<INPUT onclick="jacascript:return login_true();" type=image src="/Skin/Skin_1/main/user_login_button.gif" align=absMiddle border=0 title="用户登陆，请输入正确的用户名、密码、验证码再登陆网站">
<A style="CURSOR: help" href="/User/Getpass.asp"><img src="/Skin/Skin_1/main/user_login_key.gif" border=0 title="忘记密码，点这里可以找回自己的密码"></A></TD></TR>
<tr>
<td height="3"></td>
</tr>
<TR>
<TD align=middle colSpan=2><A href="/User/register.asp?action=resend" alt="重新发送一次我的注册验证邮件！">发送注册邮件</A> <INPUT class=bg_td id=id_memery_info type=checkbox value=yes name=memery_info><LABEL id=label_memery_info for=id_memery_info alt="如选择“记住密码”登陆，以后将自动登陆本站！">记住密码</LABEL></FORM></TABLE></TD></TR></TBODY></TABLE>
<table border=0><tr><td height=3></td></tr></table></td>
<tr valign=top>
<td><table cellspacing=1 cellpadding=2 class=Table_Home>
<TR>
<TD class=td0_Home>德育之窗</TD></TR>
<tr class=bg_Home><td align=center>
<tr height=20><td><B>·</B><a href='Article/view.asp?id=71' style="color:FF0000;" title='德育之窗标题：凯里一中德育简报[ 2009 ] 第二期 总18期
发 布 人：klyzren
浏览次数：180 人次
整理时间：2009-4-27 22:03:21' target=_blank> 凯里一中德育简报[ 2009 ] 第二...</a></td></tr>
<tr height=20><td><B>·</B><a href='Article/view.asp?id=64' style="color:0000FF;" title='德育之窗标题：凯里一中德育简报[ 2009 ] 第一期 总17期
发 布 人：klyzren
浏览次数：261 人次
整理时间：2009-4-10 13:10:56' target=_blank> 凯里一中德育简报[ 2009 ] 第一...</a></td></tr>
<tr height=20><td><B>·</B><a href='Article/view.asp?id=26' style="color:FF0000;" title='德育之窗标题：凯里一中校园文化
发 布 人：klyzren
浏览次数：1352 人次
整理时间：2008-10-6 21:33:11' target=_blank> 凯里一中校园文化</a></td></tr>
<tr height=20><td><B>·</B><a href='Article/view.asp?id=23' style="color:;" title='德育之窗标题：以学生为本构建新型的师生关系
发 布 人：klyzboy
浏览次数：736 人次
整理时间：2008-9-25 9:30:50' target=_blank> 以学生为本构建新型的师生关...</a></td></tr>
<tr height=20><td><B>·</B><a href='Article/view.asp?id=20' style="color:;" title='德育之窗标题：文以载道，以道育人
发 布 人：klyzboy
浏览次数：715 人次
整理时间：2008-9-24 21:59:51' target=_blank> 文以载道，以道育人</a></td></tr>
<tr height=20><td><B>·</B><a href='Article/view.asp?id=19' style="color:;" title='德育之窗标题：浅谈班主任工作中的德育教育
发 布 人：klyzboy
浏览次数：784 人次
整理时间：2008-9-24 21:54:46' target=_blank> 浅谈班主任工作中的德育教育</a></td></tr>
</td></tr>
</table>
<table border=0><tr><td height=3></td></tr></table></td>
</tr>
</table></td>
<td width='1%'></td>
<td width='47%'><table border=0 cellspacing=0 cellpadding=0 width='100%'>
<tr valign=top>
<td>
<table cellspacing=1 cellpadding=2 class=Table_Home>
<TR>
<TD class=td0_Home>凯里一中新闻</TD></TR>
<tr class=bg_Home><td align=center>
<table border=0 width='100%'><tr><td align=center>
<table border=0 width='100%'>
<tr>
<td>
<script type="text/javascript">
<!--
var swf_width='450'
var swf_height='282'
var files='/Upload/htmledit/2009516132544327.jpg|/Upload/htmledit/2009427215449568.jpg|/Upload/htmledit/200949173335244.jpg|/Upload/News/2008-12/2008122820595390801.jpg|/Upload/News/2008-12/2008121123323240865.jpg'
var links='News/view.asp?id=531|News/view.asp?id=507|News/view.asp?id=459|News/view.asp?id=405|News/view.asp?id=402'
var texts='学校举行各项文艺活动|“春蕾行动”暖学子|我校荣获凯里市第三届中小学生运动会高中组团体总分第...|凯里一中田径运动场落成典礼暨2008年运动会|凯里一中纪念改革开放30周年暨“一二.九”学生爱国运动...'
var TitleBgAlpha='70'
var TitleBgPosition='30'
var Tween='2'
var AutoPlayTime='120'
var WinOpen='_blank'
var TitleTextColor='0xFFFFFF'
var TitleBgColor='0x000000'
var BtnDefaultColor='0x000000'
var BtnOverColor='0x000033'
document.write('<object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" codebase="http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,0,0" width="'+ swf_width +'" height="'+ swf_height +'">');
document.write('<param name="movie" value="/images/small/index_news.swf"><param name="quality" value="high">');
document.write('<param name="menu" value="false"><param name=wmode value="opaque">');
document.write('<param name="FlashVars" value="bcastr_file='+files+'&bcastr_link='+links+'&bcastr_title='+texts+'&TitleBgAlpha='+ TitleBgAlpha +'&TitleBgPosition='+ TitleBgPosition +'&Tween='+ Tween +'&AutoPlayTime='+ AutoPlayTime +'&WinOpen='+ WinOpen +'&TitleTextColor='+ TitleTextColor +'&TitleBgColor='+ TitleBgColor +'&BtnDefaultColor='+ BtnDefaultColor +'&BtnOverColor='+ BtnOverColor +'>');
document.write('<embed src="/images/small/index_news.swf" wmode="opaque" FlashVars="bcastr_file='+files+'&bcastr_link='+links+'&bcastr_title='+texts+'&TitleBgAlpha='+ TitleBgAlpha +'&TitleBgPosition='+ TitleBgPosition +'&Tween='+ Tween +'&AutoPlayTime='+ AutoPlayTime +'&WinOpen='+ WinOpen +'&TitleTextColor='+ TitleTextColor +'&TitleBgColor='+ TitleBgColor +'&BtnDefaultColor='+ BtnDefaultColor +'&BtnOverColor='+ BtnOverColor +'& menu="false" quality="high" width="'+ swf_width +'" height="'+ swf_height +'" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer" />');
document.write('</object>');
-->
</script>
</td></tr><tr>
<td>
<table border=0 width='100%'>
<tr align=center>
<td><table border=0 cellspacing=0 cellpadding=0 width='100%'><tr><td height=20><B>·</B><a href='News/view.asp?id=529' style="color:0000FF;" title='新闻标题：凯里一中足球特招考核成绩登记表
发 布 人：klyzren
浏览次数：146 人次
整理时间：2009-5-11 17:41:16' target=_blank>凯里一中足球特招考核成绩登...</a></tr></td></table></td>
<td><table border=0 cellspacing=0 cellpadding=0 width='100%'><tr><td height=20><B>·</B><a href='News/view.asp?id=526' style="color:0000FF;" title='新闻标题：致校友的一封信(校庆公告一)
发 布 人：klyzren
浏览次数：170 人次
整理时间：2009-5-6 20:58:36' target=_blank>致校友的一封信(校庆公告一...</a></tr></td></table></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr></table>
</td></tr>
</table>
<table border=0><tr><td height=3></td></tr></table>
</td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
</td>
<td width='1%'></td>
<td width='25%'>
<table border=0 cellspacing=0 cellpadding=0 width='100%'>
<tr valign=top>
<td><table cellspacing=1 cellpadding=2 class=Table_Home>
<TR>
<TD class=td0_Home>学校公告</TD></TR>
<tr class=bg_Home><td align=center>
<tr>
<td height=21><B>·</B><a href='/Common/Update.asp?Action=&id=7' target_blank title='公告标题：通知（关于天气）
发布时间：2008-12-23 12:49:02
点击浏览详细……'>通知（关于天气）</a></td>
</tr>
<tr>
<td height=21><B>·</B><a href='/Common/Update.asp?Action=&id=6' target_blank title='公告标题：致同学们的一封信
发布时间：2008-10-15 13:44:48
点击浏览详细……'>致同学们的一封信</a></td>
</tr>
<tr>
<td height=21><B>·</B><a href='/Common/Update.asp?Action=&id=4' target_blank title='公告标题：国庆放假通知
发布时间：2008-10-13 18:21:29
点击浏览详细……'>国庆放假通知</a></td>
</tr>
<tr>
<td height=21><B>·</B><a href='/Common/Update.asp?Action=&id=1' target_blank title='公告标题：凯里一中网站改版
发布时间：2008-8-4 15:48:26
点击浏览详细……'>凯里一中网站改版</a></td>
</tr>
</td></tr>
</table>
<table border=0><tr><td height=3></td></tr></table></td>
</tr>
<tr valign=top>
<td width='50%'><table cellspacing=1 cellpadding=2 class=Table_Home>
<TR>
<TD class=td0_Home>试题资源</TD></TR>
<tr class=bg_Home><td align=center>
<tr height=20><td><B>·</B><a href='Down/view.asp?id=47' style="color:;" title='试题资源标题：竞赛数学训练题目
发 布 人：jswei85
浏览次数：33 人次
整理时间：2009-4-13 16:40:48' target=_blank> 竞赛数学训练题目</a></td></tr>
<tr height=20><td><B>·</B><a href='Down/view.asp?id=45' style="color:;" title='试题资源标题：高三历史中国古代史专题复习：中国古代民族关系和对外关系人教版知识精讲
发 布 人：klyzren
浏览次数：16 人次
整理时间：2009-3-27 15:34:52' target=_blank> 高三历史中国古代史专题复习：...</a></td></tr>
<tr height=20><td><B>·</B><a href='Down/view.asp?id=44' style="color:;" title='试题资源标题：高二语文《兰亭集序》北京版知识精讲
发 布 人：klyzren
浏览次数：18 人次
整理时间：2009-3-27 15:32:46' target=_blank> 高二语文《兰亭集序》北京版知...</a></td></tr>
<tr height=20><td><B>·</B><a href='Down/view.asp?id=43' style="color:;" title='试题资源标题：高中物理热学和电学部分演示实验flash动画（下）
发 布 人：klyzren
浏览次数：134 人次
整理时间：2008-10-12 22:57:07' target=_blank> 高中物理热学和电学部分演示实...</a></td></tr>
<tr height=20><td><B>·</B><a href='Down/view.asp?id=42' style="color:;" title='试题资源标题：高中物理热学和电学部分演示实验flash动画(上)
发 布 人：klyzren
浏览次数：76 人次
整理时间：2008-10-12 22:46:11' target=_blank> 高中物理热学和电学部分演示实...</a></td></tr>
<tr height=20><td><B>·</B><a href='Down/view.asp?id=40' style="color:;" title='试题资源标题：2008年会考模拟试卷
发 布 人：klpwb
浏览次数：83 人次
整理时间：2008-10-6 23:04:22' target=_blank> 2008年会考模拟试卷</a></td></tr>
<tr height=20><td><B>·</B><a href='Down/view.asp?id=38' style="color:;" title='试题资源标题：地理教学FLash--洋流的形成分布及影响
发 布 人：笑红尘
浏览次数：62 人次
整理时间：2008-9-25 13:29:41' target=_blank> 地理教学FLash--洋流的形成分布...</a></td></tr>
<tr height=20><td><B>·</B><a href='Down/view.asp?id=37' style="color:;" title='试题资源标题：地理教学演示Flash地形雨的形成
发 布 人：笑红尘
浏览次数：35 人次
整理时间：2008-9-25 13:26:51' target=_blank> 地理教学演示Flash地形雨的形成...</a></td></tr>
<tr height=20><td><B>·</B><a href='Down/view.asp?id=36' style="color:;" title='试题资源标题：地理教学演示Flash
发 布 人：笑红尘
浏览次数：68 人次
整理时间：2008-9-25 13:19:31' target=_blank> 地理教学演示Flash</a></td></tr>
</td></tr>
</table>
<table border=0><tr><td height=3></td></tr></table></td>
</tr>
</table>
</td>
</tr>
<tr valign=top>
<td height="18" colspan="3"><table cellspacing=1 cellpadding=4 class=table_Home>
<tr><td class=td_Home>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<tr>
<td class=dtd_Home>搜索导航</td>
</tr>
</table>
<tr><td class=bg_Home align=center>
<table border="0" cellspacing="1" cellpadding="4">
<form action='/Common/search.asp' method=get onsubmit="javascript:frm_submitonce(this);">
<tr>
<td><img border=0 src='/Skin/Skin_1/main/ico_search.gif' align=absmiddle> </td>
<td> <input type=text name=keyword value='' size=20 maxlength=20 title='多个关键字请用 空格 格开' class=bg_search></td>
<td>
<select name=sea_type>
<option value='news'>学校新闻</option>
<option value='article'>德育之窗</option>
<option value='nian'>辉煌的一中</option>
<option value='xiaoyou'>校友天地</option>
<option value='bumeng'>部门时讯</option>
<option value='zhaosheng'>招生录取</option>
<option value='jiaoyan'>教研教学</option>
<option value='shizill'>师资力量</option>
<option value='down'>试题资源</option>
<option value='video'>一中视频</option>
<option value='photo'>校园图库</option>
<option value='forum'>交流论坛</option>
</select></td>
<td> <input type=checkbox name=celerity value='yes'></td>
<td>快速搜索 </td>
<td valign=top><input type=submit class=btn value='搜 索'></td>
<td> <a href='/Common/search.asp?action=help' title='多功能搜索' style='cursor:help;'>搜索帮助？</a></td>
</tr>
</form>
</table>
</td></tr>
</table>
<table border=0><tr><td height=3></td></tr></table></td>
</tr>
</table>
<!---------------------------------登陆、新闻、文章、调查、公告、搜索 结束--------------------------------->
<!---------------------------------下载、商城 开始--------------------------------->
<!---------------------------------论坛、电影 开始--------------------------------->
<!---------------------------------酷站、市场、企业 开始--------------------------------->
<!---------------------------------酷站、市场、企业 结束--------------------------------->
<!---------------------------------图库、动画 开始--------------------------------->
<!---------------------------------图库、动画 结束--------------------------------->
<!---------------------------------友情连接 开始--------------------------------->
<!---------------------------------友情连接 结束--------------------------------->
</td>
</tr>
</table>
</td>
</tr>
</table>
<table border=0 width="965" cellspacing=0 cellpadding=0>
<tr>
<td width=* align=center class=bg>
<DIV id=headFind>
<DIV id=headForm><SPAN id=menuFind>
<DIV align=center>
<A class=h_td href="/Common/GuestBook.asp">网站留言</A> -
<A class=h_td href="/Common/Links.asp">友情链接</A> -
<A class=h_td href="/Common/Online.asp">与我在线</A> -
<a class=h_td href="mailto:[email protected]">校长邮箱</a> -
<A class=h_td href="#top">TOP</A> </DIV></SPAN></DIV></DIV>
<DIV id=headV2>
<DIV align=center>Copyright &; 2006-2009 <A href="http://www.klyz.cn" target=_blank><B><FONT face=Arial>www.</FONT><FONT face=Arial color=#cc3300>klyz</FONT><FONT face=Arial>.cn</FONT></B></A> All Rights Reserved.
<SCRIPT language=JavaScript src="http://s127.cnzz.com/stat.php?id=1056402&web_id=1056402&show=pic" charset=gb2312></SCRIPT>
</DIV>
<DIV align=center><FONT face=Verdana><FONT face=Verdana>校址：贵州省凯里市文化北路30号 邮 编：556000</FONT></DIV>
<DIV align=center>
<DIV align=center><FONT face=Verdana>联系电话：0855-8506108 传真：0855-8503668</FONT></DIV></FONT></DIV>
<DIV align=center><A href="http://www.klyz.cn" target=_blank>凯里一中版权所有</A> </DIV></DIV></td>
</tr>
</table>
</center>
</body>
</html>
❸ 求一个图片展示的网站源码或程序，要支持分类浏览
以前下了个用织梦做的图片站程序挺简洁的效果如图要的话留个邮箱我把模板文件发你DEDECMSV5.3版本
❹ thinkphp 我想做一个图库。。。能上传成功。。怎么才能让它全部显示出来
我提供几个途径供你学习：1.下载ueditor编辑器，里面上传图片有已上传图片管理，看源码就行。2.用ajax做图片管理，源码可以参考高洛峰写的brocms，里面有类似功能，最后，祝楼主好运！
❺ 求一个能上传小说和图片的网站源码
这是我用的asp的，图片存在UpImages文件下，图片文件存在数库里，别外你自添加数据连接吧；
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>写日记</title>
<% if session("user")="" then
response.write"非法操作"
response.end
end if
%>
<link href="Css.css" rel="stylesheet" type="text/css" />
<style type="text/css">
<!--
td { font-size: 12px; line-height: 18px; border-style: none; color: #333333}
body {
background-image: url(image/94d48012f93a637cf819b897.jpg);
}
.STYLE10 {font-size: 10px; font-family: "宋体"; }
.STYLE12 {font-size: 12px; font-family: "楷体_GB2312"; }
-->
</style></head>
<!--#include file="Conn.asp"-->
<body>
<table width="800" border="0" align="center" cellspacing="0">
<tr>
<th align="right" scope="col"> <span class="STYLE12">
<script language="JavaScript" type="text/javascript">
var pp,mm,month;
mydate=new Date();
pp=mydate.getDay();
month=mydate.getMonth()+1;
switch(pp)
{case 0: mm="星期日";break;
case 1: mm="星期一";break;
case 2:mm="星期二";break;
case 3: mm="星期三";break;
case 4: mm="星期四" ;break;
case 5 : mm="星期五";break;
case 6 : mm="星期六";break;
}
document.write("今天是:"+mydate.getYear()+"年"+month+"月"+mydate.getDate()
+"日"+" "+mm+" ");
</script>
</span></th>
</tr>
<tr>
<th height="40" scope="col"><img src="image/top.gif" width="800" height="157" alt="书丛制作" /></th>
</tr>
<tr>
<td height="25" align="center" background="image/ph.gif">写文章</td>
</tr>
</table>
<table width="800" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td bgcolor="#CCFFFF"><form action="write.asp?action=Addnew" method="post" enctype="multipart/form-data" name="form1" id="form1">
<table width="800" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="138" align="right">文章标题:</td>
<td colspan="2"><label>
<input name="title" type="text" id="title" />
</label></td>
</tr>
<tr>
<td align="right"></td>
<td width="236"><label></label>
<label for="file"></label>
<input type="file" name="file" id="file" /></td>
<td width="426"> 心情状态:
<select name="select">
<option value="一般" selected="selected">一般</option>
<option value="非常愉快">非常愉快</option>
<option value="愉快">愉快</option>
<option value="不好">不好</option>
<option value="失落">失落</option>
</select></td>
</tr>
<tr>
<td align="right">文章内容：</td>
<td colspan="2"><label>
<textarea name="content" cols="80" rows="20" id="content"></textarea>
</label></td>
</tr>
<tr>
<td align="right">操作：</td>
<td colspan="2"><label>
<input type="submit" name="Submit" value="提交" />
</label></td>
</tr>
</table>
</form>
</td>
</tr>
</table>
<table width="800" border="0" align="center" cellspacing="0">
<tr>
<th height="3" scope="col"><hr size="1" /></th>
</tr>
</table>
<table width="800" border="0" align="center" cellspacing="0">
<tr>
<th align="center" scope="col"><span class="STYLE10">Copyright 2009 ? www.pttjj.com.cn All Rights Reserved.<br />
版权所有： ｜ 技术支持：<a href="mailto:[email protected]">书丛</a> ｜ 渝ICP备000**0号 </span></th>
</tr>
</table>
<%
if request("action") = "Addnew" then
newline = chrB(13) & chrB(10) 'newline表示二进制的回车符
filesize = Request.TotalBytes 'filesize是表单数据大小
filedata = Request.BinaryRead(filesize) 'filedata是表单的二进制数据
divider = leftB(filedata,clng(instrb(filedata,newline))-1) 'divider是分割符
Set Rs = Server.CreateObject("ADODB.RecordSet")
Sql="Select * From word"
Rs.Open Sql,conn,3,3
Rs.addnew
k = 1
While instrb(k,filedata,divider) < instrb((instrb(k,filedata,divider)+lenb(divider)),filedata,divider)
start = instrb(k,filedata,divider) + lenb(divider) +2
endsize = instrb((instrb(k,filedata,divider) + lenb(divider)),filedata,divider) - start - 2
content = midb(filedata,start,endsize) '取文件说明部分
start_name = instrb(content,toByte("name="""))
end_name = instrb(start_name + 6,content,toByte(""""))
nametag = midb(content,start_name+6,end_name-start_name-6) '取文件说明部分中name=""中的内容，即表单元素的名称
pos1_filename = instrb(end_name,content,toByte("filename="""))
'如果是文件框，则文件说明部分应有filename=""，那么pos1_filename不等于0
If pos1_filename = 0 Then '表单中不属于文件上传的数据处理
namevalue = toStr(midb(content,end_name+5,lenb(content)-end_name-4)) '取文件内容
' 将文件说明部分的name=""中的内容与表单元素的名称进行比较，把相应的内容加入数据库
If(InStr(toStr(nametag),"file") > 0)Then 'CenterID2'为表单控件的name属性值，以下同
Rs("image") = namevalue
session("CenterID") = namevalue '用于上传文件保存时的文件名中
End If
If(InStr(toStr(nametag),"title") > 0)Then
Rs("title") = namevalue
if namevalue="" then
Response.Write "<Script>alert('请输入标题！')</Script>"
response.end
end if
End If
If(InStr(toStr(nametag),"content") > 0)Then
Rs("content") = namevalue
if namevalue="" then
Response.Write "<Script>alert('请输入内容！')</Script>"
response.end
end if
End If
If(InStr(toStr(nametag),"select") > 0)Then
Set Rs1 = Server.CreateObject("ADODB.RecordSet")
Sql="Select * From mun"
Rs1.Open Sql,conn,3,3
Rs1("mun")=namevalue
Rs1.update
Rs1.Close
Set Rs1=nothing
End If
Rs("wtime") = year(now)&"-"&month(now)&"-"&day(now)
'Response.Write (namevalue)
'Response.Write(" <br>")
else '处理文件上传部分的数据
pos2_filename = instrb(pos1_filename+10,content,toByte(""""))
fullpath = midb(content,pos1_filename+10,pos2_filename-pos1_filename-10) '从文件说明部分中取出文件路径
covername=GetFileName(toStr(fullpath))
If(fullpath <> "")Then '如果有上传的文件，执行以下代码
dim bStart ' 取二进制流文件部分开始位置
bStart = instrb(start,filedata,newline&newline)+3
dim bEnd ' 取二进制流文件部分结束位置
bEnd=inStrB(bStart+6,filedata,divider)-bStart-3
dim stm ' 定义一个 adodb.stream 源对象 stm, 用以拷贝二进制流文件部分至另一 adodb.stream fromStm
set stm=createObject("adodb.stream")
stm.type=1 ' 二进制模式
stm.mode=3 ' 指定打开模式为读写
stm.open
stm.write filedata '写入二进制流内容
dim fromStm '定义 adodb.stream 对象 fromStm, 以保存文件
set fromStm=createOBject("adodb.stream")
with fromStm
.type=1
.mode=3
.open
stm.position = bStart ' 指定 stm 对象的起始位置, 以变量 bStart 的值为起始位置
stm.To fromStm, bEnd ' 拷贝 stm 二进制流至 fromStm 对象, 长度为 bEnd 变量的长度
.saveTofile server.MapPath (covername),2' 保存文件, 如果存在相同名称, 则覆盖
.close
end with
set fromStm = nothing
stm.close
set stm = nothing
Rs("image") =covername '将文件的相对路径写入数据库中
end if
end if
k = instrb((instrb(k,filedata,divider)+lenb(divider)),filedata,divider)
Wend
Rs.update
Rs.close
set Rs = nothing
response.Redirect"mylife.asp"
end if
function toStr(Byt) '将二进制转换为字符串
toStr=""
for i=1 to lenb(byt)
blow = midb(byt,i,1)
if ascb(blow)>127 then
toStr = toStr&chr(ascw(midb(byt,i+1,1)&blow)) '
i = i+1
else
toStr = toStr&chr(ascb(blow))
end if
Next
End function
Function toByte(Str) '将字符串转换为二进制
dim i,iCode,c,iLow,iHigh
toByte=""
For i=1 To Len(Str)
c=mid(Str,i,1)
iCode =Asc(c)
If iCode <0 Then iCode = iCode + 65535
If iCode>255 Then
iLow = Left(Hex(Asc(c)),2)
iHigh =Right(Hex(Asc(c)),2)
toByte = toByte & chrB("&H"&iLow) & chrB("&H"&iHigh)
Else
toByte = toByte & chrB(AscB(c))
End If
Next
End function
Function GetFileName(imagespath)'将路径转换为时间,并使上传的文件不重名
If imagespath <> "" Then
rname=right(toStr(fullpath),len(toStr(fullpath))-InStrRev(toStr(fullpath),".")+1)'获得后缀名
GetFileName = "UpImages/" & year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)&rname
Else
GetFileName =""
End If
End Function
%>
</body>
</html>
❻ 找几个素材网站，最好像个性网的那种，对图片是有分类的。
一、 中国站长站素材 http://sc.chinaz.com中国站长站从当初为站长提供程序源码开始，逐渐扩充发展到为设计行业提供素材素材，包括模板、图标、矢量、字体、壁纸等。素材范围涉及得比较广阔，但目前网站源码模板为其主打力量，而广告设计方面的素材稍显欠缺。优点：素材品种繁多。缺点：广告设计类素材欠缺，搜索功能不够友好。 二、 昵图网 http://www.nipic.com昵图网算是收费素材站内的行业老大了，提供大量的矢量图片和源文件，基本能满足低端设计师日常工作的需求，但是每张图片都收费的模式，让很多入门级的设计师望而却步。优点：图片精度高，种类丰富缺点：收费 三、我图网 http://www.ooopic.com我图网的创始人韩恩来以其自身的优势在二年内的时间里把一个人新站打造成如今第二大收费站点，确实让人佩服。网站图片量已达百万级，覆盖种类极其广泛。但我图网现在基本完全在走微利商业模式了，质量稍高点的都被拿来当正版卖了，共享类的素材质量越来越差。优点：图片种类丰富，正版素材质量高。缺点：高质量素材收费较高，一般设计师可欲不可求。 四 、站酷 http://www.zcool.com.cn站酷已改版一段时间了，从这次改版来看不少从说比较失败，很多人也说比较成功。呵，以我个人的观点来看的话，是比较成功的，现在站酷成了设计师们学习砌磋的好去处了，里面汇聚了大量资深设计师。所以素材方面的发展稍次了些，矢量类的素材相当较多些。优点：素材精美，免费下载。缺点：种类不全，下载速度稍慢。 五、淘图网 http://www.taopic.com淘图网打造最专业的设计素材库，只做设计素材共享这块。内容涵盖：PSD素材，矢量素材，高清图片，影楼模板等。只要你用过该站就会被其各方面用户体验的设计所吸引，其下开发的素材求助平台更不亚于网络知道平台，加上素材的质量与实用性极高，以及每天的大量更新，让这个新兴的网站在较短的时间内获得了设计圈人士的青睐。优点：高质量素材网，无广告，用户体验好。缺点：素材总量稍逊。 六、 思缘论坛 http://www.missyuan.com思缘论坛是以帖子的形式发布，下载需要登录并要一定积分，积分获得方法较容易,可发布作品和素材均可获得,主要提供矢量，高精图，Photoshop素材，影楼模板及设计教程，影楼模板这块可堪称国内之最。优点：素材质量比较高,而且相对大的素材文件都是打包下载,解决了大文件分卷下载的麻烦!缺点：论坛搜索不很方便，新版搜索系统还处于测试阶段。 七、 爱图网 http://www.aiimg.com爱图网成长过程中，进行了一次大的转型，从之前的完全免费素材过渡到部份高品质素材收费，因为素材质量高、实用性强，一直得到众多用户的支持与厚爱，目前已为400万设计师提供了素材下载服务，成为业界知名品牌。优点：PSD素材较全面，素材质量高，实用性强。缺点：网站体验稍差，素材总量更待提升。 八、红动中国 http://www.redocn.com中国人气最旺的平面设计论坛，大量平面设计师及设计相关人员在线互动交流，设计平台提供设计作品欣赏，素材下载，设计教程学习，设计资讯等内容。优点：在线互动性强，初级设计师学习提升技术的好地方。缺点：高质量素材不是很多。 九、百图汇 http://www.5tu.cn百图汇此前名为我图网，后因一些客观原因改名为了百图汇，该站由交流论坛、共享图库、原创图库三部份结合组成，会员互动交流性较强，回帖即可获得下载积分，原创图库中的素材质量很高。共享图库下载的话是根据素材的大小而扣取相应的积分，积分系统需要进一步完善。优点：原创图库中的素材质量很高。缺点：论坛搜索不方便，积分系统不够友好。 十、素材中国 http://www.sccnn.com素材中国一直为广告设计师提供着实用性的设计素材，内容有高精图片、矢量素材、3D模型、壁纸等。之前所有素材都能免费下载，后来发展模式也稍变了下，少量精品素材也是需要积分的。总的来说素材量还是较多的，PSD素材与设计源稿较少，期待以后这块也能补上。优点：免费素材占主体，素材分类较细。缺点：psd类素材较少，搜索极不方便。
❼ 矢量图---那里可以下载到免费的矢量图
http://www.iecool.com/vector/
虽然广告有点多，但还是不错的……
高精图库和素材图库分类也很详细
这里有 : 源码网:http://www.codepub.com
例如:
1. 圣诞老人矢量图片下载
www.codepub.com/software/view-software-3572.html
2. 春节素材聚宝盆矢量图下载
www.codepub.com/software/view-software-10847.html
还有很多 你看你的需要自己在这个网站找吧 @@