ReSQL.ru
     
powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Access HTTP сервер
15 сообщений из 15, страница 1 из 1
Access HTTP сервер
    #39855610
vklpt
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vklpt
Гость
Ссылка на русском: https://vikilpet.wordpress.com/2019/08/29/ms-access-http-server/
Код на гитхабе: https://github.com/vikilpet/MS-Access-HTTP-Server
Краткое описание: простое добавление или получение данных из базы Access с помощью HTTP запросов:



Формат выходных данных: JSON, CSV. Баз может быть сколько угодно.

Можно сделать в виде exe файла, но антивирусы такое не любят, да и зависимостей немного.
...
Рейтинг: 0 / 0
30.08.2019, 12:41
| Ответить | Цитировать | Написать  
Access HTTP сервер
    #39855749
ИВП
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ИВП
Участник
vklpt,
очень интересно.
Жду продолжения.
...
Рейтинг: 0 / 0
30.08.2019, 16:18
| Ответить | Цитировать | Написать  
Access HTTP сервер
    #39855756
vklpt
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vklpt
Гость
ИВП, не понял, какого продолжения вы ждёте?
...
Рейтинг: 0 / 0
30.08.2019, 16:22
| Ответить | Цитировать | Написать  
Access HTTP сервер
    #39855763
ИВП
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ИВП
Участник
vklpt, к чему весь топик?
...
Рейтинг: 0 / 0
30.08.2019, 16:49
| Ответить | Цитировать | Написать  
Access HTTP сервер
    #39855769
vklpt
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vklpt
Гость
ИВП, к тому, что кому надо - берёт и пользуется.
...
Рейтинг: 0 / 0
30.08.2019, 17:01
| Ответить | Цитировать | Написать  
Access HTTP сервер
    #39855770
ИВП
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ИВП
Участник
vklpt,
так и надо так написать!!!
...
Рейтинг: 0 / 0
30.08.2019, 17:03
| Ответить | Цитировать | Написать  
Access HTTP сервер
    #39855913
DarkMan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DarkMan
Участник
vklptИВП, к тому, что кому надо - берёт и пользуется.
Спасибо. Но ничего нового Вы не предложили.
Все это здесь уже обсуждалось. И не для кого не является секретом.
И даже давали ссылки на готовые программы , вроде как PHP Runner , если не ошибаюсь.
А те кто кто хоть немного владеет PHP , HTML , CSS и JavaScript могут и сами с успехом создавать свои программы .
К тому же сейчас имеется множество фреймворков , один из популярных Laravel например . :))
...
Рейтинг: 0 / 0
31.08.2019, 08:15
| Ответить | Цитировать | Написать  
Access HTTP сервер
    #39856007
Фотография Сергей Лалов
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сергей Лалов
Участник
vklpt,

Что уникального в данном примере? Есть два пути , которые короче,чем у вас на гите в репозитории раз в 10. Можно при помощи VBS гораздо меньшими усилиями отрисовывать редактируемую таблицу из MS Access в формате веб страницы. Второй вариант тоже достаточно прост - использовать Jquery-jtable + odbc (который в 98% уже встроен на комп , где крутиться аксесс)
...
Рейтинг: 0 / 0
31.08.2019, 19:49
| Ответить | Цитировать | Написать  
Access HTTP сервер
    #39856011
vklpt
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vklpt
Гость
Сергей Лалов, вы толком и описание не прочитали, и даже не понимаете, что если база будет на другом компьютере - то с VBS вы далеко не уйдёте, а уж про меньшие усилия в убогом VBS и говорить не стоит.

Ну в общем как обычно: выложил на иностранный форум - сказали "спасибо", выложил на русском - "ниачом", "не нужно" — классика :D
...
Рейтинг: 0 / 0
31.08.2019, 20:29
| Ответить | Цитировать | Написать  
Access HTTP сервер
    #39856025
Фотография Сергей Лалов
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сергей Лалов
Участник
vklptСергей Лалов, вы толком и описание не прочитали, и даже не понимаете, что если база будет на другом компьютере - то с VBS вы далеко не уйдёте, а уж про меньшие усилия в убогом VBS и говорить не стоит.

Ну в общем как обычно: выложил на иностранный форум - сказали "спасибо", выложил на русском - "ниачом", "не нужно" — классика :D

Да вы не обижайтесь, работа судя по репам проделана немалая. Если вы все это последовательно сами написали, то только плюс! В остальном то уж точно разберетесь. Имел в виду ,что на js можно из аксесса дернуть данные покороче.
...
Рейтинг: 0 / 0
31.08.2019, 21:36
| Ответить | Цитировать | Написать  
Access HTTP сервер
    #39856027
