仓酷云

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

[学习教程] ASP教程之ASP 3.0初级编程(二十一)

[复制链接]
小魔女 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 23:47:50 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

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

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

x
源代码保护方面其实现在考虑得没那么多了..NET也可以反编译.ASP写得复杂的话别人能看得懂的话.他也有能力自己写了.这方面担心的倒不太多.纵观现在网上可以下载的那些所谓BBS还有什么网站等等的源代码编程|初级1.Folder工具
Driver工具的RootFolder属性前往一个Folder工具,经由过程该工具可会见这个驱动器内的一切的内容。可使用这个Folder工具的属性和办法遍历驱动器上的目次,并失掉该文件夹和其他文件夹的属性。
(1)Folder工具的属性
Folder工具供应一组属性,可用这些属性失掉关于以后文件夹的更多信息,也能够改动该文件夹的称号。其属性及申明如表5-9所示:
表5-9Folder工具的属性及申明
属性
说明

Attributes
前往文件夹的属性。能够是以下值中的一个或其组合:Normal(0)、ReadOnly(1)、Hidden(2)、System(4)、Volume(称号)(8)、Directory(文件夹)(16)、Archive(32)、Alias(64)和Compressed(128)。比方,一个埋没的只读文件,Attributes的值为3

DateCreated
前往该文件夹的创立日期和工夫

DateLastAccessed
前往最初一次会见该文件夹的日期和工夫

DateLastModified
前往最初一次修正该文件夹的日期和工夫

Drive
前往该文件夹地点的驱动器的驱动器字母

Files
前往Folder工具包括的Files汇合,暗示该文件夹内一切的文件

IsRootFolder
前往一个布尔值申明该文件夹是不是是以后驱动器的根文件夹

Name
设定或前往文件夹的名字

ParentFolder
前往该文件夹的父文件夹对应的Folder工具

Path
前往文件夹的相对路径,利用响应的长文件名

ShortName
前往DOS作风的8.3情势的文件夹名

ShortPath
前往DOS作风的8.3情势的文件夹的相对路径

Size
前往包括在该文件夹里一切文件和子文件夹的巨细

SubFolers
前往该文件夹内包括的一切子文件夹对应的Folders汇合,包含埋没文件夹和体系文件夹

Type
假如大概,前往一个文件夹的申明字符串(比方,“RecycleBin”)

(2)Folder工具的办法
Folder工具供应一组可用于复制、删除和挪动以后文件夹的办法。这些办法的运转体例与FileSystemObject工具的CopyFolder、DeleFolder和MoveFolder办法不异,但这些办法不请求source参数,由于源文件就是这个文件夹。这些办法及申明如表5-10所示:
表5-10Folder工具的办法及申明
方法
说明

Copy(destination,overwrite)
将这个文件夹及一切的内容复制到destination指定的文件夹。假如destination的开端是路径分开符(‘’),那末以为destination是安排拷贝文件夹的一个文件夹。不然以为destination是要创立的新文件夹的路径和名字。假如方针文件夹已存在且overwrite参数设置为False,将发生毛病,缺省的overwrite参数是True

Delete(force)
删除文件夹及内里的一切内容。假如可选的force参数设置为True,即便文件夹设置为只读或含有只读的文件,也将删除该文件夹。缺省的force是False

Move(destination)
将文件夹及内里一切的内容挪动到destination指定的文件夹。假如destination的开端是路径分开符(‘’),那末以为destination是安排挪动文件夹的一个文件夹。不然以为destination是一个新的文件夹的路径和名字。假如方针文件夹已存在,则堕落

CreateTextFile
(filename,overwrite,unicode)
用指定的文件名在文件夹内创立一个新的文本文件,而且前往一个响应的TextStream工具。假如可选的overwrite参数设置为True,将掩盖任何已有的同名文件。缺省的overwrite参数是False。假如可选的unicode参数设置为True,文件的内容将存储为unicode文本。缺省的unicode是False

在文件夹之间可使用以后文件夹的ParentFolder属性,前往到父目次。当抵达一个文件夹时,假如IsRootFolder属性是True,就停上去。分开驱动器的根目次,沿目次树向下,可遍历或会见在Folders汇合(由以后文件夹的SubFolders属性前往)内的指定文件夹。
以下程序遍历了驱动器C根目次内的一切文件夹,并显现各个文件夹的有关信息。
VBScript程序以下:
InVBScript:
CreateaFileSystemObjectinstance
SetobjFSO=Server.CreateObject("Scripting.FileSystemObject")
GetareferencetodriveC
SetobjDriveC=objFSO.GetDrive("C:")
Getareferencetotherootfolder
SetobjRoot=objDriveC.RootFolder
GetareferencetotheSubFolderscollection
SetobjFolders=objRoot.SubFolders
GetareferencetothefirstfolderintheSubFolderscollection
ForEachobjFolderInobjFolders
SetobjFolder1=objFolders.Item((objFolder.Name))
ExitFor
Next
Iteratethroughallthefilesinthisfolder
ForEachobjFileinobjFolder1.Files
Response.Write"Name:"&objFile.Name&""
Response.Write"ShortName:"&objFile.ShortName&""
Response.Write"Size:"&objFile.Size&"bytes"
Response.Write"Type:"&objFile.Type&"<BR>"
Response.Write"Path:"&objFile.Path&""
Response.Write"ShortPath:"&objFile.ShortPath&"<BR>"
Response.Write"Created:"&objFile.DateCreated&""
Response.Write"LastModified:"&objFile.DateLastModified&"<P>"
Next
JScript程序以下:
/</p>专业性的服务。有的ASP商提供垂直型的应用服务,针对某一特定行业提供应用服务。
若相依 该用户已被删除
沙发
发表于 2015-1-20 11:52:44 | 只看该作者
你可以通过继承已有的对象最大限度保护你以前的投资。并且C#和C++、Java一样提供了完善的调试/纠错体系。
变相怪杰 该用户已被删除
板凳
发表于 2015-1-21 11:27:51 | 只看该作者
完全不知道到底自己学的是什么。最后,除了教程里面说的几个例子,还是什么都不会。
谁可相欹 该用户已被删除
地板
发表于 2015-1-26 16:35:55 | 只看该作者
下面简单介绍一下我学习ASP的方法,希望对想学习ASP的朋友有所帮助...
金色的骷髅 该用户已被删除
5#
发表于 2015-2-4 16:05:47 | 只看该作者
以HTML语言整合(HTML负责界面上,ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。
蒙在股里 该用户已被删除
6#
发表于 2015-2-10 03:56:05 | 只看该作者
学习ASP其实应该上升到如何学习程序设计这种境界,其实学习程序设计又是接受一种编程思想。比如ASP如何学习,你也许在以前的学习中碰到过。以下我仔细给你说几点:
精灵巫婆 该用户已被删除
7#
发表于 2015-3-10 05:13:34 | 只看该作者
Response:从字面上讲是“响应”,因此这个是服务端向客户端发送东西的,例如Response.Write
兰色精灵 该用户已被删除
8#
发表于 2015-3-17 04:51:01 | 只看该作者
用户端的浏览器不需要提供任何别的支持,这样大提高了用户与服务器之间的交互的速度。
灵魂腐蚀 该用户已被删除
9#
发表于 2015-3-23 19:45:25 | 只看该作者
代码的可重用性差:由于是面向结构的编程方式,并且混合html,所以可能页面原型修改一点,整个程序都需要修改,更别提代码重用了。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

GMT+8, 2024-12-24 07:53

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

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