Вход на хостинг
IT-новости
20.04.2016 iPhone 2017 года поместят в водонепроницаемый корпус из стекла
Линейка iPhone в новом году серьезно поменяется. В этом уверен аналитический исследователь Мин Чи Ку......
30.07.2015 Ищем уникальный контент для сайта
Ищем уникальный контент для сайта Без уникального контента Ваш сайт обречен на то, что его страницы......
"ID=28f15724-3c41-4753-b5a4-42bb454b8be3" + chr(13) + chr(10) + "OrderInList=16384" + chr(13) + chr(10) + "" + chr(13) + chr(10) +
"Folder=/" + chr(13) + chr(10) + "OrderInTree=32768"
Затем просмотрите и отберите элементы массива, характеризующие локальные базы. Признаком локальности базы является значение элемента connect, начинающегося с file=. Накопление данных осуществляется в переменную, которая потом также будет разложена в массив, но уже по другому признаку: переводу и возврату каретки на новую строку, а именно chr(13)+chr(10):
$en=chr(13)+chr(10)
…
$temp=""
' расчленение строки на элементы массива.
' Признак – наличие "["
$array_0=split($GetFile,"[")
for each $element in $array_0
' "connect=file=" – признак локальности БД
if instr(ucase($element),ucase("connect=file="))<>0
$element="["+$element
$temp=$temp+$element
endif
next
$array_base=split($temp, $en) ' массив локальных баз
Поскольку нумерация баз меняется, существующие локальные базы данных необходимо переместить в отдельную виртуальную папку, например, «Локальные базы», поэтому значения параметров OrderInList и OrderInTree необходимо обнулить, значения параметра Folder исправить на Folder=/ Локальные базы. Для этого необходимо обновить значения элементов массива:
$virtual_local_folder="Локальные базы"
for $i=0 to ubound($array_base)
$element=$array_base[$i]
if instr(ucase($array_base[$i]),ucase("orderin"))<>0
$array_base[$i]=left($element,instr($element,"="))
endif
if instr(ucase($element),ucase("folder="))<>0
$array_base[$i]=left($element,instr($element,"=")+1)+$virtual_local_folder