RUS  ENG 

alw39 (Все сообщения пользователя)

Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Макрос на javascript
 
Добрый день (вечер).
Пытаюсь сделать запрос к HTTP сервису 1С
на VBScript
Sub http
Dim xmlhttp
Set xmlhttp = CreateObject("Msxml2.XMLHTTP.6.0") ' Or "Msxml2.XMLHTTP" for older systems

' --- For a GET request ---
xmlhttp.Open "GET" , "[URL=http://192.168.x.x:8008/Dokument/hs/document/list/?@format=JSON,False,user]http://192.168.x.x:8008/Dokument/hs/document/list/?@format=JSON,False,user[/URL],pass;
xmlhttp.Send
' Check the status and get the response
If xmlhttp.Status = 200 Then
  MsgBox  "Response Text: " & xmlhttp.ResponseText
  MsgBox len(xmlhttp.ResponseText)    
Else
   MsgBox "Error: " & xmlhttp.Status & " - " & xmlhttp.StatusText
End If
End Sub
Запрос работает в ответ приходит json  в виде текста длиной около миллиона, поддержки json в  VBScript  нет, пытаюсь выполнить запрос на javascript где есть поддержка json

var xhr = new XMLHttpRequest();
   xhr.open('GET', '[URL=http://192.168.33.1:8008/Dokument/hs/document/list/?@format=JSON',False,'user','pass']http://192.168.33.1:8008/Dokument/hs/document/list/?@format=JSON',False,'user','pass'[/URL] );
........
ошибка  new XMLHttpRequest(); определение отсутствует
через fetch
var response =  fetch('[URL=http://192.168.33.1:8008/Dokument/hs/document/list/?@format=JSON',]http://192.168.33.1:8008/Dokument/hs/document/list/?@format=JSON',[/URL]{ method:"GET",body: new URLSearchParams({ username: "userr", password: "pass" })});
ошибка  new URLSearchParams; определение отсутствует
Как определить эти объекты?
ошибка в макросе с запросом к БД
 
Добрый день!
Спасибо! Так работает.
ошибка в макросе с запросом к БД
 
Добрый день !
В Zulu БД подключена в источнике данных со строкой
"Provider=OraOLEDB.Oracle.1;Persist Security Info=False;User ID=k_g;Password=k;Data Source=gaz", запросы в формах работают.

Аналогичный  запрос в 1С  выполняется , здесь непонятная ошибка выполнения VBScript в методах ADODB.Recordset   ?

Sub ora
Dim strCon
Dim Con
Dim Rec
Dim Com
Dim strSQL
Dim strRes

strSQL="select  NAME from gg_serts"

'strConnect="Provider=OraOLEDB.Oracle.1;Persist Security Info=False;User ID=k_g;Password=k;Data Source=gaz"

strCon="Provider=OraOLEDB.Oracle.1; Data Sourse=(DESCRIPTION=(CID=GTU_APP)(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=servergg)(PORT=1521)))(CONNECT_DATA=(SID=gaz)(SERVER=DEDICATED)));User Id=k_g; Password=k;"

Set Con=createObject("ADODB.Connection")
Con.ConnectionString=strCon
Con.Open
Set Com=createObject("ADODB.Command")
Com.ActiveConnection=Con
Set Rec=CreateObject("ADODB.Recordset")
Com.CommandText= strSQL
Rec=Com.Execute

Do While Not Rec.EOF                    -ошибка Объект не поддерживает метод Rec.EOF    

strRes=Rec.Fields("NAME").Value   -ошибка Объект не поддерживает метод Rec.Fields
MsgBox strRes
Rec.MoveNext

Loop

Rec.Close
Con.Close
Com.Close
End Sub
Изменено: alw39 - 05.08.2025 22:29:55 (ошибка)
Запрос к источнику данных
 
Добрый день.
Запрос работает, но возникла проблемма, одна из таблиц связана по своей ID c таблицей в которой с этим ID есть несколько записей с расшифровкой исходной таблицы. Запрос естественно возвращает первую найденную запись подчиненной таблицы. Есть ли возможность выбрать эти записи штатными средствами?
Запрос к источнику данных
 