Фотография Сергей Лалов
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сергей Лалов
Участник
Вот можете посмотреть, я около 9 лет назад пробовал подключаться из js к аксессу. Все нормально работает.
Терпения правда хватило на тот момент только на SELECT ) Код рабочий. Отрисовывает таблицу на странице.

Код: javascript
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
58.
59.
60.
61.
62.
63.
64.
65.
66.
67.
68.
69.
70.
71.
72.
73.
74.
75.
76.
77.
<html>
     <head>
    
   <script type="text/javascript">
   <!--
    var adOpenDynamic = 2;
   var adLockOptimistic = 3;
    
    /* Path of database.
     */
   var strDbPath = "C:\Documents and Settings\slalov\Рабочий стол\testado.mdb";
   
   
    var conn_str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + strDbPath;
   
     function getAdoDb(strAdoType){
      if (window.ActiveXObject){
           return new ActiveXObject(strAdoType);
       }
      else{
           return ActiveXObject(strAdoType);
      }
     }
    
    function showReports(){
       try{
          var strHtml ="";
          strHtml += "<table cellpadding=0 cellspacing=0 border=1 width= '100%' align=center>";
           strHtml += "<tr ><td align=center colspan=4><b>Sample Database Records</b></td></tr>";
   
               //Database Connection
          var conn = getAdoDb("ADODB.Connection");
          conn.open(conn_str, "",   "");
    
          //Recordset
         var rs = new ActiveXObject("ADODB.Recordset");
       
          strQuery = "SELECT users.FirstName, users.LastName, users.Age,  FROM users";
          rs.open(strQuery, conn, adOpenDynamic, adLockOptimistic);
    
          if(!rs.bof){
             rs.MoveFirst();
            while(!rs.eof) {
                strHtml += "<tr>";
               strHtml += " <td><Font face ='tahoma'>" + rs.fields(0).value + "</font></td>";
                strHtml += " <td><Font face ='tahoma'>" + rs.fields(1).value + "</font></td>";
                strHtml += " <td><Font face ='tahoma'>" + rs.fields(2).value + "</font></td>";
                strHtml += "</tr>";
    
               rs.MoveNext();
             }
          }
          else{
            //No Records.
           strHtml += "<tr colspan=4><td align=center><font color=red>No Records.</font></td></tr>";
         }
          conn.close();
              strHtml += "</table>";
             document.write(strHtml);
       }catch(ex){
         alert(ex.message);
       }
     }
    
    //-->
     </script>
     <title>Call Log Details</title>
     </head>
    
     <!--<body onload="show_menu()">
       <div id="main" />-->
     <body>
       <script language="JavaScript">
        showReports();
   </script>
    </body>
     </html>
...
Рейтинг: 0 / 0
31.08.2019, 21:41
| Ответить | Цитировать | Написать  
Access HTTP сервер
    #39856463
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Nebo
Участник
vklpt,

вот Вы мне скажите, как наоборот, сделать JSON, полученный от сервера, источником данных табличной формы ) ?
...
Рейтинг: 0 / 0
03.09.2019, 00:12
| Ответить | Цитировать | Написать  
Access HTTP сервер
    #39856464
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Nebo
Участник
vklpt,

За топик Спасибо!
...
Рейтинг: 0 / 0
03.09.2019, 00:12
| Ответить | Цитировать | Написать  
Access HTTP сервер
    #39856468
vklpt
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vklpt
Гость
Nebo, либо преобразовать в CSV-файл, в гугле есть какие-то решения вроде этого:
https://github.com/VBA-tools/VBA-JSON
а к нему подключаться в запросе через DSN или импортировать в таблицу, либо узнать у админа сервера, может можно ли получать в HTML формате, потому что для него есть родной Microsoft HTML Object Library.

Ну или делать питоновскую прокладку в 10 строчек, т.к. и для csv и для json есть стандартные модули:
https://stackoverflow.com/questions/1871524/how-can-i-convert-json-to-csv
...
Рейтинг: 0 / 0
03.09.2019, 01:13
| Ответить | Цитировать | Написать  
Access HTTP сервер
    #39856469
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Nebo
Участник
vklpt,

Спасибо ) Как я и предполагал, что решение длинное.
Когда же мы дождёмся от Майкрософт, чтобы источником данных формы был аутентичный JSON ? )
...
Рейтинг: 0 / 0
03.09.2019, 02:45
| Ответить | Цитировать | Написать  
15 сообщений из 15, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Access HTTP сервер
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=39855749&tid=1610504]:
 0ms
get settings:
 8ms
get forum list:
 12ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 37ms
get topic data:
 10ms
get forum data:
 3ms
get page messages:
 44ms
get tp. blocked users:
 1ms
others: 13ms
total:  134ms
созд. / загр.: 134ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]