Программа по передаче точек в sokkia 530

зравствуйте!! подскажите пожалуйста вот столкнулся с задачей по передаче точек в sokkia 530 ,устал в ручную забивать )) с автокада снял координаты в текст , а сокиа линк не открывает этот файл пишет что формат не верный ,устал уже с ней воевать .Подскажите кто знает

 

счастливчик

http://www.geostart.ru/phpBB/viewtopic.php?t=339

 

счастливчик

http://geodesist.ru/forum/topic.php?forum=18&topic=171

 

Мапсют+ версии 2 триал 30 дней (третья уже не заливает почему то). Идеальный вариант. Не забываем про Ашампу.

 

Ohr, Cлку не подскажеш.

 

Если установлено дополнение VBA для AutoCAD, то можно использовать программу,которая из чертежа AutoCAD выделенные пользователем примитивы (точки, линии, полилинии и прочее) преобразует в список координат и формирует РАБОЧИЙ файл для тахеометров Sokkia в формате SDR-20 (старый) и SDR-33 (новый).
Имена (номера) точек пользователь может задавать сам.

Скачать отсюда:
http://www.mediafire.com/download.php?edd1b49zl293eii
В архиве несколько программ на VBA-AutoCAD, по теме нужна:
Export-SDR.dvb
Читать обязательно:
О_программе_ExportSDR.txt

 

Мапсют+ версии 2 триал 30 дней подскажите где скачать? Может есть у ково подилтесь ПОЖАЛУЙСТА!

 

sklimkim,
Поставил Вашу программу по экспорту координат из ACAD в SDR.
Win7, 64-раз. система, ACAD Civil 2013; ACAD 2011, ACAD 2009.
Выдает следующее сообщение:

В чем причина? Помогите пожалуйста...

 

Причина в том, что программа была сделана и тестировалась в:
1. Win-XP 32bit
2. AutoCAD-2005 -2007
Для Win-7 и всего того, что Вы написали, она похоже устарела, сожалею.

 

sklimkim,Понятно. Спасибо за ответ.

 

Строка с ошибкой в 64бит версиях автокад выглядит так:

Code:

VertName.hwndOwner = ThisDrawing.HWND

Замените все строки такого вида на следующую строку:

Code:

VertName.hwndOwner = 0

Т.е. левую часть строки с ошибкой оставляете, а всё что после знака "=" удаляете и пишете ноль. Это позволит работать программе в автокад 2007-2014 32 и 64 бит, но не гарантирую что программа останется работоспособной в каком-нибудь автокад 2000.

Если в программе больше не обнаружится ошибок в других строках, то всё заработает.

PS После изменения кода программы нажмите кнопку "сохранить" в левой верхней части среды разработки. Или придётся каждый раз при новом запуске изменять программу чтобы она работала.

 

Philin,
Спасибо Вам, все заработало.

 

Т.е. АутоДеск изменил "кое-что" в объектной модели VBA-AutoCAD после версии 2005 и об этом знали только в узком кругу специалистов?

 

Скорее другое - аутодеск при переводе автокад на 64 бит ввёл слишком много глюков в свой продукт (или исправил старые). Кроме аутодеск постаралась и Microsoft с своим Windows7 и Windows8. В принципе, как обычно :) С VB.Net аналогичная ситуация.

В итоге правильный и работающий в WinXP код VBA AutoCAD может не работать в Win7/8, а если Win7/8 ещё и 64 бит, то пиши-пропало :)

Самое паршивое, что эти глюки плавающие. Можно собрать две идентичные сборки (компьютер + автокад + Windows7/8) и на одной сборке получить ошибку в коде VBA, а на другой её не будет.

 

Уважаемый Philin, спасибо за содержательный "разбор полетов".

Помнится как-то Вы помогли мне со спецификациями протокола тахеометров Sokkia (нигде не мог найти).
Ситуация тогда оказалась аналогичной - от модели к модели хитрож...е японцы немного меняли протокол.
Поэтому я тогда забросил свою идею соорудить интерфейс Sokkia<-->наладонник (любой из Win-CE/Mobile: HP, Fujitsu-Siemens, Aser, ... ) для обмена данными в поле (на стройплощадке) в реал-тайме для отображения снятого/измеренного, или для выноса точек в натуру.
Маленькие КАД'ы для Win-CE/Mobile тогда уже были в наличии.
Но делать программу только для одной (своей) модели было глупо, а для всех моделей не было ресурсов.

Если найдете время, то моя просьба такая: перекомпилируйте, пожалуйста, мою программу для 2007, а скорее всего для 2012 (и для 64-бит) и выложите где-нибудь здесь для молодых коллег. У меня сейчас для перекомпиляции ничего нет, а молодежь с этим может и не справиться (некоторые из них могут только кнопочки давить).
К тому же пользование VBA-программами может подтолкнуть некоторых из них к изучению (самостоятельному творчеству).
Во всяком случае хочется так думать.

 

Philin Developer любезно перекомпилировал эти VBA-программы для их использования в:

Большое ему спасибо!

 

Вдогонку к перекомпиленным программам кладу файл с комментариями к этим (и другим - их тогда было немного больше) программам.
Надеюсь это поможет разобраться

 

Philin, А Вы на VB.net тоже пишите утилиты для автокада ? Меня это интересует потому, что я сам активно изучаю VB.net и в недалёком будущем планировал начать программить утилиты для акада. Стало быть, возможны разные глюки, которые вы описывали ?

 

Спасибо Сергей и Philin!!!
Что бы мы без Вас делали?!))

Может откройте себе счета на Яндекс-деньгах, будем финансово Вас мотивировать.