仓酷云

标题: ASP编程：使用ASP取得图像的实践尺寸的示例 [打印本页]

作者: 愤怒的大鸟 时间: 2015-2-3 23:38
标题: ASP编程：使用ASP取得图像的实践尺寸的示例
Access是一种桌面数据库，只适合数据量少的应用，在处理少量数据和单机访问的数据库时是很好的，效率也很高。但是它的同时访问客户端不能多于4个。access数据库有一定的极限，如果数据达到100M左右，很容易造成服务器iis假死，或者消耗掉服务器的内存导致服务器崩溃。示例 
<html><head>
<TITLE>dbtable.asp</TITLE>
</head>
<body bgcolor="#FFFFFF">
<%
graphic="images/learnaspiconmain.gif"
HW = ReadImg(graphic)
Response.Write graphic & " Dimensions: " & HW(0) & "x" & HW(1) & "<br>"
response.write "<img src=""/" & graphic & """"
response.write height=""" & HW(0) & """
response.write width=""" & HW(0) & "">"
%>
</body></html>

The library that is included is:

<%
Dim HW

Function AscAt(s, n)
   AscAt = Asc(Mid(s, n, 1))
End Function

Function HexAt(s, n)
   HexAt = Hex(AscAt(s, n))
End Function

Function isJPG(fichero)
   If inStr(uCase(fichero), ".JPG") <> 0 Then
   isJPG = true
   Else
   isJPG = false
   End If
End Function

Function isPNG(fichero)
   If inStr(uCase(fichero), ".PNG") <> 0 Then
   isPNG = true
   Else
   isPNG = false
   End If
End Function

Function isGIF(fichero)
   If inStr(uCase(fichero), ".GIF") <> 0 Then
   isGIF = true
   Else
   isGIF = false
   End If
End Function

Function isBMP(fichero)
   If inStr(uCase(fichero), ".BMP") <> 0 Then
   isBMP = true
   Else
   isBMP = false
   End If
End Function

Function isWMF(fichero)
   If inStr(uCase(fichero), ".WMF") <> 0 Then
   isWMF = true
   Else
   isWMF = false
   End If
End Function

Function isWebImg(f)
   If isGIF(f) Or isJPG(f) Or isPNG(f) Or isBMP(f) Or isWMF(f) Then
   isWebImg = true
   Else
   isWebImg = true
   End If
End Function

Function ReadImg(fichero)
   If isGIF(fichero) Then
   ReadImg = ReadGIF(fichero)
   Else
   If isJPG(fichero) Then
   ReadImg = ReadJPG(fichero)
   Else
   If isPNG(fichero) Then
   ReadImg = ReadPNG(fichero)
   Else
   If isBMP(fichero) Then
   ReadImg = ReadPNG(fichero)
   Else
   If isWMF(fichero) Then
   ReadImg = ReadWMF(fichero)
   Else
   ReadImg = Array(0,0)
   End If
   End If
   End If
&n</p>  源代码保护方面其实现在考虑得没那么多了..NET也可以反编译.ASP写得复杂的话别人能看得懂的话.他也有能力自己写了.这方面担心的倒不太多. 纵观现在网上可以下载的那些所谓BBS还有什么网站等等的源代码

作者: 仓酷云 时间: 2015-2-4 04:43
最近在学asp，不要问我为什么不直接学.net，因为公司网站是asp做的所以有这个需要，卖了本书asp入门到精通，对里面的六大内置对象老是记不住，还有很多属性和方法看的头晕。

作者: 金色的骷髅 时间: 2015-2-9 15:50
它可通过内置的组件实现更强大的功能，如使用A-DO可以轻松地访问数据库。

作者: 再现理想 时间: 2015-2-27 09:06
我可以结合自己的经验大致给你说一说，希望对你有所帮助，少走些弯路。

作者: 简单生活 时间: 2015-3-9 20:43
那么，ASP.Net有哪些改进呢？

作者: 柔情似水 时间: 2015-3-11 09:39
运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改，找出你觉得可以提高性能的地方，加上自己的设计，那就更上一个层次了，也就会真正地感到有所收获。

作者: 因胸联盟 时间: 2015-3-18 03:05
我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页，这其中就用到了ASP，我想它的作用是可想而知的。

作者: 只想知道 时间: 2015-3-25 10:14
运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中，便可快速完成网站的应用程序，无需编译，可在服务器端直接执行。容易编写，使用普通的文本编辑器编写，如记事本就可以完成。由脚本在服务器上而不是客户端运行，ASP所使用的脚本语言都在服务端上运行。

作者: admin 时间: 2015-4-4 17:05
学习是为了用的，是为了让你的程序产生价值，把握住这个原则会比较轻松点。除此之外，课外时间一定要多参加一些社会实践活动，来锻炼自己的能力。

作者: 海妖 时间: 2015-4-5 23:59
从事这个行业，那么你可以学ASP语言，简单快速上手，熟练dreamweav排版，写asp代码，熟练photoshop处理图片，打好基础就行了

作者: 再见西城 时间: 2015-4-9 16:11
下载一个源代码，然后再下载一个VBScript帮助，在源代码中遇到不认识的函数或是其他什么程序，都可以查帮助进行解决，这样学习效率很高。

作者: 小妖女 时间: 2015-4-12 10:15
交流是必要的，不管是生活还是学习我们都要试着去交流，通过交流我们可以学到很多我们自己本身所没有的知识，可以分享别人的经验甚至经历。

作者: 不帅 时间: 2015-4-12 10:26
完全不知道到底自己学的是什么。最后，除了教程里面说的几个例子，还是什么都不会。

作者: 灵魂腐蚀 时间: 2015-4-12 11:29
作为IE上广为流传的动态网页开发技术,ASP以它简单易学博得了广大WEB程序爱好这的青睐,而且它对运行环境和开发品台的不挑剔,以及有大量有效的参考手册,极大的推广了它的发展。

作者: 精灵巫婆 时间: 2015-4-14 10:11
从事这个行业，那么你可以学ASP语言，简单快速上手，熟练dreamweav排版，写asp代码，熟练photoshop处理图片，打好基础就行了

作者: 透明 时间: 2015-4-29 21:53
掌握asp的特性而且一定要知道为什么。

作者: 蒙在股里 时间: 2015-5-1 13:10
他的语法和设计思路和VB完全相同，导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是，相当多的ASP教程混合了Javascript,VBscript等等脚本语言，搞的初学者。

作者: 冷月葬花魂 时间: 2015-5-6 04:49
还有如何才能在最短的时间内学完?我每天可以有效学习2小时，双休日4小时。

作者: 爱飞 时间: 2015-6-7 14:36
Application:这个存储服务端的数据，如果不清除，会直到web应用程序结束才清除(例如重启站点)

欢迎光临仓酷云 (http://ckuyun.com/)