if (_tcsicmp(argv[1], _T("-Uninstall")) == 0)
      {
         //Uninstall this Windows Service using InstallUtil.exe
         array<String^>^ myargs = System::Environment::GetCommandLineArgs();
         array<String^>^ args = gcnew array<String^>(myargs->Length);

         args[0] = L"-u";
         args[1] = (myargs[0]);

         AppDomain^ dom = AppDomain::CreateDomain(L"execDom");
         Type^ type = System::Object::typeid;
         String^ path = type->Assembly->Location;
         StringBuilder^ sb = gcnew StringBuilder(path->Substring(0, path->LastIndexOf(L"\\")));
         sb->Append(L"\\InstallUtil.exe");
         Evidence^ evidence = gcnew Evidence();
         dom->ExecuteAssembly(sb->ToString(), evidence, args);
      }

using namespace System::Threading;
      
Thread^      sThread;
      virtual void OnStart(array<String^>^ args) override
      {
         //start loop thread
         ThreadStart^ tDelegate = gcnew ThreadStart(this, &SymonSystemStatusWinService::mainLoop);
         sThread = gcnew Thread( tDelegate );
         sThread->Start();
      }
      void mainLoop(){
         sleepTime = 10000;   //10 second
         stopping = false;
         while(!stopping){
            sThread->Sleep(sleepTime);
         }
      }

using namespace System::Diagnostics;
      void writeEvent(String^ _log, String^ _event, String^ _source){
         if(!EventLog::SourceExists(_source))
            EventLog::CreateEventSource(_source, _log);
         EventLog^ el = gcnew EventLog;
         el->Source = _source;
         el->WriteEntry(_event);
      }

using namespace System::Diagnostics;

      virtual void OnStart(array<String^>^ args) override
      {
         //log service start
         Debug::WriteLine(L"Starting service");
      }