Здравствуйте! есть поле в форме вот с такими данными:

49,0840388888889 55,8483944444444
49,0758420621239 55,848868421318
49,0755923105285 55,8510254478631
49,0667690295303 55,8510602052147
49,0669888498878 55,8590267224895
49,072003740708 55,859278497036
49,0740250881726 55,8640417330845
49,0763634133865 55,8644822772042
49,0793085126276 55,8692599425676
49,077035350807 55,8695706214117
49,077118035886 55,8720531362307
49,0839775997428 55,8723909134901
49,085085495203 55,870734780173
49,0957224166008 55,8714768922188
49,1048214234981 55,8679821314794
49,1059956676562 55,8649419488701
49,1078564979425 55,8625470640388
49,1106863940431 55,8613210507663
49,1067536240092 55,8577984634221
49,0985710398202 55,8551910660467
49,0879508739187 55,8479290756276
Данные в поле записаны через знак табуляции и знак абзаца.

Как записать можно данные из поля формы записались в табл1 (2 столбца: X,Y)?

vmag, поле MEMO в форме (свободное)

sdku, vmag, в реале есть файл *.kml в кодировке utf-8, внутри текст:
<?xml version="1.0" encoding="UTF-16"?><kml xmlns=" http://earth.google.com/kml/2.2"><Document xmlns=""><mapName>Казань</mapName><name>1.kmz</name><Style id="Новый многоугольник_Style_00000000"><LabelStyle><color>ff000000</color><scale>1</scale><face>Arial</face><visible>0</visible><style>00000000</style></LabelStyle><LineStyle><color>ff000099</color><width>00000001</width></LineStyle><PolyStyle><color>ff99ffff</color><fill>0</fill><outline>1</outline></PolyStyle><ListStyle/></Style><Placemark id="4"><name>Новый многоугольник</name><visibility>1</visibility><styleUrl>#Новый многоугольник_Style_00000000</styleUrl><Polygon><outerBoundaryIs><LinearRing><coordinates>49.0840388888889,55.8483944444444,0 49.0758420621239,55.848868421318,0 49.0755923105285,55.8510254478631,0 49.0667690295303,55.8510602052147,0 49.0669888498878,55.8590267224895,0 49.072003740708,55.859278497036,0 49.0740250881726,55.8640417330845,0 49.0763634133865,55.8644822772042,0 49.0793085126276,55.8692599425676,0 49.077035350807,55.8695706214117,0 49.077118035886,55.8720531362307,0 49.0839775997428,55.8723909134901,0 49.085085495203,55.870734780173,0 49.0957224166008,55.8714768922188,0 49.1048214234981,55.8679821314794,0 49.1059956676562,55.8649419488701,0 49.1078564979425,55.8625470640388,0 49.1106863940431,55.8613210507663,0 49.1067536240092,55.8577984634221,0 49.0985710398202,55.8551910660467,0 49.0879508739187,55.8479290756276,0</coordinates></LinearRing></outerBoundaryIs></Polygon></Placemark></Document></kml>
Это область с координатами, внутри которой находятся компании, все координаты перечислены по порядку и соединены прямыми линями. По идее было бы хорошо, это: 1. Имортировать файл куда то в буфер. 2. Фильтровать и преобразовать до такого состояния: 49,0840388888889 55,8483944444444
49,0758420621239 55,848868421318
49,0755923105285 55,8510254478631
49,0667690295303 55,8510602052147
49,0669888498878 55,8590267224895
49,072003740708 55,859278497036
49,0740250881726 55,8640417330845
49,0763634133865 55,8644822772042
49,0793085126276 55,8692599425676
49,077035350807 55,8695706214117
49,077118035886 55,8720531362307
49,0839775997428 55,8723909134901
49,085085495203 55,870734780173
49,0957224166008 55,8714768922188
49,1048214234981 55,8679821314794
49,1059956676562 55,8649419488701
49,1078564979425 55,8625470640388
49,1106863940431 55,8613210507663
49,1067536240092 55,8577984634221
49,0985710398202 55,8551910660467
49,0879508739187 55,8479290756276
3. Записать в таблицу

Пока сделал так:
просто открываю файл блокнотом, вставляю в пустое поле формы, нажимаю кнопку, текст преобразуется до этого состояния. А дальше как раз и спрашиваю как записать в таблицу

vmag, Панург, сам файл создается в других географических системах https://ru.wikipedia.org/wiki/KML . Таких файлов каждый месяц может быть десятками. Из этого файла нужны только координаты сектора, которые лучше хранить во временной таблице1. Так же есть база адресов с ID адреса и координатами, и База компаний, где у каждой есть от 0 до n.. адресов с Id адреса.
Задача по сути в следующем:
1. Это загрузить такие файлы в базу.
2. Вытащить из них координаты секторов и название сектором по Name.
3. в отдельной таблице0 создать (Id сектора; Название сектора)
4. Записать во временную таблицу1 строго по порядку координаты (ID координат сектора; Id сектора; координата X; координата Y).
5. Определить Max(X;Y) и Min(X;Y) координаты по каждому сектору.
6. Функцией триангулирования прогнать каждый объект карты (здание) попадающее в диапазон по Max и Min.
7. В таблицу2 записать Id адреса и Id сектора (это будут объекты карты, которые находятся в данном секторе)
8. После записи в таблицу2, таблицу1 можно удалить она больше не нужна.

Нашел вот такой модуль для открытия файлов. Теперь думаю, а можно ли сразу с десяток файлов записать в таблицу с полем memo.

sdkuВангую:
если поле в форме такие данные с клавиатуры не внесешь т.к нажатие TAB или ENTER перемещает в следующее поле
если для постоянного пользования лучше сделать форму на таблице с полями X и Y
если разово то добавить в таблицу поле с данными (ctl),выполнить процедуру и удалить его (если Акцесс ниже 2007 использовать DAO)


Сделал в итоге импорт файлов kml, в конечном счете запросом выдергивается данные, и имееют вид как в приложенной картинке.
Сами данные:


Теперь вопрос, как можно записать данные в таблицу, что бы они имели вид?

ПанургpnnkazanТеперь вопрос, как можно записать данные в таблицу, что бы они имели вид?Зачем? Ты же данные всёодно похеришь потом. Создай массив и работай с ним.

Сейчас VBA слабая сторона, может подскажете как задать массив из запроса?

2 проблемы:
1. Вылетает ошибка в строке rs2.X = Str(b(0)) - Method or data member not found
2. Если убрать rs2.X = Str(b(0)) и rs2.Y = Str(b(1)), и туда вставить rs2.С = a(i), то вроде записывается в тбл TSC в столбец С, но не всё, а в сумме по всему столбцу 247 символов, т.е. массив 'a' имеет в сумме максимум 247 символов.

В таблице TSC типы полей X,Y - одинарные с плавающей точкой, С - длинный текст, в таблице CRMTSCF поле CS - длинный текст.

Код:


Подскажите пожалуйста, что не так?

Вот такой список выдает:

sdkupnnkazan,
Выдержка из HELP:"Функция Split(Expression) возвращает одномерный массив с типом данных Variant (String) "
Т.е. она берет из поля с длинным текстом только 255 символов?

Если в таблице TSC поля X,Y сделать текстовые, и сделать вот такой код:


Тоже выдает ту же ошибку.

А если прогнать значения массива 'a' и записать в тестовое поле таблицы, то ошибки нет. Но функция Split как буд-то берет максимум 255 символов для расщепления, вместо всего длинного текста. Как можно решить?

sdku, спасибо Вам очень большое. Я очень благодарен)