ASP网页设计上传图片并天生缩略图
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提供的是一对多的服务，所以用户的一些特殊需求很难得到满足。 完全不知道到底自己学的是什么。最后，除了教程里面说的几个例子，还是什么都不会。 我认为比较好的方法是找一些比较经典的例子，每个例子比较集中一种编程思想而设计的。 代码逻辑混乱，难于管理：由于ASP是脚本语言混合html编程，所以你很难看清代码的逻辑关系，并且随着程序的复杂性增加，使得代码的管理十分困难，甚至超出一个程序员所能达到的管理能力，从而造成出错或这样那样的问题。 运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改，找出你觉得可以提高性能的地方，加上自己的设计，那就更上一个层次了，也就会真正地感到有所收获。 如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质，我们可以在实践中不断提升自己，不断充实自己。 ASP也是这几种脚本语言中最简单易学的开发语言。但ASP也是这几种语言中唯一的一个不能很好支持跨平台的语言。 因为ASP脚本语言非常简单，因此其代码也简单易懂，结合HTML代码，可快速地完成网站的应用程序。 ASP主要是用好六个对象，其实最主要的是用好其中两个：response和request，就可以随心所欲地控制网页变换和响应用户动作了。 他的语法和设计思路和VB完全相同，导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是，相当多的ASP教程混合了Javascript,VBscript等等脚本语言，搞的初学者。
页:
[1]