C#

if (IfNewDay)
{
    Active.WriteData();
    Active = new Day();
}

IfNewDay

Member 8075591 wrote:

Active.CurrentS.CurrentM.Add(p);

Public Class Configuration
	Public Class ProgramClass
		Public Property Id() As String
			Get
				Return m_Id
			End Get
			Set
				m_Id = Value
			End Set
		End Property
		Private m_Id As String
		Public Property Name() As String
			Get
				Return m_Name
			End Get
			Set
				m_Name = Value
			End Set
		End Property
		Private m_Name As String
		Public Property DefaultCurrency() As String
			Get
				Return m_DefaultCurrency
			End Get
			Set
				m_DefaultCurrency = Value
			End Set
		End Property
		Private m_DefaultCurrency As String
	End Class

	Public Class ConnectionClass
		Public Property Provider() As String
			Get
				Return m_Provider
			End Get
			Set
				m_Provider = Value
			End Set
		End Property
		Private m_Provider As String
		Public Property [String]() As String
			Get
				Return m_String
			End Get
			Set
				m_String = Value
			End Set
		End Property
		Private m_String As String
	End Class

	Public Property Connection() As ConnectionClass
		Get
			Return m_Connection
		End Get
		Set
			m_Connection = Value
		End Set
	End Property
	Private m_Connection As ConnectionClass


	Public Property Program() As ProgramClass
		Get
			Return m_Program
		End Get
		Set
			m_Program = Value
		End Set
	End Property
	Private m_Program As ProgramClass


	Protected nav As XPathNavigator = Nothing

	Public Sub New()
		Me.Connection = New ConnectionClass()
		Me.Program = New ProgramClass()
	End Sub

	Public Function Open(providers As ProviderCollection, filename As String) As Boolean
		If Not File.Exists(filename) Then
			Return False
		End If

		Try
			Dim doc As New XmlDocument()
			doc.Load(filename)
			Me.nav = doc.CreateNavigator()


			Return True
		Catch
			Return False
		End Try
	End Function

	Public Overridable Function Read() As Boolean
		Try
			Me.nav = nav.SelectSingleNode("//connection")
			Me.Connection.Provider = Me.nav.GetAttribute("provider", "")
			Me.Connection.[String] = Me.nav.GetAttribute("connection_string", "")

			Me.nav = nav.SelectSingleNode("//program")
			Me.Program.Id = Me.nav.GetAttribute("id", "")
			Me.Program.Name = Me.nav.GetAttribute("name", "")
			Me.Program.DefaultCurrency = Me.nav.GetAttribute("default_currency", "")

			Return True
		Catch
			Return False
		End Try
	End Function
End Class

using System;
using System.ServiceProcess;
using System.Threading;
using System.Windows.Forms;
using System.Diagnostics;
using Microsoft.Win32;
using System.ComponentModel;
using System.Configuration.Install;
using System.Net.Mail;

namespace SimpleServiceCs
{
    public class SimpleService : ServiceBase
    {
        static void Main(string[] args)
        {
            ServiceBase.Run(new SimpleService());
        }

        protected override void OnStart(string[] args)
        {
            EventLog.WriteEntry("SimpleService", "Starting SimpleService");
            new Thread(RunMessagePump).Start();
        }

        void RunMessagePump()
        {
            EventLog.WriteEntry("SimpleService.MessagePump", "Starting SimpleService Message Pump");
            Application.Run(new HiddenForm());
        }

        protected override void OnStop()
        {
            Application.Exit();
        }
    }

    public partial class HiddenForm : Form
    {
        public HiddenForm()
        {
            InitializeComponent();
        }

        private void HiddenForm_Load(object sender, EventArgs e)
        {
            SystemEvents.SessionEnding += new SessionEndingEventHandler(SystemEvents_SessionEnding);
        }

        private void HiddenForm_FormClosing(object sender, FormClosingEventArgs e)
        {
            SystemEvents.SessionEnding -= new SessionEndingEventHandler(SystemEvents_SessionEnding);
        }
//****************************************************************************
//          THIS IS THE PART OF CODE STRANGELY NOT WORKING!?!?
//****************************************************************************

        private void SystemEvents_SessionEnding(object sender, EventArgs e)
        {
            EventLog.WriteEntry("System Logoff or System Shutdown");
            SendEMail("Your System is being Logged Off or Shutdown!");
        }
 
//****************************************************************************
       
        private void SendEmail(string Warning){

        //Here goes all the code necessary for sending e-mails from my personal mail account

        }


    }

    partial class HiddenForm
    {
        private System.ComponentModel.IContainer components = null;

        protected override void Dispose(bool disposing)
        {
            if (disposing && (components != null))
            {
                components.Dispose();
            }
            base.Dispose(disposing);
        }

        private void InitializeComponent()
        {
            this.SuspendLayout();
            this.AutoScaleDimensions = new System.Drawing.SizeF(6F, 13F);
            this.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font;
            this.ClientSize = new System.Drawing.Size(0, 0);
            this.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None;
            this.Name = "HiddenForm";
            this.Text = "HiddenForm";
            this.WindowState = System.Windows.Forms.FormWindowState.Minimized;
            this.Load += new System.EventHandler(this.HiddenForm_Load);
            this.FormClosing += new System.Windows.Forms.FormClosingEventHandler(this.HiddenForm_FormClosing);
            this.ResumeLayout(false);

        }
    }

    [RunInstaller(true)]
    public class SimpleInstaller : Installer
    {
        private ServiceInstaller serviceInstaller;
        private ServiceProcessInstaller processInstaller;

        public SimpleInstaller()
        {
            processInstaller = new ServiceProcessInstaller();
            serviceInstaller = new ServiceInstaller();

            // Service will run under system account
            processInstaller.Account = ServiceAccount.LocalSystem;

            // Service will have Start Type of Manual
            serviceInstaller.StartType = ServiceStartMode.Automatic;

            serviceInstaller.ServiceName = "Simple Service";

            Installers.Add(serviceInstaller);
            Installers.Add(processInstaller);
        }
    }
}