ghtaz2010
سه شنبه 27 خرداد 1393, 11:18 صبح
با سلام خدمت دوستان
بنده در حال نوشتن کدی در محیط کنسول هستم که با رویدادهایی مانند logoff و logon در ویندوز پیامی رو می نویسه ، کد بنده بصورت زیره، مشکلی که هست اینه که این کد هنگامی که برنامه رو از طریق ویژوال استادیو اجرا می کنم کار می کنه ولی وقتی فایل exe رو اجرا می کنم عملی انجام نمیده. ممنون میشم کمکم کنید:
Module MainModule
Sub Main()
AddHandler Microsoft.Win32.SystemEvents.SessionSwitch, AddressOf pmc
Console.ReadLine()
End Sub
Public Sub pmc(sender As Object, e As Microsoft.Win32.SessionSwitchEventArgs)
If e.Reason = Microsoft.Win32.SessionSwitchReason.SessionLock Then
Console.WriteLine("--------------------Locked----------------------")
ElseIf e.Reason = Microsoft.Win32.SessionSwitchReason.SessionUnlock Then
Console.WriteLine("--------------------UnLocked----------------------")
ElseIf e.Reason = Microsoft.Win32.SessionSwitchReason.SessionLogoff Then
Console.WriteLine("--------------------Logoff----------------------")
ElseIf e.Reason = Microsoft.Win32.SessionSwitchReason.ConsoleConnect Then
Console.WriteLine("--------------------Console connect----------------------")
End If
End Sub
بنده در حال نوشتن کدی در محیط کنسول هستم که با رویدادهایی مانند logoff و logon در ویندوز پیامی رو می نویسه ، کد بنده بصورت زیره، مشکلی که هست اینه که این کد هنگامی که برنامه رو از طریق ویژوال استادیو اجرا می کنم کار می کنه ولی وقتی فایل exe رو اجرا می کنم عملی انجام نمیده. ممنون میشم کمکم کنید:
Module MainModule
Sub Main()
AddHandler Microsoft.Win32.SystemEvents.SessionSwitch, AddressOf pmc
Console.ReadLine()
End Sub
Public Sub pmc(sender As Object, e As Microsoft.Win32.SessionSwitchEventArgs)
If e.Reason = Microsoft.Win32.SessionSwitchReason.SessionLock Then
Console.WriteLine("--------------------Locked----------------------")
ElseIf e.Reason = Microsoft.Win32.SessionSwitchReason.SessionUnlock Then
Console.WriteLine("--------------------UnLocked----------------------")
ElseIf e.Reason = Microsoft.Win32.SessionSwitchReason.SessionLogoff Then
Console.WriteLine("--------------------Logoff----------------------")
ElseIf e.Reason = Microsoft.Win32.SessionSwitchReason.ConsoleConnect Then
Console.WriteLine("--------------------Console connect----------------------")
End If
End Sub