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

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

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

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

Да вы не обижайтесь, работа судя по репам проделана немалая. Если вы все это последовательно сами написали, то только плюс! В остальном то уж точно разберетесь. Имел в виду ,что на js можно из аксесса дернуть данные покороче.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.08.2019, 21:41
    #39856027
Сергей Лалов
Сергей Лалов
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Access HTTP сервер
Вот можете посмотреть, я около 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
| Ответить | Цитировать | Написать  
03.09.2019, 00:12
    #39856463
Nebo
Nebo
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Access HTTP сервер
vklpt,

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

За топик Спасибо!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.09.2019, 01:13
    #39856468
vklpt
vklpt
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Access HTTP сервер
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, 02:45
    #39856469
Nebo
Nebo
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Access HTTP сервер
vklpt,

Спасибо ) Как я и предполагал, что решение длинное.
Когда же мы дождёмся от Майкрософт, чтобы источником данных формы был аутентичный JSON ? )
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Access HTTP сервер / 15 сообщений из 15, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 458ms
Закрыть
start [/forum/topic.php?fid=45&tablet=1&tid=1610504]:
 0ms
get settings:
 10ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 42ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 54ms
get tp. blocked users:
 1ms
others: 317ms
total:  458ms
x
x
Закрыть


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