Дмитрий В.
Победившая ставка- Проекты 8
- Оценка -
- Рейтинг 836
Бюджет: 200 UAH Срок: 3 дня
Могу предложить решение на php, тем более что уже делал подобное не раз (нужно будет только адаптировать под конкретную структуру).
Если своего сайта нет, то из локалки тоже можно загружать (поставить Denver, подскажу как именно).
Стоимость слегка ориентировочная, предварительно хотел бы ознакомиться со структурой исходного файла, и требуемым форматом.
---
Стоимость и сроки уточнил.
Бюджет: 1000 UAH Срок: 2 дня
могу предложить решение для сервера (в виде php-скрипта) , так и программой под windows платформу (один exe файл без необходимости захламлять систему лишним ПО)
обращайтесь
Skype : sergey.gm79
Бюджет: 1700 RUB Срок: 1 день
Есть готовое решение. Пишите, обсудим детали.
Бюджет: 500 UAH Срок: 3 дня
Здравствуйте. Готов написать скрипт для этого на РНР.
Ставки пока отсутствуют
-
Alex Kostev
5 мая 2015
Самораспаковывающийся архив по адресу.
http://laurin.freedomain.thehost.com.ua/555.exe
В нем 2 файла – как есть сейчас в xmlи файл excelс данными которые нужно в него перегнать.
Нужен скрипт или готовый файл excel чтобы в него можно было иногда вносить изменения и он выдавал новый xml файл.
Посмотрите, если покажется что можете можем договариваться.
-
Alex Kostev
5 мая 2015
Самораспаковывающийся архив по адресу.
http://laurin.freedomain.thehost.com.ua/555.exe
В нем 2 файла – как есть сейчас в xmlи файл excelс данными которые нужно в него перегнать.
Нужен скрипт или готовый файл excel чтобы в него можно было иногда вносить изменения и он выдавал новый xml файл.
Посмотрите, если покажется что можете можем договариваться.
-
Сергей Морланг 5 мая 2015Что-то типа такого макроса подойдет?
Private Sub CommandButton1_Click()
triTab = Chr(9) + Chr(9) + Chr(9)
Sheets(1).Activate
Sheets(1).Cells(2, 1).Activate
MYSTRING = Application.ActiveWorkbook.Path + "\" + Format(Now(), "dd-mm-yyyy HH.MM.SS") + ".txt"
Open MYSTRING For Output As #1
Print #1, "<?xml version=" + Chr(34) + "1.0" + Chr(34) + " encoding=" + Chr(34) + "windows-1251" + Chr(34) + " ?>"
Print #1, "<price>"
Print #1, Chr(9) + "<date>" + Format(Now(), "yyyy-mm-dd HH:MM") + "</date>"
Print #1, Chr(9) + "<firmName>Men Active</firmName>"
Print #1, Chr(9) + "<firmId>22024</firmId>"
Print #1, Chr(9) + "<rate></rate>"
Print #1, Chr(9) + "<categories>"
Print #1, Chr(9) + "<category>"
Print #1, Chr(9) + "<id>1</id>"
Print #1, Chr(9) + "<name>Мужская одежда</name>"
Print #1, Chr(9) + "</category>"
Print #1, Chr(9) + "<category>"
Print #1, Chr(9) + "<id>2</id>"
Print #1, Chr(9) + "<parentId>1</parentId>"
Print #1, Chr(9) + "<name>Мужские плавки</name>"
Print #1, Chr(9) + "</category>"
Print #1, Chr(9) + "<category>"
Print #1, Chr(9) + "<id>3</id>"
Print #1, Chr(9) + "<parentId>1</parentId>"
Print #1, Chr(9) + "<name>Мужское нижнее белье</name>"
Print #1, Chr(9) + "</category>"
Print #1, Chr(9) + "<category>"
Print #1, Chr(9) + "<id>4</id>"
Print #1, Chr(9) + "<parentId>1</parentId>"
Print #1, Chr(9) + "<name>Мужские шорты</name>"
Print #1, Chr(9) + "</category>"
Print #1, Chr(9) + "<category>"
Print #1, Chr(9) + "<id>5</id>"
Print #1, Chr(9) + "<parentId>1</parentId>"
Print #1, Chr(9) + "<name>Мужское термобелье</name>"
Print #1, Chr(9) + "</category>"
Print #1, Chr(9) + "<category>"
Print #1, Chr(9) + "<id>6</id>"
Print #1, Chr(9) + "<parentId>1</parentId>"
Print #1, Chr(9) + "<name>Мужские футболки, майки</name>"
Print #1, Chr(9) + "</category>"
Print #1, Chr(9) + "<category>"
Print #1, Chr(9) + "<id>7</id>"
Print #1, Chr(9) + "<name>Домашний текстиль</name>"
Print #1, Chr(9) + "</category>"
Print #1, Chr(9) + "<category>"
Print #1, Chr(9) + "<id>8</id>"
Print #1, Chr(9) + "<parentId>1</parentId>"
Print #1, Chr(9) + "<name>Полотенца</name>"
Print #1, Chr(9) + "</category>"
Print #1, Chr(9) + "<category>"
Print #1, Chr(9) + "<id>9</id>"
Print #1, Chr(9) + "<name>Спортивная одежда, обувь</name>"
Print #1, Chr(9) + "</category>"
Print #1, Chr(9) + "<category>"
Print #1, Chr(9) + "<id>10</id>"
Print #1, Chr(9) + "<parentId>1</parentId>"
Print #1, Chr(9) + "<name>Термобелье</name>"
Print #1, Chr(9) + "</category>"
Print #1, Chr(9) + "<category>"
Print #1, Chr(9) + "<id>11</id>"
Print #1, Chr(9) + "<parentId>1</parentId>"
Print #1, Chr(9) + "<name>Спортивные шорты, бриджи</name>"
Print #1, Chr(9) + "</category>"
Print #1, Chr(9) + "<category>"
Print #1, Chr(9) + "<id>12</id>"
Print #1, Chr(9) + "<parentId>1</parentId>"
Print #1, Chr(9) + "<name>Пляжные шорты</name>"
Print #1, Chr(9) + "</category>"
Print #1, Chr(9) + "<category>"
Print #1, Chr(9) + "<id>13</id>"
Print #1, Chr(9) + "<parentId>1</parentId>"
Print #1, Chr(9) + "<name>Мужская домашняя одежда</name>"
Print #1, Chr(9) + "</category>"
Print #1, Chr(9) + "<category>"
Print #1, Chr(9) + "<id>14</id>"
Print #1, Chr(9) + "<parentId>1</parentId>"
Print #1, Chr(9) + "<name>Спортивные брюки</name>"
Print #1, Chr(9) + "</category>"
Print #1, Chr(9) + "<category>"
Print #1, Chr(9) + "<id>15</id>"
Print #1, Chr(9) + "<parentId>1</parentId>"
Print #1, Chr(9) + "<name>Спортивные футболки тениски</name>"
Print #1, Chr(9) + "</category>"
Print #1, Chr(9) + "</categories>"
Print #1, Chr(9) + "<items>"
Do Until IsEmpty(ActiveCell)
Print #1, Chr(9) + Chr(9) + "<item>"
Print #1, triTab + "<id>" + Sheets(1).Cells(ActiveCell.Row, 1) + "</id>"
Print #1, triTab + "<categoryId>" + CStr(Sheets(1).Cells(ActiveCell.Row, 2)) + "</categoryId>"
Print #1, triTab + "<group_id>" + CStr(Sheets(1).Cells(ActiveCell.Row, 3)) + "</group_id>"
Print #1, triTab + "<code>" + CStr(Sheets(1).Cells(ActiveCell.Row, 4)) + "</code>"
Print #1, triTab + "<vendor>" + CStr(Sheets(1).Cells(ActiveCell.Row, 5)) + "</vendor>"
Print #1, triTab + "<name>" + CStr(Sheets(1).Cells(ActiveCell.Row, 6)) + "</name>"
Print #1, triTab + "<nadescriptionme>" + CStr(Sheets(1).Cells(ActiveCell.Row, 7)) + "</description>"
Print #1, Chr(9) + Chr(9) + "</item>"
' Перемещение на 1 строку ниже текущего местонахождения.
ActiveCell.Offset(1, 0).Select
Loop
Print #1, Chr(9) + "</items>"
Print #1, "</price>"
Close #1
MsgBox "Вывод в файл закончен"
End Sub
-
Alex Kostev
5 мая 2015
Спасибо огромное за внимание и беспокойство. Уже просто отдал другому человеку пол часа назад. Еще раз извините за потраченное время.
Актуальные фриланс-проекты в категории Базы данных и SQL
-
Не указан
Senior AI Systems Architect (Project Lead) Needed to Complete an Existing Unfinished Global Service
Разработка игр 17 ставок 11:47
-
Не указан
Разработка CRM-модуля «Обращения» в кастомной 1С (шинный центр)
Управление клиентами и CRM 19 ставок 31 июля
-
1000 UAH
Поддержка Самотура и серверов под него
17 ставок 27 июля
-
8000 UAH
Чистка базы клиентов в SIMLA CRM: телефоны, дубликаты, города
Управление клиентами и CRM 42 ставки 27 июля
-
Не указан
Система записи клиентов и подтверждения визитов (MVP)
Веб-программирование 162 ставки 10 июля