Встроенные функции VBScript можно дополнить своими собственными функциями. При выборе имен переменным аргументов, таким как value в приведенном выше примере, нужно отдавать предпочтение тем из них, которые имеют какой-нибудь смысл, поясняя тем самым, какого рода информация от них ожидается. Например, когда функции передается имя файла (filename), я часто, уже по привычке, называю аргумент f name. В моих сценариях переменная или аргумент по имени f name всегда содержит имя файла. Следующая функция получает имя файла, удаляет из него расширение (указывающее на тип этого файла) и добавляет к нему расширение. OLD. Эту функцию можно использовать в программе, которая собирается обновить файл. Если нужно создать резервную копию файла до внесения изменений в оригинал, следует воспользоваться этой функцией. Функция определит нужное имя файла резервной копии на основе исходного имени файла: Эта функция работает следующим образом: функция InStrRev ведет поиск в своем первом аргументе (в данном случае в fname) самого правого появления второго аргумента (в данном случае это просто символ точки). Она возвращает значение 0, если второй аргумент не найден, в противном случае она возвращает позицию внутри первой строки, в которой будет найден этот аргумент — 1, 2 и т. д. Поэтому в данном случае переменная idot получает значение 0, если точки не будет в аргументе имени файла fname, или же получает значение больше нуля, если точка будет найдена. (Если помните, эта технология уже использовалась ранее в данной главе, в примере script0208.vbs.)
Остальная часть функции занимается именем резервной копии файла. Если точка была найдена, функция составляет новое имя файла из первых символов старого имени вплоть до точки, но исключая ее, добавляя к ним строковое значение. OLD. Если точка в старом имени не была найдена, функция все равно добавляет. OLD.
