Скачать 4.38 Mb.
|
Функция IsScalar IsScalar ( expr) Проверяет, является ли тип значения выражения expr скалярным типом. Возвращает True, если значение выражения expr равно или имеет тип: Empty, Integer, Long, Single, Double, Currency, Date/Time, String, OLE-ошибка, Boolean (True, False). Иначе (если значением выражения expr являются: массив, список, объект, значения Nothing или Null), функция возвращает значение False. Пример. Dim var As Variant- Print IsScalar(var) 'Выводит: True var = 1 Print. IsScalar (var) • 'Выводит: True var == "hello" Print IsScalar(var) 'Выводит: True Class SenClass ' ... объявление класса End Class ; Set var = New SenClass Print IsScalar(var) 'Выводит: False Dim senArray(l To 5) var - senArray Print IsScalar(var) 'Выводит: False Dim senList List var = senList .( Print IsScalar(var) 'Выводит: False Функция IsArray IsArray ( expr) Проверяет, является ли значение выражения expr массивом. Возвращает значение True, если значение выражения expr является массивом, в противном случае False. Пример. © InterTrust Co. Тел. (095) 9567928 Lotus Domino R. 5: @-формулы, LotusScript, встроенные классы LotusScript и Java 281 Dim arrayFixed(1 To 5) Dirr. arrayDynam ( ) Print IsArray(arrayFixed) ' Выводит: True Print IsArray(arrayDynam) ' Выводит: True Dim v As Variant. Print IsArray(v) ' Выводит: False v = arrayFixed Print IsArray(v) ' Выводит: True Функция IsList IsList ( expr) Проверяет, является ли значение выражения expr списком. Возвращает True, если значение выражения expr является списком. В противном случае возвращает False. Пример. Dim nryList List. Print IsList(myList) ' Выводит: True Dim v As Variant Print IsList(v) ' Выводит: False v - myList Print IsList(v) ' Выводит: True Функция ListTag ListTag ( refVar) Возвращает имя текущего элемента из списка, поэлементно обрабатываемого оператором ForAll. Параметр refVar - ссылка на переменную, определяющую в операторе ForAll. Функция применяется только внутри блока ForAll. Выдает ошибку, если значение refVar не является ссылкой на переменную, определенную в операторе ForAll. Пример. Печать имен элементов списка Loft. Dim loft. List As Integer loft%("first") = 0 loft.% ("second") = 1 loft%("third") =2 ForAll i In Loft% Print ListTag(i) End ForAll ' Выводит : '- i ' first ; ' •-.... ' second 'third Функция IsElement IsElement ( listlN'ame ( stringExpr ) ) Проверяет, является ли строковое выражение stringExpr элементом списка HstName. Возвращает значение True, если в списке HstName содержится элемент с именем stringExpr, иначе возвращает False. Если предложение HstName не является именем объявленного списка, LotusScript выдает ошибку. Если значением выражения expr является числовое выражение, LotusScript преобразует его значение в строковое выражение. © InterTrust Со. Тел. (095) 9567928 282 ; Язык LotusScript Пример. Создается список элементов, которым присваиваются некоторые значения. Выдается запрос на идентификацию удаляемых из списка элементов. Если в empNameS есть элементы для удаления из списка, то происходит удаление указанных элементов из списка. В противном случае выдается соответствующее сообщение и выполнение скрипта прекращается Dim empList List As Double Dim empName As String, Id As Double, found As Integer empList#("Maria Jones") = 12345 empList#("Roman Minsky") = 23456 empListtt("Joe Smith") = 34567 empListJ ("Sal Piccio") = 91234 empName$ = InputBox$("Which employee is leaving?") If IsElement(empList#(empName$)) = True Then Id# = CDbl(InputBox$("What's " & empName$ & "'s Id?")) found% = False ' Initialize found to 0 (False) ForAll empld In empList# If empld = Id# Then found% = True ' Set found to -1 (True). If ListTag(empld) = empName$ Then Erase empListt(empName$) 'Проверка элемента, удаляемого из списка. If IsElement(empList#(empName$)) = False Then MessageBox empName$ & " has been removed from the list." End If Else MessageBox "Employee name and Id do not match." End. If Exit ForAll End If •' ' End ForAll ' ' If found* = False Then MessageBox "Not a valid employee Id." End If Else MessageBox "We have no such employee." End If Функция IsUnknown IsUnknown ( expr) Проверяет, является ли значение выражения expr значением OLE V_I UNKNOWN. Возвращает значение True, если значение выражения expr имеет тип Variant и равно V_I UN KNOWN. Такое значение может иметь только ссылка на OLE-объект. В противном случае функция возвращает False. Функция IsDefined IsDefmed ( stringExpr) Проверяет, является ли значение строкового выражения stringExpr именем константы, определенной в Lotus-продукте. Возвращает значение True, если значение выражения stringExpr определено в Lotus-продукте, иначе возвращает False. Обычно функция используется для проверки значения констант, идентифицирующих используемую платформу. Такие проверки могут использоваться в %lf директиве условной компиляции скрипта. © InterTrust Co. Тел. (095) 9567928 Lotus Domino R. 5: @-формулы, LotusScript, встроенные классы LotusScript и Java 283 2.8.10. Средства работы с файловой системой 2.8.10.1. Операторы и функции для работы с устройствами и каталогами Оператор ChDir (назначить каталог) ChDir path path - строковое выражение, представляющее каталог, назначаемый в качестве текущего. Назначает в качестве текущего (рабочего) каталога каталог, путь к которому указан в выражении path. Если первым символом выражения path не является символ, обозначающий дисковое устройство (диск), то в качестве рабочего используется текущий диск, в противном случае рабочим становится диск, обозначение которого присутствует в выражении path. Формат и максимальная длина выражения path должны соответствовать соглашениям, принятым в используемой платформе. Пример 1. Назначает устройство (диск) D текущим устройством, ChDrive "D" . Пример 2. Назначает каталог TEST текущим каталогом на устройстве С. ChDir "C:\TEST" Пример 3. Назначить каталог TEST текущим каталогом на текущем устройстве D. ChDir "\TEST" Print CurDir () 'Выводит D:\TEST Оператор ChDrive (назначить устройство) ChDrive drive drive - строка, представляющая существующее устройство. Оператор ChDrive назначает текущее устройство согласно значению строки drive. Текущее устройство - это устройство, которое используется, если происходит обращение к указанному пользователем файлу, или при использовании пути, в котором отсутствует спецификация устройства. Если значением строки drive является пустая строка (""), то оператор ChDrive не меняет назначение, оставляя текущим устройство, используемое до выполнения оператора ChDrive. Если значением строки drive является строка, содержащая более одного символа, в качестве обозначения переназначаемого устройства берется первый символ значения строки drive. Оператор ChDrive не требует наличия знака двоеточие ( : ) после символа, обозначающего назначаемое устройство. Символом, обозначающим устройство, может быть любая буква от А до буквы, представленной опцией lastdrive в системном файле CONFIG.SYS, включительно. Пример. Назначить D текущим устройством. ChDrive "D" ' • ФуНКЦИЯ CurDir ..•.-..... ...•:.•,•"••.••.•. -•-•.... ' .-.:.....', .-••'-...--.. .. ;• -...-.. . .,...., CurDir[$] [ ( drive ) ] © InterTrust Co. Тел. (095) 9567928 284 Язык LotusScript Определяет назначение текущего каталога заданного устройства. CurDir возвращает значение типа Variant (String). CurDir$ возвращает значение типа String. drive - опция, являющаяся строковым выражением, определяющая существующее устройство. Если опция отсутствует, функция CurDir использует текущее устройство. Если спецификация устройства представляет собой строку, состоящую более, чем из одного символа, CurDir использует только первый символ строки. CurDir не требует наличия знака ( : ) после буквы, определяющей устройство. Пример. ChDir "C:\TEST" Print CurDir?() 'Выводит "C:\TEST" Функция CurDrive CurDrive[$] Возвращает строку, идентифицирующую текущее устройство (диск), состоящую из символа устройства, с последующим двоеточием. Функция CurDrive возвращает значение типа Variant (String). Функция CurDriveS возвращает значение типа String. Пример. Dim tempDrive As String tempDrive? = CurDrive?() If tempDrive? <> "C:" Then ChDrive "C" End If ChDir "\TEST" Print CurDir?() 'Выводит "C:\TEST" Функция Dir . . . • •....••... .,.: -• -. . ' Dir[$] [ ( fileSpec [, attributeMask ] ) ] -...,: Возвращает имя файла, каталога, или букву - название устройства. fiieSpec - строковое выражение, определяющее путь к файлу. Этот аргумент является обязательным только при первом обращении к функции Dir$ с указанием данного пути. Составленное по правилам определения пути к файлам, fileSpec обеспечивает доступ к файлам, синтаксис указателя пути к которым удовлетворяет принятой спецификации (например, использование в указателе пути знаков "*" и "?"). attributeMask - любое целое выражение, значение которого является возвращаемым именем. Если пропущен этот аргумент, имена существующих на устройстве файлов сравниваются со значениями, содержащимися в fileSpec. Если есть аргумент attributeMask, то должен быть и аргумент fileSpec. Для включения в возвращаемый список типов файлов, используются суммарные значения графы Mask из следующей таблицы, представляющей типы файлов:
© InterTrust Co. Тел. (095) 9567928 Lotus Domino R. 5: @-формулы, LotusScript, встроенные классы LotusScript и Java 285
Функция Dir возвращает значение типа Variant (String), а функция Dir$ - типа String. Константы, использованные в таблице, хранятся в файле LSCONST.LSS. Включение этого файла в скрипт позволяет использовать названия атрибутов вместо их численного кода. Для определения существования файла используется его правильное (в рамках используемой платформы) имя в качестве аргумента для функции Dir (Dir$). Возвращаемое значение может быть либо именем файла, либо сообщением об отсутствии файла на указанном устройстве. Первое обращение к функции Dir (Dir$) возвращает имя первого файла в указанном каталоге согласно спецификации имени файла в fileSpec. Последующие вызовы функции Dir (Dir$) с другими аргументами позволяют добавить имена файлов по списку fileSpec. Если в указанном каталоге больше нет файлов, соответствующих спецификации, то функция Dir возвращает значение типа Variant (String), а функция Dir$ возвращает пустую строку (""). Если, после получения пустой строки, функция Dir (Dir$) вызывается еще раз с той же спецификацией пути, то генерируется ошибка. Пример. Получения списка каталогов на устройстве С:\ Dim pathName As String, fileName As String pathName$ = "C:\*.*" fileName$ = Dir$(pathName$, 0) Do While fileName$ <> "" • . . • Print fileNameS fileName$ - Dir$() Loop Оператор MkDir (создать каталог) MkDirpath path - строковое выражение, значение которого является именем создаваемого каталога. В выражении path буква, определяющая дисковое устройство, не является обязательной. Если она отсутствует, то используется текущее назначение устройства. Правила указания каталога должны соответствовать правилам используемой операционной платформы. При невозможности создать требуемый каталог LotusScript выдает ошибку. Пример. Создание каталога TEST в корневом каталоге устройства С. MkDir "C:\TEST" -<• ' " Оператор Name (переименовать/переслать файл/каталог) Name oidName As newName Переименовывает (и/или пересылает) файл или каталог. oldName - строковое выражение, определяющее имя существующего файла/каталога, необязательно содержащее путь; newName - строковое выражение, определяющее новое имя файла/каталога, необязательно содержащее путь. Для пересылки файла необходимо указывать полный путь и для файла с именем oidName и для файла с именем newName. Для переименования используйте имя файла в обоих аргументах. © InterTrust Со. Тел. (095) 9567928 |
В excel имеются средства для обработки данных, организованных по принципу баз данных – функции списка, основные операции которых... | Республике Саха (Якутия)» (далее – гау «мфц рс(Я)» или Оператор) считает важнейшими своими задачами соблюдение принципов законности,... | ||
Положения об особенностях обработки персональных данных, осуществляемой без использования средств автоматизации и устанавливает порядок... | Рриториальных органов, а также порядок взаимодействия Роскомнадзора и его территориальных органов с операторами, осуществляющими... | ||
Правительства Российской Федерации от 15. 09. 2008 №687 «Об утверждении Положения об особенностях обработки персональных данных,... | Категории обрабатываемых персональных данных, источники их получения, сроки обработки и хранения. 3 | ||
Постановлением Правительства Российской Федерации от 15. 09. 2008 №687 «Об утверждении Положения об особенностях обработки персональных... | Постановлением Правительства Российской Федерации от 15. 09. 2008 №687 «Об утверждении Положения об особенностях обработки персональных... | ||
Постановлением Правительства Российской Федерации от 15. 09. 2008 №687 «Об утверждении Положения об особенностях обработки персональных... | Ии администрации сельского поселения (Н. П. Свистуновой) довести под роспись до сотрудников администрации сельского поселения, обязанности... |
Поиск Главная страница   Заполнение бланков   Бланки   Договоры   Документы    |