仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 661|回复: 8
打印 上一主题 下一主题

[学习教程] ASP网页设计上传图片并天生缩略图

[复制链接]
分手快乐 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:07:43 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
Access是一种桌面数据库,只适合数据量少的应用,在处理少量数据和单机访问的数据库时是很好的,效率也很高。但是它的同时访问客户端不能多于4个。access数据库有一定的极限,如果数据达到100M左右,很容易造成服务器iis假死,或者消耗掉服务器的内存导致服务器崩溃。上传|上传图片|缩略图Subupimages()
DiminameAsString
IfNot(fileup.PostedFileIsNothing)Then
Dimnamestr1AsString=(fileup.PostedFile.FileName)
IfLCase(fileup.PostedFile.ContentType.ToString())="image/pjpeg"OrLCase(fileup.PostedFile.ContentType.ToString())="image/jpg"Then
DimjAsInteger=namestr1.LastIndexOf(".")
DimnewnameAsString=namestr1.Substring(j)D片失掉後z名
iname=CStr(Now.ToFileTimeUtc)SC的文件名(不)
DimnewnamesAsString=iname+newname从头M合文件名
DimiAsInteger=namestr1.LastIndexOf("")+1
DimnamestrAsString=namestr1.Substring(i)
fileup.PostedFile.SaveAs(Server.MapPath(imagelocal)+""+newnames)保留文件到imagelocal文件A
天生s略D()
Dimimage,sImageAsSystem.Drawing.Image
image=System.Drawing.Image.FromStream(fileup.PostedFile.InputStream)失掉原始图片
DimwidthAsDecimal=image.Width过且过失掉原始图片的宽
DimheightAsDecimal=image.Height失掉原始图片的高
Dimnewwidth,newheightAsInteger
设置缩略图的高和宽
If(width>height)Then
newwidth=150
newheight=CInt(height/width*150)
Else
newheight=150
newwidth=CInt(width/height*150)
EndIf
sImage=image.GetThumbnailImage(newwidth,newheight,Nothing,IntPtr.Zero)
DimxAsInteger=sImage.Width/2-30
DimyAsInteger=sImage.Height-20
DimoutputAsBitmap=NewBitmap(sImage)
DimgAsGraphics=Graphics.FromImage(output)
os略D加上版嘈畔()
DimfontsAsNewFont("CourierNew",9)
g.DrawString("版嘈畔",fonts,NewSolidBrush(Color.Red),x,y)
output.Save(Server.MapPath("Simagelocal")+"s_"+newnames,System.Drawing.Imaging.ImageFormat.Jpeg)
保留s略D到Simagelocal文件A
Image1.Visible=true;
Image1.ImageUrl="Simagelocal"+"s_"+newnames

Else
Label1.Text="xjpg型的D片"

EndIf
EndIf
EndSub



</p>由于ASP提供的是一对多的服务,所以用户的一些特殊需求很难得到满足。
冷月葬花魂 该用户已被删除
沙发
发表于 2015-1-18 20:47:11 | 只看该作者
完全不知道到底自己学的是什么。最后,除了教程里面说的几个例子,还是什么都不会。
灵魂腐蚀 该用户已被删除
板凳
发表于 2015-1-26 23:44:13 | 只看该作者
我认为比较好的方法是找一些比较经典的例子,每个例子比较集中一种编程思想而设计的。
变相怪杰 该用户已被删除
地板
发表于 2015-2-5 01:32:56 | 只看该作者
代码逻辑混乱,难于管理:由于ASP是脚本语言混合html编程,所以你很难看清代码的逻辑关系,并且随着程序的复杂性增加,使得代码的管理十分困难,甚至超出一个程序员所能达到的管理能力,从而造成出错或这样那样的问题。
莫相离 该用户已被删除
5#
发表于 2015-2-11 01:54:15 | 只看该作者
运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改,找出你觉得可以提高性能的地方,加上自己的设计,那就更上一个层次了,也就会真正地感到有所收获。
谁可相欹 该用户已被删除
6#
发表于 2015-3-1 19:40:34 | 只看该作者
如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质,我们可以在实践中不断提升自己,不断充实自己。
admin 该用户已被删除
7#
发表于 2015-3-10 23:02:22 | 只看该作者
ASP也是这几种脚本语言中最简单易学的开发语言。但ASP也是这几种语言中唯一的一个不能很好支持跨平台的语言。  因为ASP脚本语言非常简单,因此其代码也简单易懂,结合HTML代码,可快速地完成网站的应用程序。
飘飘悠悠 该用户已被删除
8#
发表于 2015-3-17 16:07:08 | 只看该作者
ASP主要是用好六个对象,其实最主要的是用好其中两个:response和request,就可以随心所欲地控制网页变换和响应用户动作了。
再现理想 该用户已被删除
9#
发表于 2015-3-24 10:58:57 | 只看该作者
他的语法和设计思路和VB完全相同,导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是,相当多的ASP教程混合了Javascript,VBscript等等脚本语言,搞的初学者。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2025-1-2 00:06

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表