Fortress в очередной раз попрошу одну фичу.
Исправил сейчас 1314 ошибок по Таиланду. Клацкать на каждую букву J крайне утомительно. Поэтому нужна кнопка “Загрузить все ошибки”.
Как должна она работать:
Для примера берём http://yav.gis-lab.info/settlements/n27503886-r1704857-o05401000-k2500000100000
Находим для примера улицу Багратиона клацкаем по иконке и все дома по этой улице загружаются в josm.
Так и с ошибками.
Друзья в osm’е помогите ))
После праведного труда по исправлению ошибок в Таиланде мне пришло письмо от Willi2006 следующего содержания:
Помогите на литературном английском (а не на машинном) написать ответ, что все правки были сделаны не по злому умыслу, а на общее благо.
Заранее спасибо.
ЗЫ Всё таки зря так быстро опять запустили конвертацию Таиланда. Надо было пару дней подождать.
ЗЫЫ Ошибки от 10.10.2012 по Таиланду исправил. Завтра - после-завтра можно запустить.
Ну как-бы скрипт выложен, подправь плиз как надо))
Насчет Josm и Potlatch 2 согласен, насчет может лучше побольше пробелов и align=“justify”?
“Hi. All of these nodes and ways were duplicated (there are another ways and nodes at the same place) so i just deleted objects, created by mistake. Sorry for writing Russian and thanks for you understanding.”
И старайся правки в других странах комментировать на английском с вменяемым содержанием)
Нужно было учитывать временнОй лаг, когда просил запустить конвертацию))
P/S: err.php не содержит в себе ничего интересного, просто выводит файл с ошибками в браузер либо удаляет его в зависимости от параметров.
Да всё очень просто, на мой взгляд: надо убрать возможность удаления файла.
Желающих нажать “я всё исправил!” меньше не станет, и всё равно придётся проверять руками, есть ли эти ошибки, или нет.
Всевозможные валидаторы работают именно по такому принципу, и особых проблем это не доставляет. Да, изредка сталкиваешься с исправленными ошибками, но, к сожалению, количество ошибок значительно превышает количество исправляющих…
Можно, конечно, давать нажимать эту галку только зарегистрированным в ОСМ людям (и логгировать это событие), но надо ли?..
Я думаю пока сделаю, чтобы выдавалось предупреждение перед удалением. Если это не поможет, прикрутим OAuth. Хотя если честно, сейчас этим заниматься совсем некогда. Я уже пытался как-то сделать OAuth на сайте, но с полпинка оно не завелось, а разбираться некогда было, так и забросил…
Dim fso, ts, s, MyArray(), i, p, o
'скачивание файла с ошибками
o="http://navitel.osm.rambler.ru/err.php?country=Thailand®ion=Thailand"
Set oXMLHTTP = CreateObject("MSXML2.XMLHTTP")
'подключение
oXMLHTTP.Open "GET", o, 0
'получение файла
oXMLHTTP.Send
Set oADOStream = CreateObject("ADODB.Stream")
oADOStream.Mode = 3 'разрешение на чтение и запись
oADOStream.Type = 1 'тип данных - Binary
oADOStream.Open
oADOStream.Write oXMLHTTP.responseBody
'сохранение (с перезаписью файла при необходимости)
oADOStream.SaveToFile "err.html", 2
'
Const ForReading = 1
Set fso = CreateObject("Scripting.FileSystemObject")
Set ts = fso.OpenTextFile("err.html", ForReading)
i=0
Do Until ts.AtEndOfStream
s=ts.ReadLine
p=instr(1,s,"http://localhost:811")
if p <> 0 then
i=i+1
ReDim preserve MyArray(i)
s=mid(s, instr(1,s,"http://localhost:811"), len(s)-instr(1,s,"http://localhost:811")-24)
MyArray(i) = s
' MsgBox MyArray(i)
Set wShell = CreateObject("WScript.Shell")
wShell.Run MyArray(i)
WScript.Sleep 500
end if
Loop
ts.Close
Сохраняем этот код с расширением vbs, в 3 строчке меняем на ту страницу где ошибки (много ошибок) и запускаем (само собой при запущенном josm и включенном в нём Удалённом управлении).
Код протестирован в windows 7.