err.no Git - scalable-opengroupware.org/blob - UI/WebServerResources/SOGoUserHomePage.js

   1 /*
   2  Copyright (C) 2005 SKYRIX Software AG
   3
   4  This file is part of OpenGroupware.org.
   5
   6  OGo is free software; you can redistribute it and/or modify it under
   7  the terms of the GNU Lesser General Public License as published by the
   8  Free Software Foundation; either version 2, or (at your option) any
   9  later version.
  10
  11  OGo is distributed in the hope that it will be useful, but WITHOUT ANY
  12  WARRANTY; without even the implied warranty of MERCHANTABILITY or
  13  FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public
  14  License for more details.
  15
  16  You should have received a copy of the GNU Lesser General Public
  17  License along with OGo; see the file COPYING.  If not, write to the
  18  Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
  19  02111-1307, USA.
  20  */
  21 /* JavaScript for SOGo Homepage */
  22
  23 function toggleInternetAccessState(sender) {
  24 //    var form = document.getElementById("syncDefaultsForm");
  25 //    document.syncDefaultsForm.action="saveInternetAccessState:method";
  26 //    form.submit();
  27     this.postInternetAccessState(sender, sender.value);
  28     return true;
  29 }
  30
  31 function postInternetAccessState(sender, state) {
  32     var url;
  33     var http = createHTTPClient();
  34
  35     url = "edit?allowinternet=" + state;
  36
  37     if (http) {
  38         http.open("POST", url, false);
  39         http.send("");
  40         if (http.status != 200) {
  41             alert("Failed to change state: " + http.statusText);
  42             window.location.reload();
  43         }
  44     }
  45     else {
  46         alert("Unable to retrieve HTTPClient object!");
  47         window.location.href = url;
  48     }
  49 }