ASP编程：使用ASP取得图像的实践尺寸的示例

只看该作者 · 发表于 2015-2-3 23:38:57

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

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

x

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:51

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

只看该作者 · 发表于 2015-2-9 15:50:25

它可通过内置的组件实现更强大的功能，如使用A-DO可以轻松地访问数据库。

只看该作者 · 发表于 2015-2-27 09:06:03

我可以结合自己的经验大致给你说一说，希望对你有所帮助，少走些弯路。

只看该作者 · 发表于 2015-3-9 20:43:46

那么，ASP.Net有哪些改进呢？

只看该作者 · 发表于 2015-3-11 09:39:16

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

只看该作者 · 发表于 2015-3-18 03:05:14

我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页，这其中就用到了ASP，我想它的作用是可想而知的。

只看该作者 · 发表于 2015-3-25 10:14:43

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

只看该作者 · 发表于 2015-4-4 17:05:47

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

只看该作者 · 发表于 2015-4-5 23:59:08

从事这个行业，那么你可以学ASP语言，简单快速上手，熟练dreamweav排版，写asp代码，熟练photoshop处理图片，打好基础就行了

只看该作者 · 发表于 2015-4-9 16:11:17

下载一个源代码，然后再下载一个VBScript帮助，在源代码中遇到不认识的函数或是其他什么程序，都可以查帮助进行解决，这样学习效率很高。

只看该作者 · 发表于 2015-4-12 10:15:58

交流是必要的，不管是生活还是学习我们都要试着去交流，通过交流我们可以学到很多我们自己本身所没有的知识，可以分享别人的经验甚至经历。

只看该作者 · 发表于 2015-4-12 10:26:26

完全不知道到底自己学的是什么。最后，除了教程里面说的几个例子，还是什么都不会。

只看该作者 · 发表于 2015-4-12 11:29:12

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

只看该作者 · 发表于 2015-4-14 10:11:25

从事这个行业，那么你可以学ASP语言，简单快速上手，熟练dreamweav排版，写asp代码，熟练photoshop处理图片，打好基础就行了

只看该作者 · 发表于 2015-4-29 21:53:47

掌握asp的特性而且一定要知道为什么。

只看该作者 · 发表于 2015-5-1 13:10:50

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

只看该作者 · 发表于 2015-5-6 04:49:47

还有如何才能在最短的时间内学完?我每天可以有效学习2小时，双休日4小时。

只看该作者 · 发表于 2015-6-7 14:36:33

Application:这个存储服务端的数据，如果不清除，会直到web应用程序结束才清除(例如重启站点)

		自动登录	找回密码
密码			立即注册

[学习教程] ASP编程：使用ASP取得图像的实践尺寸的示例

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

相关帖子

浏览过的版块