ASP网站制作之怎样取得jpg文件的实践尺寸呢？
asp，你就只能等着微软给你解决，它不乐意你就只好悲催。而且asp跑在windows服务器上，windows服务器跟linux比起来简直弱爆了！网上找的一段代码，把它编译成组件就能够用了，还撑持png<br><br>
<br>
Ihavereleasedthissourcecodeintothepublicdomain.Youmayuseit<br>
withnostringsattached.<br>
JustcallGetImageSizewithastringcontainingthefilename,and<br>
itwillreturnauserdefinedtypeImageSize(seebelow)<br>
Returnvaluesof0indicateanerrorofsomesort.Theerrorhandling<br>
inthismoduleislimited.Thereis*NO*errorhandlingonthetest<br>
form.ThisroutineislimitedtoXorYsizesof32767pixels,butthat<br>
shouldnotbeaproblem.<br>
<br>
Checkbackathttp://www.qtm.net/~davidc<br>
Imayaddsupportformorefiletypes.<br>
<br>
supportedinthisversion:<br>
JPEG<br>
GIF<br>
PNG<br>
<br>
ThisroutinedoesnotrequireanyroyaltyfeesforUnisysasit<br>
doesnothingwiththecompressedpartofGIFfiles.Itsimplyreads<br>
4bytestodetermineimagesize.<br>
<br>
OptionExplicit<br>
PublicWImgAsLong<br>
PublicHImgAsLong<br>
PublicTypeImageSize<br>
WidthAsLong<br>
HeightAsLong<br>
EndType<br>
<br>
PublicSubGetImageSize(sFileNameAsString)<br>
OnErrorResumeNextyoullwanttochangethis<br>
DimiFNAsInteger<br>
DimbTemp(3)AsByte<br>
DimlFlenAsLong<br>
DimlPosAsLong<br>
DimbHmsbAsByte<br>
DimbHlsbAsByte<br>
DimbWmsbAsByte<br>
DimbWlsbAsByte<br>
DimbBuf(7)AsByte<br>
DimbDoneAsByte<br>
DimiCountAsInteger<br>
<br>
lFlen=FileLen(sFileName)<br>
iFN=FreeFile<br>
OpensFileNameForBinaryAsiFN<br>
Get#iFN,1,bTemp()<br>
<br>
PNGfile<br>
IfbTemp(0)=&H89AndbTemp(1)=&H50AndbTemp(2)=&H4E_<br>
AndbTemp(3)=&H47Then<br>
Get#iFN,19,bWmsb<br>
Get#iFN,20,bWlsb<br>
Get#iFN,23,bHmsb<br>
Get#iFN,24,bHlsb<br>
GetImageSize.Width=CombineBytes(bWlsb,bWmsb)<br>
GetImageSize.Height=CombineBytes(bHlsb,bHmsb)<br>
WImg=CombineBytes(bWlsb,bWmsb)<br>
HImg=CombineBytes(bHlsb,bHmsb)<br>
EndIf<br>
<br>
GIFfile<br>
IfbTemp(0)=&H47AndbTemp(1)=&H49AndbTemp(2)=&H46_<br>
AndbTemp(3)=&H38Then<br>
Get#iFN,7,bWls</p>ASP最大的缺点在于网络的安全性和可靠性，企业将经营数据放在开放的平台上，最大的担忧就是如何保证这些数据不被其他人破坏。 接下来就不能纸上谈兵了，最好的方法其实是实践。实践，只能算是让你掌握语言特性用的。而提倡做实际的Project也不是太好，因为你还没有熟练的能力去综合各种技术，这样只能使你自己越来越迷糊。 掌握asp的特性而且一定要知道为什么。 下面简单介绍一下我学习ASP的方法,希望对想学习ASP的朋友有所帮助... 没有坚实的理论做基础，那么我们连踏入社会第一步的资本都没有，特别对于计算机专业的学生学好专业知识是置关重要的。在这里我侧重讲一下如何学习ASP，从平时的学习过程中。 我们必须明确一个大方向，不要只是停留在因为学而去学,我们应有方向应有目标. 我认为比较好的方法是找一些比较经典的例子，每个例子比较集中一种编程思想而设计的。 ASP的语言不仅仅只是命令格式差不多，而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的，但他就是完全继承了VB所有的功能。 如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质，我们可以在实践中不断提升自己，不断充实自己。 先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习
页:
[1]