scripting_classic shell scripting - CSDN
精华内容
参与话题
  • FileSystemObject详解

    万次阅读 2011-09-09 10:21:55
    Scripting.FileSystemObject 的缩写,为 IIS 内置组件,用于操作磁盘、文件夹或文本文件。FSO 的对象、方法和属性非常的多,这里用示例的方式列出常用的,注意:《VBScript 语言参考》或《JScri
     
    

    FSOFileSystemObject Scripting.FileSystemObject 的缩写,为 IIS 内置组件,用于操作磁盘、文件夹或文本文件。FSO 的对象、方法和属性非常的多,这里用示例的方式列出常用的,注意:《VBScript 语言参考》或《JScript 语言参考》中的:《FileSystemObject 用户指南》和《Scripting 运行时库参考》便是微软给出的 FileSystemObject 完整参考。

    FSO 不能操作二进制文件,要操作二进制文件,使用:ADODB.Stream

    创建文件
    set fso = server.CreateObject("Scripting.FileSystemObject")
    set f = fso.CreateTextFile("C:\test.txt", true) '第二个参数表示目标文件存在时是否覆盖
    f.Write("写入内容")
    f.WriteLine("写入内容并换行")
    f.WriteBlankLines(3) '写入三个空白行(相当于在文本编辑器中按三次回车)
    f.Close()
    set f = nothing
    set fso = nothing

    打开并读文件
    set fso = server.CreateObject("Scripting.FileSystemObject")
    set f = fso.OpenTextFile("C:\test.txt", 1, false) '第二个参数 1 表示只读打开,第三个参数表示目标文件不存在时是否创建
    f.Skip(3) '将当前位置向后移三个字符
    f.SkipLine() '将当前位置移动到下一行的第一个字符,注意:无参数
    response.Write f.Read(3) '从当前位置向后读取三个字符,并将当前位置向后移三个字符
    response.Write f.ReadLine() '从当前位置向后读取直到遇到换行符(不读取换行符),并将当前位置移动到下一行的第一个字符,注意:无参数
    response.Write f.ReadAll() '从当前位置向后读取,直到文件结束,并将当前位置移动到文件的最后
    if f.atEndOfLine then
       response.Write("一行的结尾!")
    end if
    if f.atEndOfStream then
        response.Write("文件的结尾!")
    end if
    f.Close()
    set f = nothing
    set fso = nothing

    打开并写文件
    set fso = server.CreateObject("Scripting.FileSystemObject")
    set f = fso.OpenTextFile("C:\test.txt", 2, false) '第二个参数 2 表示重写,如果是 8 表示追加
    f.Write("写入内容")
    f.WriteLine("写入内容并换行")
    f.WriteBlankLines(3) '写入三个空白行(相当于在文本编辑器中按三次回车)
    f.Close()
    set f = nothing
    set fso = nothing

    判断文件是否存在
    set fso = server.CreateObject("Scripting.FileSystemObject")
    if fso.FileExists("C:\test.txt") then
        response.Write("目标文件存在")
    else
        response.Write("目标文件不存在")
    end if
    set fso = nothing

    移动文件
    set fso = server.CreateObject("Scripting.FileSystemObject")
    call fso.MoveFile("C:\test.txt", "D:\test111.txt") '两个参数的文件名部分可以不同
    set fso = nothing

    复制文件
    set fso = server.CreateObject("Scripting.FileSystemObject")
    call fso.CopyFile("C:\test.txt", "D:\test111.txt") '两个参数的文件名部分可以不同
    set fso = nothing

    删除文件
    set fso = server.CreateObject("Scripting.FileSystemObject")
    fso.DeleteFile("C:\test.txt")
    set fso = nothing

    创建文件夹
    set fso = server.CreateObject("Scripting.FileSystemObject")
    fso.CreateFolder("C:\test") '目标文件夹的父文件夹必须存在
    set fso = nothing

    判断文件夹是否存在
    set fso = server.CreateObject("Scripting.FileSystemObject")
    if fso.FolderExists("C:\Windows") then
        response.Write("目标文件夹存在")
    else
        response.Write("目标文件夹不存在")
    end if
    set fso = nothing

    删除文件夹
    set fso = server.CreateObject("Scripting.FileSystemObject")
    fso.DeleteFolder("C:\test") '文件夹不必为空
    set fso = nothing

    检测驱动器C盘是否存在
    Set fso = Server.CreateObject("Scripting.FileSystemObject")
    fso.DriveExists("c:")

    获取文件路径的驱动器名
    Set fso=Server.CreateObject("Scripting.FileSystemObject")
    p=fso.GetDriveName(Server.MapPath("aqa33"))
    Response.Write("驱动器名称是:" & p)
    set fs=nothing

    取得某个指定的路径的父文件夹的名称
    Set fso=Server.CreateObject("Scripting.FileSystemObject")
    p=fso.GetParentFolderName(Server.MapPath("aqa331.asp"))
    Response.Write("父文件夹名称是:" & p)
    set fs=nothing

    取得指定路径中的最后一个成分的文件扩展名
    Set fs=Server.CreateObject("Scripting.FileSystemObject")
    Response.Write(fs.GetExtensionName(Server.MapPath("aqa33.asxd")))
    set fs=nothing

    取得指定路径中的最后一个成分的文件名
    Set fs=Server.CreateObject("Scripting.FileSystemObject")
    Response.Write(fs.GetFileName(Server.MapPath("aqa33.asxd")))
    set fs=nothing

    返回在指定的路径中文件或者文件夹的基本名称

    Set fso=Server.CreateObject("Scripting.FileSystemObject")
    Response.Write(fso.GetBaseName("c:\windows\cursors\abc.cur"))
    Response.Write("<br />")
    Response.Write(fso.GetBaseName("c:\windows\cursors\"))
    Response.Write("<br />")
    Response.Write(fso.GetBaseName("c:\windows\"))
    set fso=nothing

    展开全文
  • Scripting

    2014-07-11 16:13:30
    The scripting module allows to use scripts in order to evaluate customexpressions. For example, scripts can be used to return "script fields"as part of a search request, or can be used to evaluate a c

    The scripting module allows to use scripts in order to evaluate customexpressions. For example, scripts can be used to return "script fields"as part of a search request, or can be used to evaluate a custom scorefor a query and so on.

    The scripting module uses by default mvel asthe scripting language with some extensions. mvel is used since it isextremely fast and very simple to use, and in most cases, simpleexpressions are needed (for example, mathematical equations).

    Additional lang plugins are provided to allow to execute scripts indifferent languages. Currently supported plugins are lang-javascriptfor JavaScript, lang-groovy for Groovy, and lang-python for Python.All places where a script parameter can be used, a lang parameter(on the same level) can be provided to define the language of thescript. The lang options are mvel, js, groovy, python, andnative.

    Note

    Added in 1.2.0.

    Dynamic scripting is disabled by default since version 1.2.0.

    To increase security, Elasticsearch does not allow you to specify scripts with arequest. Instead, scripts must be placed in the scripts directory inside theconfiguration directory (the directory where elasticsearch.yml is). Scriptsplaced into this directory will automatically be picked up and be available tobe used. Once a script has been placed in this directory, it can be referencedby name. For example, a script called calculate-score.mvel can be referencedin a request like this:

    $ tree config
    config
    ├── elasticsearch.yml
    ├── logging.yml
    └── scripts
        └── calculate-score.mvel
    $ cat config/scripts/calculate-score.mvel
    Math.log(_score * 2) + my_modifier
    curl -XPOST localhost:9200/_search -d '{
      "query": {
        "function_score": {
          "query": {
            "match": {
              "body": "foo"
            }
          },
          "functions": [
            {
              "script_score": {
                "script": "calculate-score",
                "params": {
                  "my_modifier": 8
                }
              }
            }
          ]
        }
      }
    }'

    The name of the script is derived from the hierarchy of directories itexists under, and the file name without the lang extension. For example,a script placed under config/scripts/group1/group2/test.py will benamed group1_group2_test.

    Default Scripting Languageedit

    The default scripting language (assuming no lang parameter isprovided) is mvel. In order to change it set the script.default_langto the appropriate language.

    Enabling dynamic scriptingedit

    We recommend running Elasticsearch behind an application or proxy,which protects Elasticsearch from the outside world. If users areallowed to run dynamic scripts (even in a search request), then theyhave the same access to your box as the user that Elasticsearch isrunning as. For this reason dynamic scripting is disabled by default.

    First, you should not run Elasticsearch as the root user, as this would allowa script to access or do anything on your server, without limitations. Second,you should not expose Elasticsearch directly to users, but instead have a proxyapplication inbetween. If you do intend to expose Elasticsearch directly toyour users, then you have to decide whether you trust them enough to run scriptson your box or not. If you do, you can enable dynamic scripting by adding thefollowing setting to the config/elasticsearch.yml file on every node:

    script.disable_dynamic: false

    While this still allows execution of named scripts provided in the config, ornative Java scripts registered through plugins, it also allows users to runarbitrary scripts via the API. Instead of sending the name of the file as thescript, the body of the script can be sent instead.

    Automatic Script Reloadingedit

    The config/scripts directory is scanned periodically for changes.New and changed scripts are reloaded and deleted script are removedfrom preloaded scripts cache. The reload frequency can be specifiedusing watcher.interval setting, which defaults to 60s.To disable script reloading completely set script.auto_reload_enabledto false.

    Native (Java) Scriptsedit

    Even though mvel is pretty fast, this allows to register native Java basedscripts for faster execution.

    In order to allow for scripts, the NativeScriptFactory needs to beimplemented that constructs the script that will be executed. There aretwo main types, one that extends AbstractExecutableScript and one thatextends AbstractSearchScript (probably the one most users will extend,with additional helper classes in AbstractLongSearchScript,AbstractDoubleSearchScript, and AbstractFloatSearchScript).

    Registering them can either be done by settings, for example:script.native.my.type set to sample.MyNativeScriptFactory willregister a script named my. Another option is in a plugin, accessScriptModule and call registerScript on it.

    Executing the script is done by specifying the lang as native, andthe name of the script as the script.

    Note, the scripts need to be in the classpath of elasticsearch. Onesimple way to do it is to create a directory under plugins (choose adescriptive name), and place the jar / classes files there, they will beautomatically loaded.

    Scoreedit

    In all scripts that can be used in facets, allow to access the currentdoc score using doc.score.

    Computing scores based on terms in scriptsedit

    see advanced scripting documentation

    Document Fieldsedit

    Most scripting revolve around the use of specific document fields data.The doc['field_name'] can be used to access specific field data withina document (the document in question is usually derived by the contextthe script is used). Document fields are very fast to access since theyend up being loaded into memory (all the relevant field values/tokensare loaded to memory).

    The following data can be extracted from a field:

    Expression Description

    doc['field_name'].value

    The native value of the field. For example,if its a short type, it will be short.

    doc['field_name'].values

    The native array values of the field. Forexample, if its a short type, it will be short[]. Remember, a field canhave several values within a single doc. Returns an empty array if thefield has no values.

    doc['field_name'].empty

    A boolean indicating if the field has novalues within the doc.

    doc['field_name'].multiValued

    A boolean indicating that the fieldhas several values within the corpus.

    doc['field_name'].lat

    The latitude of a geo point type.

    doc['field_name'].lon

    The longitude of a geo point type.

    doc['field_name'].lats

    The latitudes of a geo point type.

    doc['field_name'].lons

    The longitudes of a geo point type.

    doc['field_name'].distance(lat, lon)

    The plane distance (in meters)of this geo point field from the provided lat/lon.

    doc['field_name'].distanceWithDefault(lat, lon, default)

    The plane distance (in meters)of this geo point field from the provided lat/lon with a default value.

    doc['field_name'].distanceInMiles(lat, lon)

    The plane distance (inmiles) of this geo point field from the provided lat/lon.

    doc['field_name'].distanceInMilesWithDefault(lat, lon, default)

    The plane distance (inmiles) of this geo point field from the provided lat/lon with a default value.

    doc['field_name'].distanceInKm(lat, lon)

    The plane distance (inkm) of this geo point field from the provided lat/lon.

    doc['field_name'].distanceInKmWithDefault(lat, lon, default)

    The plane distance (inkm) of this geo point field from the provided lat/lon with a default value.

    doc['field_name'].arcDistance(lat, lon)

    The arc distance (inmeters) of this geo point field from the provided lat/lon.

    doc['field_name'].arcDistanceWithDefault(lat, lon, default)

    The arc distance (inmeters) of this geo point field from the provided lat/lon with a default value.

    doc['field_name'].arcDistanceInMiles(lat, lon)

    The arc distance (inmiles) of this geo point field from the provided lat/lon.

    doc['field_name'].arcDistanceInMilesWithDefault(lat, lon, default)

    The arc distance (inmiles) of this geo point field from the provided lat/lon with a default value.

    doc['field_name'].arcDistanceInKm(lat, lon)

    The arc distance (inkm) of this geo point field from the provided lat/lon.

    doc['field_name'].arcDistanceInKmWithDefault(lat, lon, default)

    The arc distance (inkm) of this geo point field from the provided lat/lon with a default value.

    doc['field_name'].factorDistance(lat, lon)

    The distance factor of this geo point field from the provided lat/lon.

    doc['field_name'].factorDistance(lat, lon, default)

    The distance factor of this geo point field from the provided lat/lon with a default value.

    doc['field_name'].geohashDistance(geohash)

    The arc distance (in meters)of this geo point field from the provided geohash.

    doc['field_name'].geohashDistanceInKm(geohash)

    The arc distance (in km)of this geo point field from the provided geohash.

    doc['field_name'].geohashDistanceInMiles(geohash)

    The arc distance (inmiles) of this geo point field from the provided geohash.

    Stored Fieldsedit

    Stored fields can also be accessed when executing a script. Note, theyare much slower to access compared with document fields, as they are notloaded into memory. They can be simply accessed using_fields['my_field_name'].value or _fields['my_field_name'].values.

    Source Fieldedit

    The source field can also be accessed when executing a script. Thesource field is loaded per doc, parsed, and then provided to the scriptfor evaluation. The _source forms the context under which the sourcefield can be accessed, for example _source.obj2.obj1.field3.

    Accessing _source is much slower compared to using _docbut the data is not loaded into memory. For a single field access _fields may befaster than using _source due to the extra overhead of potentially parsing large documents.However, _source may be faster if you access multiple fields or if the source has already beenloaded for other purposes.

    mvel Built In Functionsedit

    There are several built in functions that can be used within scripts.They include:

    Function Description

    time()

    The current time in milliseconds.

    sin(a)

    Returns the trigonometric sine of an angle.

    cos(a)

    Returns the trigonometric cosine of an angle.

    tan(a)

    Returns the trigonometric tangent of an angle.

    asin(a)

    Returns the arc sine of a value.

    acos(a)

    Returns the arc cosine of a value.

    atan(a)

    Returns the arc tangent of a value.

    toRadians(angdeg)

    Converts an angle measured in degrees to anapproximately equivalent angle measured in radians

    toDegrees(angrad)

    Converts an angle measured in radians to anapproximately equivalent angle measured in degrees.

    exp(a)

    Returns Euler’s number e raised to the power of value.

    log(a)

    Returns the natural logarithm (base e) of a value.

    log10(a)

    Returns the base 10 logarithm of a value.

    sqrt(a)

    Returns the correctly rounded positive square root of avalue.

    cbrt(a)

    Returns the cube root of a double value.

    IEEEremainder(f1, f2)

    Computes the remainder operation on twoarguments as prescribed by the IEEE 754 standard.

    ceil(a)

    Returns the smallest (closest to negative infinity) valuethat is greater than or equal to the argument and is equal to amathematical integer.

    floor(a)

    Returns the largest (closest to positive infinity) valuethat is less than or equal to the argument and is equal to amathematical integer.

    rint(a)

    Returns the value that is closest in value to the argumentand is equal to a mathematical integer.

    atan2(y, x)

    Returns the angle theta from the conversion ofrectangular coordinates (x, y) to polar coordinates (r,theta).

    pow(a, b)

    Returns the value of the first argument raised to thepower of the second argument.

    round(a)

    Returns the closest int to the argument.

    random()

    Returns a random double value.

    abs(a)

    Returns the absolute value of a value.

    max(a, b)

    Returns the greater of two values.

    min(a, b)

    Returns the smaller of two values.

    ulp(d)

    Returns the size of an ulp of the argument.

    signum(d)

    Returns the signum function of the argument.

    sinh(x)

    Returns the hyperbolic sine of a value.

    cosh(x)

    Returns the hyperbolic cosine of a value.

    tanh(x)

    Returns the hyperbolic tangent of a value.

    hypot(x, y)

    Returns sqrt(x2 + y2) without intermediate overflowor underflow.

    Arithmetic precision in MVELedit

    When dividing two numbers using MVEL based scripts, the engine tries tobe smart and adheres to the default behaviour of java. This means if youdivide two integers (you might have configured the fields as integer inthe mapping), the result will also be an integer. This means, if acalculation like 1/num is happening in your scripts and num is aninteger with the value of 8, the result is 0 even though you wereexpecting it to be 0.125. You may need to enforce precision byexplicitly using a double like 1.0/num in order to get the expectedresult.

    展开全文
  • Scripting.FileSystemObject控件的用法

    万次阅读 2015-07-22 11:05:29
    文件系统对象FSO的英文全称是File System Object ,这种对象模型提出了有别于传统的文件操作语句处理文件和文件夹的方法。...在jsp中,Scripting.FileSystemObject 控件调用可以直接在js中使用这个控件 var f

    文件系统对象FSO的英文全称是File System Object ,这种对象模型提出了有别于传统的文件操作语句处理文件和文件夹的方法。通过采用object.method这种在面向对象编程中广泛使用的语法,将一系列操作文件和文件夹的动作通过调用对象本身的属性直接实现。

    在jsp中,Scripting.FileSystemObject 控件调用可以直接在js中使用这个控件


    var fso = new ActiveXObject("Scripting.FileSystemObject");   


    if (fso.FileExists(filename)){   

    return true;   
    }else{   

    return false;   

    }   



    Scripting.FileSystemObject对象的详细技巧指南

    FileSystemObject对象提供对计算机文件系统的访问:

    powered by 25175.net

    在代码内操作文本文件、文件夹及驱动器。它是脚本运行期库提供的对象之一,对于服务器ASP页面内的VBScript和JScript都有效。如果页面的扩展名为.hta(表示它们是HTA的一部分),它也可用在客户端的IE 5中。本节仅讨论在服务器上的ASP脚本如何使用FileSystemObject对象。
           超级文本应用程序(HTA)由指定的“受信任的”页面组成,在页面的<HEAD>段里包含<HTA: APPLICATION>元素。例如:
        <HTA:APPLICATION ID=”objMyApp” APPLICATIONNAME=”myApp”>
    这些页面可以使用客户端脚本引擎中的一些不常用特性,这些特性中有FileSystemObject对象和TextStream对象。关于超级文本应用程序的更多信息,请访问Microsoft Workshop网站。
    可以使用下面的程序创建一个FileSystemObject对象实例:
    ‘ In VBScript:
    Dim objMyFSO
    Set objMyFSO = Server.CreateObject(“Scripting.FileSystemObject”)

    // In JScript:
    var objMyFSO = Server.CreateObject(‘Scripting.FileSystemObject’);

    <!-- Server-side with an OBJECT element -->
    <OBJECT RUNAT=”SERVER” SCOPE=”PAGE” ID=”objFSO”
                  PROGID=”Scripting.FileSystemObject”>
    </OBJECT>
    在ASP页面里,增加一个对于FileSystemObject类型库的引用是非常有用的。这允许使用它直接定义的内置常数,不用像过去那样用数字等效表达式代替。整个脚本运行期库的类型库可以增加到任何ASP页面中,代码如下:
    <!-- METADATA TYPE=”typelib” FILE=”C:WinNTSystem32scrrun.dll” -->如果你是在另一个目录下安装Windows,必须编辑FILE的属性值。
    5.4.1 FileSystemObject对象成员概要
           FileSystemObject对象提供一个属性和一系列方法,可用它们来操纵FileSystemObject对象实现的一些从属对象。这里提供了全部的内容概要,然后介绍每一个从属对象。
    1.  FileSystemObject的属性
    FileSystemObject对象只有一个属性,它用于得到当前机器上的所有有效驱动器的列表,如表5-4所示:
    表5-4  FileSystemObject对象的属性及说明
    属 性 
    说 明 

    Drivers 
    返回本地计算机可用的驱动器列表。 

    2.  FileSystemObject的方法
    FileSystemObject对象提供了使用从属对象的一系列方法,从属对象包括Drive、Folder和File等对象。它也实现了用于TextStream对象的两个方法:CreateTextFile和OpenTextFile。根据所使用的对象的类型,将方法划分为三类。
    (1)    与驱动器有关的方法
    与驱动器有关的方法如表5-5所示:
    表5-5 与驱动器有关的方法及说明
    方 法 
    说 明 

    DriveExists(drivespec) 
    如果在drivespec中指定的驱动器存在,则返回True,否则返回False。drivespec参数可以是一个驱动器字母,或者是文件、文件夹的完整绝对路径 

    GetDrive(drivespec) 
    返回drivespec指定的驱动器所对应的Drive对象。drivespec可以包含冒号、路径分隔符或者是网络共享名,即:“C”、“C:”、“C:”及“\machinesharename” 

    GetDriveName(drivespec) 
    用字符串返回drivespec指定的驱动器的名称。drivespec参数必须是文件或文件夹的绝对路径,或者仅仅是驱动器字母,例如:“c:”或“c” 

    (2)    与文件夹有关的方法
    与文件夹有关的方法如表5-6所示:
    表5-6  与文件夹有关的方法及说明
    方 法 
    说 明 

    BuildPath(path,name) 
    在已有的路径path上增添名字为name的文件或文件夹,如果需要,则增添路径分隔符’’ 

    CopyFolder(source,destination,overwrite) 
    从指定的源文件夹source(可以包含通配符)中复制一个或多个文件夹到指定的目标文件夹destination,包含了源文件夹中的所有文件。如果source包含通配符或destination末尾是路径分隔符(‘’),那么认为destination是要放置源文件夹的拷贝的文件夹。否则的话,认为destination是要创建的新文件夹的路径名。如果destination文件夹已经存在且overwrite参数设置为False,将产生错误,缺省的overwrite参数是True 

    CreateFolder(foldername) 
    创建一个路径名为foldername的文件夹。如果foldername已经存在将产生错误 

    DeleteFolder(folderspec,force) 
    删除由folderspec指定的一个或多个文件夹(可以在路径的最后部分包含通过配符)及文件夹中的所有内容。如果可选的force参数设置为true,那么即使文件夹包含的文件具有只读属性,也将删除该文件夹。缺省的force参数是False 

    FolderExist(folderspec) 
    如果folderspec指定的文件夹存在则返回True,否则返回False。folderspec参数可以包含文件夹的绝对或相对路径,或者仅仅是当前文件夹中看到的文件夹名 

    GetAbsolutePathName(pathspec) 
    返回明确指定文件夹的路径,其中要考虑到当前文件夹的路径。例如,如果当前文件夹是“c:docssales”,而pathspec是“jan”,返回的字符是“c:docssalesjan”。通配符、”..”和”\”路径操作符都是可以接受的 

    GetFolder(folderspec) 
    返回folderspec指定的文件夹对应的Folder对象。folderspec可以是文件夹的相对的或绝对的路径 

    GetParentFolderName(pathspec) 
    返回pathspec文件或文件夹的上一级文件夹。不检验该文件夹是否存在 

    GetSpecialfolder(folderspec) 
    返回一个特定的Windows文件夹相对应的Folder对象。参数folderspec的允许值是WindowsFolder(0)、SystemFolder(1)和TemporaryFolder(2) 

    MoveFolder(source,destination) 
    将source指定的一个或多个文件夹移动到destination指定的文件夹。在source里可以包含通配符,但在destination中不行。如果source包含通配符或destination末尾是路径分隔符(‘’),则认为destination是要放置源文件夹的文件夹,否则认为它是一个新文件夹的完整路径和名字。如果目的文件夹destination已经存在则产生错误 

    (3)    与文件有关的方法
    与文件有关的方法如表5-7所示:
    方 法 
    说 明 

    CopyFile(source,destination,
    overwrite) 
    将source(可包含通配符)指定的一个或多个文件复制到指定的目标文件夹destination。如果source包含通配符或destination末尾是路径分隔符(‘’),那么认为destination是文件夹。否则认为destination为一新文件的完全路径和名称。如果目标文件夹已经存在且overwrite参数设置为False,将产生错误。缺省的overwrite参数是True 

    CreateTextFile(filename,overwrite,
    unicode) 
    用指定的文件名filename在磁盘上创建一个新的文本文件,并返回与其对应的TextStream对象,如果可选的overwrite参数设置为True,则覆盖同一路径下已有的同名文件。缺省的overwrite参数是False。如果可选的unicode参数设置为True,则该文件的内容将存储为Unicode文本,缺省的unicode参数是False 

    DeleFile(filespec,force) 
    删除由filespec指定的一个或多个文件(可以在路径的最后部分包含通配符)。如果可选的force参数设置为true,那么也删除具有只读属性的文件。缺省的force参数是False 

    FileExists(filespec) 
    如果filespec指定的文件存在则返回True,否则返回False。filespec参数可以包含文件的绝对路径或相对路径,或者是当前文件夹中的文件名 

    GetBaseName(filespec) 
    返回filespec指定的文件的名称,即包含文件路径但去掉了文件的扩展名 

    GetExtensionName(filespec) 
    返回filespec指定的文件的扩展名 

    GetFile(filespec) 
    返回filespec指定的文件所对应的File对象。可以指定文件的相对或绝对路径 

    GetFileName(pathspec) 
    返回pathspec指定的文件的路径或文件名,如果没有文件名就返回最后的文件夹名。不检查该文件或文件夹是否存在 

    GetTempName() 
    返回一个随机产生的文件名,用于完成运算所需的临时文件或文件夹 

    MoveFile(source,destination) 
    将source指定的一个或多个源文件移动到destination指定的目的文件夹。在source里可以包含通配符,但destination不行。如果source包含通过配符或destination末尾是路径分隔符(‘’),那么认为destination是一文件夹。否则,认为destination是一新文件夹的完整路径和名称。如果目的文件夹已经存在则产生错误 

    OpenTextFile(filename,iomode,create,
        format) 
    创建一个名叫做filename的文件,或打开一个现有的名为filename的文件,并且返回一个与其相关的TextStream对象。filename参数可以包含绝对或相对路径。iomode参数指定了所要求的访问类型。允许的数值是ForReading(1)(缺省)、ForWriting(2)、ForAppending(8)。当写入或追加到一个不存在的文件时,如果create参数设置为true,就将创建一个新文件。缺省的create参数是False。format参数说明对文件读或写的数据格式。允许数值是:TristatetFalse(0)(缺省),按照ASCII格式打开;TristatetTrue(-1),按照Unicode格式打开;TristateDefault(-2),用系统缺省格式打开 

           Unicode文件使用两个字节标识每个字符,取消了ASCII字符最多256个的限制。

    5.4.2 使用驱动器
           下面是使用FileSystemObject对象的简单例子,它使用DriveExists方法得到现有的驱动器字母的列表:
           ‘ In VBScript
           Set objFSO = Server.CreateObject(“Scripting.FileSystemObject”)
           For intCode = 65 To 90                ‘ANSI codes for ‘A’ to ‘Z’
                  strLetter = Chr(intCode)
                  If objFSO.DriveExists(strLetter) Then
                         Response.Write “Found drive “ & strLetter & “:<BR>”
                  End If
           Next
          

     

    1.  Folder对象
    Driver对象的RootFolder属性返回一个Folder对象,通过该对象可访问这个驱动器内的所有的内容。可以使用这个Folder对象的属性和方法遍历驱动器上的目录,并得到该文件夹和其他文件夹的属性。
    (1)    Folder对象的属性
    Folder对象提供一组属性,可用这些属性得到关于当前文件夹的更多信息,也可以改变该文件夹的名称。其属性及说明如表5-9所示:
    表5-9  Folder 对象的属性及说明
    属 性 
    说 明 

    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 
    如果可能,返回一个文件夹的说明字符串(例如,“Recycle Bin”) 

    (2)    Folder对象的方法
    Folder对象提供一组可用于复制、删除和移动当前文件夹的方法。这些方法的运行方式与FileSystemObject对象的CopyFolder、DeleFolder和MoveFolder方法相同,但这些方法不要求source参数,因为源文件就是这个文件夹。这些方法及说明如表5-10所示:
    表5-10  Folder对象的方法及说明
    方 法 
    说 明 

    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 

     

    file属性
    name      
    path      
    drive     
    size      
    type      
    Attributes
    DateCreated


    异常处理:

    使用JScript读写本地文件时,会使用Scripting.FileSystemObject控件。

    IE默认是不允许运行这类“未标记为安全执行脚本的ActiveX控件”的。

    因此执行下行代码时:

    fso = new ActiveXObject("Scripting.FileSystemObject");

    会抛出“Automation 服务器不能创建对象”的异常。

     

    解决方法是:

    IE -> Internet选项 -> 安全 -> 自定义级别 -> ActiveX控件和插件 -> 对未标记为可安全执行脚本的ActiveX控件初始化并执行脚本(不安全) -> 启用

     

    注意:

    启用此选项只可用于调试本地代码,在访问其它网站前一定记得改过来。

    否则恶意脚本将通过IE具有读、写、遍历你本地文件等的全部权限!!!




    其他文章:

    JS、ActiveXObject、Scripting.FileSystemObject 
    来源: 王洪庆的日志 

    Javascript之文件操作 (IE)

    一、功能实现核心:FileSystemObject 对象  
        要在javascript中实现文件操作功能,主要就是依靠FileSystemobject对象。 
    二、FileSystemObject编程  
    使用FileSystemObject 对象进行编程很简单,一般要经过如下的步骤: 创建FileSystemObject对象、应用相关方法、访问对象相关属性 。  
    (一)创建FileSystemObject对象  
    创建FileSystemObject对象的 
    代码只要1行:  
    var fso = new ActiveXObject("Scripting.FileSystemObject");  
    上述代码执行后,fso就成为一个FileSystemObject对象实例。  
    (二)应用相关方法  
    创建对象实例后,就可以使用对象的相关方法了。比如,使用CreateTextFile方法创建一个文本文件:  
    var fso = new ActiveXObject("Scripting.FileSystemObject");  
    var f1 = fso.createtextfile("c:\myjstest.txt",true");  
    (三)访问对象相关属性  
    要访问对象的相关属性,首先要建立指向对象的句柄,这就要通过get系列方法实现:GetDrive负责获取驱动器信息,GetFolder负责获取文件夹信息,GetFile负责获取文件信息。比如,指向下面的代码后,f1就成为指向文件c: est.txt的句柄:  
    var fso = new ActiveXObject("Scripting.FileSystemObject");  
    var f1 = fso.GetFile("c:\myjstest.txt");  
    然后,使用f1访问对象的相关属性。比如:  
    var fso = new ActiveXObject("Scripting.FileSystemObject");  
    var f1 = fso.GetFile("c:\myjstest.txt");  
    alert("File last modified: " + f1.DateLastModified);  
    执行上面最后一句后,将显示c:myjstest.txt的最后修改日期属性值。  
    但有一点请注意:对于使用create方法建立的对象,就不必再使用get方法获取对象句柄了,这时直接使用create方法建立的句柄名称就可以:  
    var fso = new ActiveXObject("Scripting.FileSystemObject");  
    var f1 = fso.createtextfile("c:\myjstest.txt",true");  
    alert("File last modified: " + f1.DateLastModified);  
    三、操作驱动器(Drives)  
    使用FileSystemObject对象来编程操作驱动器(Drives)和文件夹(Folders)很容易,这就象在Windows文件浏览器中对文件进行交互操作一样,比如:拷贝、移动文件夹,获取文件夹的属性。  
    (一)Drives对象属性  
    Drive对象负责收集系统中的物理或逻辑驱动器资源内容,它具有如下属性:  
    l TotalSize:以字节(byte)为单位计算的驱动器大小。  
    l AvailableSpace或FreeSpace:以字节(byte)为单位计算的驱动器可用空间。  
    l DriveLetter:驱动器字母。  
    l DriveType:驱动器类型,取值为:removable(移动介质)、fixed(固定介质)、network(网络资源)、CD-ROM或者RAM盘。  
    l SerialNumber:驱动器的系列码。  
    l FileSystem:所在驱动器的文件系统类型,取值为FAT、FAT32和NTFS。  
    l IsReady:驱动器是否可用。  
    l ShareName:共享名称。  
    l VolumeName:卷标名称。  
    l Path和RootFolder:驱动器的路径或者根目录名称。  
    (二)Drive对象操作例程  
    下面的例程显示驱动器C的卷标、总容量和可用空间等信息:  
    var fso, drv, s ="";  
    fso = new ActiveXObject("Scripting.FileSystemObject");  
    drv = fso.GetDrive(fso.GetDriveName("c:\"));  
    s += "Drive C:" + " - ";  
    s += drv.VolumeName + " ";  
    s += "Total Space: " + drv.TotalSize / 1024;  
    s += " Kb" + " ";  
    s += "Free Space: " + drv.FreeSpace / 1024;  
    s += " Kb" + " ";  
    alert(s);  
    四、操作文件夹(Folders)  
    涉及到文件夹的操作包括创建、移动、删除以及获取相关属性。  
    Folder对象操作例程 : 
    下面的例程将练习获取父文件夹名称、创建文件夹、删除文件夹、判断是否为根目录等操作:  
    var fso, fldr, s = "";  
    // 创建FileSystemObject对象实例  
    fso = new ActiveXObject("Scripting.FileSystemObject");  
    // 获取Drive 对象  
    fldr = fso.GetFolder("c:\");  
    // 显示父目录名称  
    alert("Parent folder name is: " + fldr + " ");  
    // 显示所在drive名称  
    alert("Contained on drive " + fldr.Drive + " ");  
    // 判断是否为根目录  
    if (fldr.IsRootFolder)  
    alert("This is the root folder.");  
    else  
    alert("This folder isn't a root folder.");  
    alert(" ");  
    // 创建新文件夹  
    fso.CreateFolder ("C:\Bogus");  
    alert("Created folder C:\Bogus" + " ");  
    // 显示文件夹基础名称,不包含路径名  
    alert("Basename = " + fso.GetBaseName("c:\bogus") + " ");  
    // 删除创建的文件夹  
    fso.DeleteFolder ("C:\Bogus");  
    alert("Deleted folder C:\Bogus" + " ");  
    五、操作文件(Files)  
    对文件进行的操作要比以上介绍的驱动器(Drive)和文件夹(Folder)操作复杂些,基本上分为以下两个类别:对文件的创建、拷贝、移动、删除操作和对文件内容的创建、添加、删除和读取操作。下面分别详细介绍。  
    (一)创建文件  
    一共有3种方法可用于创建一个空文本文件,这种文件有时候也叫做文本流(text stream)。  
    第一种是使用CreateTextFile方法。代码如下:  
    var fso, f1;  
    fso = new ActiveXObject("Scripting.FileSystemObject");  
    f1 = fso.CreateTextFile("c:\testfile.txt", true);  
    第二种是使用OpenTextFile方法,并添加上ForWriting属性,ForWriting的值为2。代码如下:  
    var fso, ts;  
    var ForWriting= 2;  
    fso = new ActiveXObject("Scripting.FileSystemObject");  
    ts = fso.OpenTextFile("c:\test.txt", ForWriting, true);  
    第三种是使用OpenAsTextStream方法,同样要设置好ForWriting属性。代码如下:  
    var fso, f1, ts;  
    var ForWriting = 2;  
    fso = new ActiveXObject("Scripting.FileSystemObject");  
    fso.CreateTextFile ("c:\test1.txt");  
    f1 = fso.GetFile("c:\test1.txt");  
    ts = f1.OpenAsTextStream(ForWriting, true);  
    (二)添加数据到文件  
    当文件被创建后,一般要按照“打开文件->填写数据->关闭文件”的步骤实现添加数据到文件的目的。  
    打开文件可使用FileSystemObject对象的OpenTextFile方法,或者使用File对象的OpenAsTextStream方法。  
    填写数据要使用到TextStream对象的Write、WriteLine或者WriteBlankLines方法。在同是实现写入数据的功能下,这3者的区别在于:Write方法不在写入数据末尾添加新换行符,WriteLine方法要在最后添加一个新换行符,而WriteBlankLines则增加一个或者多个空行。  
    关闭文件可使用TextStream对象的Close方法。  
    (三)创建文件及添加数据例程  
    下面的代码将创建文件、添加数据、关闭文件几个步骤结合起来进行应用:  
    var fso, tf;  
    fso = new ActiveXObject("Scripting.FileSystemObject");  
    // 创建新文件  
    tf = fso.CreateTextFile("c:\testfile.txt", true);  
    // 填写数据,并增加换行符  
    tf.WriteLine("Testing 1, 2, 3.") ;  
    // 增加3个空行  
    tf.WriteBlankLines(3) ;  
    // 填写一行,不带换行符  
    tf.Write ("This is a test.");  
    // 关闭文件  
    tf.Close();  
    (四)读取文件内容  
    从文本文件中读取数据要使用TextStream对象的Read、ReadLine或ReadAll 方法。Read方法用于读取文件中指定数量的字符; ReadLine方法读取一整行,但不包括换行符;ReadAll方法则读取文本文件的整个内容。读取的内容存放于字符串变量中,用于显示、分析。 
      
    方法或者属性 描述  
    BuildPath()  
    生成一个文件路径  
    CopyFile()  复制文件  
    CopyFolder() 复制目录  
    CreateFolder()  创建新目录  
    CreateTextFile()  生成一个文件  
    DeleteFile()  删除一个文件  
    DeleteFolder()  删除一个目录  
    DriveExists()  检验盘符是否存在  
    Drives 返回盘符的集合  
    FileExists()  检验文件是否存在  
    FolderExists 检验一个目录是否存在  
    GetAbsolutePathName()  取得一个文件的绝对路径  
    GetBaseName()  取得文件名  
    GetDrive()  取得盘符名  
    GetDriveName()  取得盘符名  
    GetExtensionName()  取得文件的后缀  
    GetFile()  生成文件对象  
    GetFileName()  取得文件名  
    GetFolder()  取得目录对象  
    GetParentFolderName 取得文件或目录的父目录名  
    GetSpecialFolder()  取得特殊的目录名  
    GetTempName()  生成一个临时文件对象  
    MoveFile()  移动文件  
    MoveFolder()  移动目录  
    OpenTextFile()  打开一个文件流 
    f.Files //目录下所有文件集合 
    f.attributes //文件属性 
      Case 0 Str="普通文件。没有设置任何属性。 " 
      Case 1 Str="只读文件。可读写。 " 
      Case 2 Str="隐藏文件。可读写。 " 
      Case 4 Str="系统文件。可读写。 " 
      Case 16 Str="文件夹或目录。只读。 " 
      Case 32 Str="上次备份后已更改的文件。可读写。 "  
      Case 1024 Str="链接或快捷方式。只读。 " 
      Case 2048 Str=" 压缩文件。只读。" 
    f.Datecreated // 创建时间 
    f.DateLastAccessed //上次访问时间 
    f.DateLastModified // 上次修改时间 
    f.Path //文件路径 
    f.Name //文件名称 
    f.Type //文件类型 
    f.Size // 文件大小(单位:字节) 
    f.ParentFolder //父目录 
    f.RootFolder // 根目录  
    实例说明 
    BuildPath(路径,文件名) //这个方法会对给定的路径加上文件,并自动加上分界符  
      
    CopyFile(源文件, 目标文件, 覆盖) //复制源文件到目标文件,当覆盖值为true时,如果目标文件存在会把文件覆盖  
      
    CopyFolder(对象目录,目标目录 ,覆盖) //复制对象目录到目标目录,当覆盖为true时,如果目标目录存在会把文件覆盖  
      
    CreateFolder(目录名) //创建一个新的目录  
      
    CreateTextFile(文件名, 覆盖) //创建一个新的文件,如果此文件已经存在,你需要把覆盖值定为true  
      
    DeleteFile(文件名, 只读?) //删除一个文件,如果文件的属性是只读的话,你需要把只读值设为true  
      
    DeleteFolder(文件名, 只读?)//删除一个目录,如果目录的属性是只读的话,你需要把只读值设为true  
      
    DriveExists(盘符) //检查一个盘是否存在,如果存在就返会真,不存在就返回.......  
      
    FileExists(文件名) //检查一个文件是否存在,如果存在就返会真,不存在就返回.......  
      
    FolderExists(目录名) //检查一个目录是否存在,如果存在就返会真,不存在就返回.......  
      
    GetAbsolutePathName(文件对象) //返回文件对象在系统的绝对路径  
      
    GetBaseName(文件对象) //返回文件对象的文件名  
      
    GetExtensionName(文件对象) //文件的后缀  
      
    GetParentFolderName(文件对象) //取得父级的目录名  
      
    GetSpecialFolder(目录代码) //取得系统中一些特别的目录的路径,目录代码有3个分别是 0:安装Window的目录 1:系统文件目录 2:临时文件目录  
      
    GetTempName() //生成一个随机的临时文件对象,会以rad带头后面跟着些随机数,就好象一些软件在安装时会生成*.tmp  
      
    MoveFile(源文件, 目标文件) //把源文件移到目标文件的位置  



    展开全文
  • Linux Shell Scripting Cookbook - Third Edition by Clif Flynt English | 29 May 2017 | ASIN: B01N80F75Z | 552 Pages | AZW3 | 1.36 MB Do amazing things with the shell About This Book Become an expert ...
  • vba Scripting.Dictionary

    千次阅读 2013-07-05 15:44:38
    一,定义     许多Microsoft的编程语言,如Visual Basic、VBScript和Jscript,都提供集合(collection)。可以把集合想象为数组,可以... VBScript和Jscript都提供类似的对象,通称Scripting.Dictionary对象...

     

    一,定义 

     

       许多Microsoft的编程语言,如Visual Basic、VBScript和Jscript,都提供集合(collection)。可以把集合想象为数组,可以使用其中内建的函数完成存储和操纵数据等基本任务。无须担心数据是在哪些行列,而是使用唯一的键进行访问。
      VBScript和Jscript都提供类似的对象,通称Scripting.Dictionary对象或Dictionary对象。它类似于二维数组,把键和相关条目的数据存放在一起。然而真正的面向对象的方法,不应直接访问数据条目,必须使用Dictionary对象支持的方法和属性来实现。

    1. Dictionary对象的成员概要
      当增加一个键/条目对时,如果该键已存在;或者删除一个键/条目对时,该关键字/条目对不存在,或改变已包含数据的Dictionary对象的CompareMode,都将产生错误。
      属性说明
      CompareMode (仅用于VBScript)设定或返回键的字符串比较模式
      Count 只读。返回Dictionary里的键/条目对的数量
      Item(key) 设定或返回指定的键的条目值
      Key(key) 设定键值

      方法说明
      Add(key,item) 增加键/条目对到Dictionary
      Exists(key) 如果指定的键存在,返回True,否则返回False
      Items() 返回一个包含Dictionary对象中所有条目的数组
      Keys() 返回一个包含Dictionary对象中所有键的数组
      Remove(key) 删除一个指定的键/条目对
      RemoveAll() 删除全部键/条目对

    2. 对Dictionary中增加和删除条目
      一旦得到一个新的(空的)Dictionary,可以对其添加条目,从中获取条目以及删除条目:
      ‘ In VBScript:
      objMyData.Add “MyKey”, “MyItem”
      objMyData.Add “YourKey”, ”YourItem”
      blnIsThere = objMyData.Exists(“MyKey”)
      strItem = objMyData.Item(“YourKey”)
      strItem = objMyData.Remove(“MyKey”)
      objMyData.RemoveAll

    3. 修改键或条目的值
      可以通过修改键的值,或通过修改与特定的键关联的条目的数据,来改变存储在Dictionary内的数据。下面的代码改变键为MyKey的条目中的数据。
      ObjMyData.Item(“MyKey”) = “NewValue” ‘ In VBScript
      ObjMyData.Item(‘MyKey’) = ‘NewValue’; // In JScript
      如果指定的键在Dictionary未找到,将在Dictionary中创建一个以MyKey为键,以New Value为其条目值的新的键/条目对。有意思的是,如果使用一个不存在的键来检索条目,不仅得到一个空的字符串(这是可以想到的),而且还在Dictionary里添加一个新的键/条目对,键即是指定的键,但条目的数据为空。
      可以使用Key属性仅改变键的值而不改变与之对应的条目的数据。将一个已存在的键MyKey改变为MyNewKey,可以用:
      objMyData.Key(“MyKey”) = “MyNewValue” ‘ In VBScript
      objMyData.Item(‘MyKey’) = ‘MyNewValue’; // In JScript
      如果指定的键未找到,则产生运行期错误。

    4. 设置比较模式
      Dictionary的CompareMode属性仅适用于VBScript,不能在JScript中使用。当比较字符串键时,允许指定比较的方式。两个允许的值为BinaryCompare(0)和TextCompare(1)。BinaryCompare(0)为二进制数对照(即区分大小写);TextCompare(1)为文本对照(即不区分大小写)。

    5. 遍历Dictionary
      研究Dictionary时,有两个方法和一个属性需要特别注意,它们允许我们遍历存储在Dictionary里的所有键/条目对。Items方法用一个一维数组的形式返回Dictionary里所有的条目数据,而keys方法用一个一维数组返回所有已存在的键值。可以使用Count属性得到键或条目的数量。
      例如,可以使用下列代码得到名称为objMyData的Dictionary中所有的键和条目值。注意,虽然Count属性保存了在Dictionary里的键/条目数量,但VBScript和JScript的数组总是从下标0开始的。因此,数组下标应从0到Count-1。
      ‘In VBScript:
      arrKeys = objMyData.Keys ‘Get all the keys into an array
      arrItems = objMyData.Items ‘Get all the items into an array

      For intLoop = 0 To objMyData.Count –1 ‘Iterate through the array
        StrThisKey = arrKeys(intLoop) ‘This is the key value
        StrThisItem = arrItems(intLoop) ‘This is the item (data) value
      Next

      // In JScript
      // Get VB-style arrays using the Keys() and Items() methods
      var arrKeys = new VBArray(objMyData.Keys()).toArray();
      var arrItems = new VBArray(objMyData.Items()).toArray();

      for (intLoop = 0; intLoop < objMyData.Count; intLoop++) {
        // Iterate through the arrays
        strThisKey = arrKeys[intLoop]; // This is the key value
        strThisItem = arrItems[intLoop]; // This is the item (data) value
      }
      在VBScript里也可以使用For Each … Next语句完成同样的功能:
      ‘ Iterate the dictionary as a collection in VBScript
      For Each objItem in arrItems
        Response.Write objItem & “ = “ & arrItems(objItem) & “<BR>”
      Next

    5.3.2 Dictionary对象示例
      本书提供了一系列示例文件可用来试验脚本运行时间库的各种属性。
      本章代码的缺省页面提供了一系列可使用的VBScript示例链接。有些示例对JScript同样有效。这些示例存放在Chapter05目录下相应的子目录里

      要查看Dictionary对象的运行,在菜单页面点击第一个链接,打开名叫show_dictionary.asp的页面。这个页面显示了我们提供的Dictionary对象的内容,允许试验其属性和方法。屏幕如图5-3所示:

      1. Dictionary的global.asa文件
      随Dictionary对象示例页面提供的文件之一是global.asa。它创建并预先填充了一个会话层作用域的Dictionary对象,因此其内容在页面请求之间不会丢失。一般说来(考虑到可扩展性),这不是一个理想的做法。在这个例子里,可以看到Dictionary的属性和方法的效果。
      如果在自己的服务器上下载并安装示例,必须创建一个基于此global.asa文件的虚拟应用程序。或者将其内容添加到缺省站点的根文件夹中的global.asa文件里。在第3章讲述了如何用向导创建虚拟应用程序。然而对于本示例,创建一个虚拟应用程序最简单的方法是在Chapter05示例文件夹内右击dictionary子文件夹,在Properties对话框的Home Directory选项卡里,点击Create按钮,如图5-4所示:

      在这个global.asa文件里,代码使用<OBJECT>元素创建一个会话层作用域的Scripting.Dictionary对象实例。然后在Session_onStart事件处理程序里将一系列值用Add方法放入Dictionary中,并将对Dictionary对象的引用指定给ASP会话变量MyDictionary:
    <OBJECT ID="objBookList" RUNAT="SERVER" SCOPE="SESSION" PROGID="Scripting.Dictionary"> </OBJECT>

    <SCRIPT LANGUAGE="VBScript" RUNAT="SERVER">

      Sub Session_onStart()
        objBookList.Add "2610", "Professional Active Server Pages 3.0"
        objBookList.Add "1274", "Instant JavaScript"
        objBookList.Add "2882", "Beginning ASP Components"
        objBookList.Add "1797", "Professional ASP Techniques"
        objBookList.Add "1835", "AD0 2.0 Programmer's Reference"
        Set Session("MyDictionary") = objBookList
      End Sub

    </SCRIPT>

    2. Dictionary示例页面
      在“Scripting.Dictionary Object”主页面里,首要的任务是得到一个会话层作用域的Dictionary对象实例的引用。注意,这个引用是一个对象变量,因此必须在VBScript里使用Set关键字。
      然后,检查一下是否得到了一个对象(这是个好习惯),如果没有正确地建立包含global.asa文件的虚拟应用程序,检查一下问题出在哪里。你将看到我们自己的消息代替了ASP的错误消息(但是注意,对于这一操作必须关闭缺省的错误处理)。
    <%

      on error resume next ' turn off error handling to test if object exists

      'retrieve Dictionary object from user's session
      Set objMyData = Session("MyDictionary")

      If IsObject(objMyData) Then 'found Dictionary object in Session

    %>

      <P><DIV CLASS="subhead">Iterating the Dictionary with Arrays</DIV>
    <%
      arrKeysArray = objMyData.Keys 'get all the keys into an array
      arrItemsArray = objMyData.Items 'get all the items into an array
      For intLoop = 0 To objMyData.Count - 1 'iterate through the array
        Response.Write "Key: <B>" & arrKeysArray(intLoop) & "</B> Value: <B>" _
                & arrItemsArray(intLoop)& "</B><BR>"
      Next
    %>

    … Other code and controls go here …

    <%
    Else

    'could not find Dictionary object in the session
    Response.Write "Dictionary object not available in global.asa for session"

    End If
    %>
    显示在页面上的Dictionary内容列表是使用Dictionary对象的Key和Items方法创建的两个数组,可使用前面的代码遍历它们。
    3. Dictionary页面控件
    在Dictionary的内容列表下是一系列的HTML控件,可用于设定Dictionary对象的某些属性和执行各种方法。这些控件全部在一个<FORM>内,其ACTION属性值是本页面,所以窗体的内容提交回本页面。在前面的章节的示例里使用了同样的技术。
    在<FORM>段中,改变属性或执行一个方法是通过一个按钮(没有标题)实现的。用于属性和方法的值放入按钮旁的文本框或列表框中。
    该页的第一个按钮用于设定Dictionary里的条目的Key属性。这里使用了一个下拉列表,可以选择一个已经存在的Key值。下面的代码创建了页面内该部分的控件。为了填充列表,使用了另外一个遍历Dictionary对象的技术,即For Each … Next语句。代码如下:

    <FORM ACTION="<% = Request.ServerVariables("SCRIPT_NAME") %>" METHOD="POST">

    <P><DIV CLASS="subhead">The Dictionary Properties</DIV>
    <INPUT TYPE="SUBMIT" NAME="cmdChangeKey" VALUE=" ">
    Dictionary.Key ("
    <SELECT NAME="lstChangeKey" SIZE="1">
    <%
    For Each objItem in objMyData
    Response.Write "<OPTION>" & objItem
    Next
    %>
    </SELECT> ") = "
    <INPUT TYPE="TEXT" NAME="txtChangeKey" SIZE="15" VALUE="New Key Name"> "
    <BR>

    … Other controls go here …

    </FORM>

    4. 使用Dictionary的属性和方法
    在“Scription.Dictionary Object”页面,点击用来检查并改变条目的Key属性的按钮,如图5-5所示:

    把窗体再次提交给页面。该页面包含一个脚本段,检查被点击的按钮的值。它通过在Resquest.Form集合里查找按钮的名字来断定单击的是哪个按钮。如果发现一个对应于cmdChangKey的值,则从列表中或文本框中得到相应的值并用来改变Key属性:

    'look for a command sent from the FORM section buttons
    If Len(Request.Form("cmdChangeKey")) Then
    strKeyName = Request.Form("lstChangeKey") 'Existing key from list box
    strNewKey = Request.Form("txtChangeKey") 'New key value from text box
    objMyData.Key(strKeyName) = strNewKey 'Set key property of this item
    End If

    页面重新载入后,在Dictionary的内容列表里能看到相应的结果,如图5-6所示:

    页面的其余代码用来设定一个条目的Item属性,或者执行Dictionary对象的方法。下面是这些操作的代码,每段代码与演示Key属性的代码非常类似。每次都将结果显示在Dictionary的内容列表中:

    If Len(Request.Form("cmdChangeItem")) Then
    strKeyName = Request.Form("lstChangeItem") 'Existing key from list box
    strNewValue = Request.Form("txtChangeItem") 'New item value from text box
    objMyData.Item(strKeyName) = strNewValue 'Set the Item property
    End If

    If Len(Request.Form("cmdAdd")) Then
    strKeyName = Request.Form("txtAddKey") 'New key value from text box
    strItemValue = Request.Form("txtAddItem") 'New item value from text box
    objMyData.Add strKeyName, strItemValue 'Execute the Add method
    End If

    If Len(Request.Form("cmdRemove")) Then
    strKeyName = Request.Form("lstRemove") 'Existion key from list box
    objMyData.Remove strKeyName 'Execute the Remove method
    End If

    If Len(Request.Form("cmdRemoveAll")) Then
    objMyData.RemoveAll 'Execute the RemoveAll method
    End If

    例如,如果现在点击Add方法的按钮,在Dictionary的内容列表里将增加一个新的条目,如图5-7所示:

    结果如图5-8所示:

    可以在这个页面中试验Dictionary对象的属性和方法,你将会发现什么因素及在什么环境下能引起Dictionary对象错误。例如,尝试用与已经存在的一个条目相同的键值增加一个条目,看看会出现什么结果。

     

     -------------------------------------------------------------------------------------------------------------------

     

    二,运用

    VBA中Dictionary对象使用小结

    Dim dict

    ' 创建Dictionary
    Set dict = CreateObject("Scripting.Dictionary")

    ' 增加项目
    dict.Add "A", 300
    dict.Add "B", 400
    dict.Add "C", 500

    ' 统计项目数
    n = dict.Count

    ' 删除项目
    dict.Remove ("A")

    ' 判断字典中是否包含关键字
    dict.exists ("B")

    ' 取关键字对应的值,注意在使用前需要判断是否存在key,否则dict中会多出一条记录
    Value = dict.Item("B")

    ' 修改关键字对应的值,如不存在则创建新的项目
    dict.Item("B") = 1000
    dict.Item("D") = 800

    ' 对字典进行循环

       Dim k() As Variant
       Dim v() As Variant
    k = dict.keys
    v = dict.Items
    For i = 0 To dict.Count - 1
    key = k(i)
    Value = v(i)
    MsgBox key & Value
    Next

    ' 删除所有项目

    dict.Removeall

    实例:

    Sub 宏1()

    Set dic = CreateObject("Scripting.Dictionary") '字典
    For i = 1 To 10000
    If Not i Like "*4*" Then
    dic.Add i, "" '如果不包含“1”
    End If
    Next
    Range("a2").Resize(dic.Count, 1) = Application.WorksheetFunction.Transpose(dic.keys) '从A2单元开始向下放置
    End Sub

     

     

     

    =========================================================================

    又 Tranpose工作表函数的用法实例

     

    '把一行多列的二维数组转换成一维数组

    Sub test()
    Dim arr, arrt
    arr = Range("a1:j1")
    arrt = WorksheetFunction.Transpose(WorksheetFunction.Transpose(arr))
    Stop
    End Sub

    首先看看TRANSPOSE函数的基础用法。官方帮助说明,TRANSPOSE函数可返回转置单元格区域,即将行单元格区域转置成列单元格区域,反之亦然。

      TRANSPOSE函数语法是:TRANSPOSE(array)

      Array参数是需要进行转置的数组或工作表上的单元格区域。所谓数组的转置就是,将数组的第一行作为新数组的第一列,数组的第二行作为新数组的第二列,以此类推。

     

     

     

     

     

     

     

     

    展开全文
  • Scripting.FileSystemObject 文件操作

    千次阅读 2011-08-12 10:53:00
    Scripting.FileSystemObject 方法或者属性 描述 BuildPath()  生成一个文件路径 CopyFile() 复制文件  CopyFolder()  复制目录 CreateFolder()
  • Beginning JavaScript with DOM Scripting and Ajax is an essential resource for modern JavaScript programming. This completely updated second edition covers everything you need to know to get up-to-...
  • Linux Command Line and Shell Scripting Bible is your essential Linux guide. With detailed instruction and abundant examples, this book teaches you how to bypass the graphical interface and communicate...
  • With more than 100 practical recipes, this book is a guide showcasing techniques to use the power of C++ scripting while developing games with UE4. It will start with adding and editing C++ classes ...
  • Scripting.FileSystemObject

    2019-07-17 10:25:30
    '创建文件夹 SubCreateAFolder(file) ...Setfso=CreateObject("Scripting.FileSystemObject") fso.CreateFolder(file) response.write"已经建立了"&file EndSub '删除文件夹 SubDele...
  • Linux Shell Scripting Cookbook(3rd) 英文mobi 第3版 本资源转载自网络,如有侵权,请联系上传者或csdn删除 查看此书详细信息请在美国亚马逊官网搜索此书
  • Cross-site Scripting (XSS)

    千次阅读 2014-03-26 14:25:11
    Cross-Site Scripting (XSS) attacks are a type of injection problem, in which malicious scripts are injected into the otherwise benign and trusted web sites. XSS attacks occur when an attacke
  • Scripting.Dictionary 详解

    万次阅读 2011-12-20 10:55:15
    许多Microsoft的编程语言,如Visual Basic、VBScript和Jscript,都提供集合(collection)。可以把集合想象为数组,可以... VBScript和Jscript都提供类似的对象,通称Scripting.Dictionary对象或Dictionary对象。它类
  •   Scripting.FileSystemObject 方法或者属性 描述 BuildPath() 生成一个文件路径 CopyFile() 复制文件 CopyFolder() 复制目录 CreateFolder() 创建新目录 ...
  • Scripting.FileSystemObject对象的详细技巧指南 FileSystemObject对象提供对计算机文件系统的访问: powered by 25175.net 在代码内操作文本文件、文件夹及驱动器。它是脚本运行期库提供的对象之一,对于...
  • API地址:... 平台定义 UNITY_EDITOR 编辑器调用。 ...UNITY_STANDALONE_OSX 专门为Mac OS(包括Universal,PPC和Intelarchitectures)平台的定义。...UNITY
  • 声明:本文仅供学习研究之用,对于本文提到的某些网站的XSS漏洞,请读者发扬高尚的人道主义精神不要去危害他人,同时希望相应的网站能够尽快修补XSS漏洞。 简介 XSS又叫CSS (Cross Site Script) ,跨站脚本...
  • Scripting.FileSystemObject详解

    千次阅读 2019-03-19 13:25:51
    FSO是FileSystemObject 或 Scripting.FileSystemObject 的缩写,为 IIS 内置组件,用于操作磁盘、文件夹或文本文件。FSO 的对象、方法和属性非常的多,这里用示例的方式列出常用的,注意:《VBScript 语言参考》或...
  • linux shell 脚本攻略 学习 shell script 脚本 经典 linux shell scripting cookbook
  • Scripting API Samples

    2019-01-11 00:52:09
     Scripting API Samples Tomáš Matoušek edited this page on Jan 31 · 32 revisions Pages 43 Home API Changes Building Testing and Debugging C# Interactive Walkthrough ...
1 2 3 4 5 ... 20
收藏数 73,802
精华内容 29,520
关键字:

scripting