仓酷云

标题: ASP网页设计FSO组件之驱动器操纵 [打印本页]

作者: 兰色精灵 时间: 2015-1-16 22:25
标题: ASP网页设计FSO组件之驱动器操纵
实现规模效益。与传统的用户拥有硬件软件所有权和使用权以及传统的应用服务商提供一对一的服务模式不同，ASP拥有应用系统所有权，用户拥有使用权，应用系统集中放在ASP的数据中心中，集中管理，分散使用，以一对多的租赁的形式为众多用户提供有品质保证的应用技术服务，实现规模效益。FSO，正如UFO般使人冲动、使人向往，固然更多的亦是让人欢乐让人忧。君不见某空间服务商告白：100MB空间只需60RMB/年，撑持数据库，撑持甚么甚么……一问不撑持FSO，立马气馁。那FSO事实是甚么器材，它的力气又是怎样伟大，其操纵的道理又是怎的怎的呢？此次来个完全的了解。　　起首，FSO是FileSystemObject的简称。固然也就是我们的俗称FSO组件了，该组件能够用来处置驱动器、文件夹和文件。　　它能够检测并显现出体系驱动器的信息分派情形；还可以创立、改动、挪动和删除文件夹，并能探测一些给定的文件夹是不是存在，若存在，还能提掏出该文件夹的信息，如称号、被创立或最初一次修正的日期，等等。FSO还使得对文件的处置变得很简单。　　1、fso.GetDrive　　正如别的组件的创建一样，FSO的援用也必需创建毗连。

Setfso=Server.CreateObject("Scripting.FileSystemObject")

复制代码

注重CreateObject的外部不再是MSWC了，而是Scripting。
　　那上面就能够经由过程fso来处置驱动器了。好比fso.GetDriveName提取驱动器名，fso.GetDrive一样提取尺度驱动器名。好比：　　1，fso.asp

<%Setfso=Server.CreateObject("Scripting.FileSystemObject")%>
<%=fso.GetDriveName("d:")%>
<%=fso.GetDrive("d:")%>

复制代码

你会发明GetDriveName("d:")就是“d:”，而GetDrive("d:")则为尺度的“D:”，以是我们一样平常如许写fso.GetDrive(fso.GetDriveName(drvPath))来提取某个详细的驱动盘。　　2、drv.GetInfo
　　下面已把某个特定的驱动器提取了，那接着是否是提取该驱动盘的详细信息。　　2，drv.asp

<%
Setfso=Server.CreateObject("Scripting.FileSystemObject")
Setdrv=fso.GetDrive(fso.GetDriveName("d:"))
%>
该盘的空间巨细：<%=drv.TotalSize%>
该盘的残剩空间巨细：<%=drv.FreeSpace%>

复制代码

以上只是提取的D盘驱动器的信息，来个通用的函数，持续分离测试本人的驱动吧。　　3，drvinfo.asp

<%
FunctionShowDriveInfo(drvPath)
Dimfso,drv,s
Setfso=CreateObject("Scripting.FileSystemObject")
Setdrv=fso.GetDrive(fso.GetDriveName(drvPath))
s="驱动盘"&drv&"的卷标是："
s=s&drv.VolumeName&" "
s=s&"总计空间："&drv.TotalSize&" "
s=s&"残剩空间："&drv.FreeSpace&" "
s=s&"文件范例："&drv.DriveType&" "
s=s&"文件体系："&drv.FileSystem
Response.Writes
EndFunction
%>
<%
onerrorresumenext
whatpath=request.form("path")
ifwhatpath""then
ShowDriveInfo(whatpath)
endif%>
<formaction="drvinfo.asp"method="post">
<inputname="path">
<inputtype="submit">
</form>

复制代码

个中的drv.TotalSize和drv.FreeSpace前往的是字节数，我们能够用FormatNumber()函数处置下。好比FormatNumber(Drive.TotalSize/1024,0)失掉一眼就知磁盘几G的值。　　另有一个文件范例：drv.DriveType最多的时分是显现数值“2”，实在“2”就暗示的“硬盘驱动器”，“1”暗示“软盘驱动器”，“4”暗示“光盘驱动器”……　　上面就用一个程序遍历显现本人呆板上一切驱动器的信息。　　4，showall.asp

<%
Functiontran(Driver)
SelectCaseDriver
Case0:tran="设备没法辨认"
Case1:tran="软盘驱动器"
Case2:tran="硬盘驱动器"
Case3:tran="收集硬盘驱动器"
Case4:tran="光盘驱动器"
Case5:tran="RAM假造磁盘"
EndSelect
EndFunction
setfso=Server.CreateObject("Scripting.FileSystemObject")
%><tableborder=1width="100%">
<tr>
<td>盘符</td>
<td>范例</td>
<td>卷标</td>
<td>总计巨细</td>
<td>可用空间</td>
<td>文件体系</td>
<td>序列号</td>
<td>是不是可用</td>
<td>路径</td>
</tr>
<%
onerrorresumenext
Foreachdrvinfso.Drives
Response.Write"<tr>"
Response.Write"<td>"&drv.DriveLetter&"</td>"
Response.write"<td>"&tran(drv.DriveType)&"</td>"
Response.write"<td>"&drv.VolumeName&"</td>"
Response.write"<td>"&FormatNumber(drv.TotalSize/1024,0)&"</td>"
Response.write"<td>"&FormatNumber(drv.Availablespace/1024,0)&"</td>"
Response.write"<td>"&drv.FileSystem&"</td>"
Response.write"<td>"&drv.SerialNumber&"</td>"
Response.write"<td>"&drv.IsReady&"</td>"
Response.write"<td>"&drv.Path&"</td>"
Response.Write"</tr>"
Next
setfs=nothing
%>
</table>

复制代码

演示　　恩，是否是很神情？那你能够对本人的呆板调试，然后上传到本人的空间往调试，你会发明服务商会你举行了些设置：）
　　固然更神的还在前面面，好比对文件夹，对文件的操纵（包含增加、修正和删除）。　　ps:你对驱动器是不克不及容易增加删除的：）
SQLServer是基于服务器端的中型的数据库，可以适合大容量数据的应用，在功能上管理上也要比Access要强得多。在处理海量数据的效率，后台开发的灵活性，可扩展性等方面强大。

作者: 只想知道 时间: 2015-1-18 21:28
以上是语言本身的弱点，在功能方面ASP同样存在问题，第一是功能太弱，一些底层操作只能通过组件来完成，在这点上是远远比不上PHP/JSP，其次就是缺乏完善的纠错/调试功能，这点上ASP/PHP/JSP差不多。

作者: 灵魂腐蚀 时间: 2015-1-23 18:40
我们必须明确一个大方向，不要只是停留在因为学而去学,我们应有方向应有目标.

作者: 飘飘悠悠 时间: 2015-1-31 19:07
以HTML语言整合(HTML负责界面上，ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。

作者: 再见西城 时间: 2015-2-6 21:20
先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习

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

作者: 小妖女 时间: 2015-3-6 09:28
以HTML语言整合(HTML负责界面上，ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。

作者: 仓酷云 时间: 2015-3-12 23:43
跟学别的语言一样，先掌握变量，流程控制语句(就是ifwhileselect)等，函数/过程，数组

作者: 第二个灵魂 时间: 2015-3-20 05:49
不能只是将它停留在纸上谈兵的程度上。

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