Спасибо так сработало.
Запрос к источнику данных
 
Добрый день!
Есть БД оракла в которой графика и минимальный набор семантических данных хранится в отдельных таблицах , развернутые семантические данные к ним отдельно.
Графика экспортирована в шейпы и импортирована в Zulu, БД оракла подключена как отдельный источник данных.
В основном запросе все поля отображаются корректно.
В БД слоя помимо основной таблицы SQLite с импортированными данными добавил связанные по ID таблицы из оракла, но при попытке сформировать запрос ошибка о невозможности запроса к разным источникам.
Необходимо получить из основной таблицы слоя ID таблицы оракла и по нему выбрать необходимые семантические данные. Как можно реализовать данный функционал ?
импорт в geojson
 
Ошибок нет.
После экспорта средствами Зулу создается файл geojson около 260мб и визуально с корректными данными, далее импортируем его обратно в другую карту но ничего не происходит, как писал выше файлы слоя .b00 - .b08 создаются но они пустые.
импорт в geojson
 
Вычислил и добавил длины отрезков но при импорте geojson файлы слоя  .b01 .b04 пустые , в остальных от 22байт до 1.3 к.
Для проверки экспортировал слой из Zulu и импортировал в новую карту ,результат анологичный.
Zulu 2021 вер.10.0.0.0.8497.х64
В этом месяце готовится закупка Zulu и надо срочно решить вопрос с загрузкой данных, из шейпов проверил но там проблемы с их формированием.
Связь ZULU с 1С
 
Добрый день!
Принято решение о переходе на ZULU, пока идет процес покупки надо срочно решить вопрос со связью с 1С.
В демо версии проверил импорт из шейпов, перенес трубопроводы, монтажные узлы, задвижки на первый взгляд все корректно перенеслось.
Всю атрибутивную информацию (хранятся в оракле) решено переносить в справочники 1С и поскольку прямое обращение к 1С MSSQL не рекомендовано то настраиваем в 1С HTTP сервисы , которые по id запрашиваемого элемента будут отдавать необходимую информацию.

Как я понимаю на стороне ZULU надо сздать плагин который при выборе элемента на карте организует HTTP запрос к 1С для выбора нужных данных и отображения их, .
Это правильно или есть другие варианты ?
импорт в geojson
 
Добрый день!
Изучаю вопрос загрузки из оракла геометрии в формате  geojson.
Что бы получить корректную структуру файла  загрузки импортировал из оракла  шейп  газопровода загрузил его в ZULU и экспортировал его в   geojson .
{ "type": "Feature","properties" :
{"sys":"19","typeid":"-1","modeid":"0","typename":"","modename":"","area":"","length":"0.9","length_sph":"0.9","perimeter":"0","text":"","linecolor":"0","linestyle":"0","linewidth":"1","fillcolor":"","fillstyle":"","patcolor":"","selected":"0","GAZ_PIPE_G":"59123","ATTRIBUTE_":"11816","MATERIAL_I":"9","DIAMETER_I":"161","PRESSURE_I":"1","CONDITION_":"11","LOCATION_I":"1","DEPTH":"1.41","BUFFER_ZON":"2","PIPES_EXPL":"87","LABEL":"?","INFO":"?.?.??.108??.1.41","LAYERNAME":"??????????","LINETYPENA":"","COMMENTS":"","COORDINATI":"00000000","REG_NUMBER":"","SOURCE_INF":"","BASEMENT_D":"2","PRECISION_":"","DESCRIPTIO":""},"geometry":{ "type": "MultiLineString", "coordinates" : [ [[118686695.0000000000000,35094149.0000000000000],[118686695.0000000000000,35094239.0000000000000]]]}},

В нем появились поля "length":"0.9","length_sph":"0.9" насколько я понимаю это длина линии , но в исходной таблице оракла этих значений нет, видимо они добавились либо при создании шейпа либо при экспорте в  geojson.
Надо ли при выгрузки из оракла  в geojson вычислять и заполнять эти значения или они необязательны    ?
Страницы: 1