一组FSO相关FUNCTION,常用代码也常有人问,重复问.docVIP

下载本文档

0
0
约8.6千字
约 3页
2018-02-28 发布于河南
举报
版权申诉

一组FSO相关FUNCTION,常用代码也常有人问,重复问.doc

1、本文档共3页，可阅读全部内容。
2、有哪些信誉好的足球投注网站（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击这里二次下载。
4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
5、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
6、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
7、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
8、VIP文档为合作方或网友上传，每下载1次，网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档

一组FSO相关FUNCTION,常用代码也常有人问,重复问

é?3y???t????gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt; ASPWizard Copyright ?1999-2001 gt;gt;gt;gt;gt;gt;gt;????|gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;[???????Generic File Deletion??????]gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;????|Author: Joaquim Jos?Prates Ferreira????|Date Created: 13/01/2001????|Last Update: 28/06/2001????|Dependencies:????|Description: This function will delete unwanted files from the server...????| V1.1: Added a new parameter [ intShowLabel ] 0 - Do not show label / 1 - Show label????| V1.0: This function only accepts one parameter at the moment, the path with the file,????|??below there are examples of how to call the function.????|e.g.????| Call Generic_FileDeletion(File path REQUIRED)????| Call Generic_FileDeletion(myfile.txt)????| Call Generic_FileDeletion(win95/myfile.txt)????|????|Please remember to specify a Path, otherwise an Error will occur...????Function Generic_FileDeletion(byval strpath,byval intShowLabel)???? ERROR CHECKING!!!!...????IF strpath = or isnull(strpath) then????Response.Write(Sorry but a path is required when calling this function)????Response.End????End IF???? ERROR CHECKING!!!!...????IF intShowLabel = or isnull(intShowLabel) then????Response.Write(Sorry but the paramter intShowLabel is missing. PARAMETER IS REQUIRED)????Response.End????End IF????Filename = Server.MapPath(strpath)????Set fs = CreateObject(Scripting.FileSystemObject)??????If fs.FileExists(filename) Then???????fs.DeleteFile(filename)???????if intShowLabel = 1 then????????response.write File ( ) has Been Deleted with Success.???????end if??????Else???????response.write No path was found, or file does not exist to delete...??????End If????End Function????%gt;????copy???t????gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt;gt; ASPWizard.co.uk Copyright ?1999-2001 gt;gt;gt;gt