<p>그사이 첫째는  프로세스의 개념 까지는 이해하지 못한것 같지만</p> <p>자력으로 작업관리자에서 종료 시키는 법까지는 터득한듯합니다.</p> <p>일부러 스터디 차원에서 프로그램 명칭을 찾기 쉽게 준것도 있었습니다</p> <p> <br></p> <p>이제 좀비처럼 부활하는 제2의 프로그램을 만듭니다.</p> <p> <br></p> <p> <br></p> <p> </p> <table bgcolor="#ffcccc" cellpadding="1" cellspacing="0" style="border-spacing:0px;color:#333333;font-size:14.5px;border-color:#000000;border-style:solid;width:721.797px;"><tbody><tr><td style="line-height:21.6px;padding:0px;border-style:solid;border-color:#000000;"> <p style="margin-bottom:10px;"> <span style="font-size:12px;"> </span> </p> <p style="margin-bottom:10px;"> </p> <p style="margin-bottom:10px;"> <span style="font-size:12px;"> Public Sub ProcessRun()</span> </p> <p style="margin-bottom:10px;"> <span style="font-size:12px;">        Dim startupPath As String = Environment.GetFolderPath(Environment.SpecialFolder.Startup) ' shell:startup 의 위치 정보를 가저온다.</span> </p> <p style="margin-bottom:10px;"> <span style="font-size:12px;">        Dim chkpro As Process() = Process.GetProcessesByName("프로그램명")</span> </p> <p style="margin-bottom:10px;"> <span style="font-size:12px;">        If chkpro.Length = 0 Then</span> </p> <p style="margin-bottom:10px;"> <span style="font-size:12px;">                Process.Start(startupPath & "\</span><span style="font-size:12px;">프로그램명</span><span style="font-size:12px;">.exe")</span> </p> <p style="margin-bottom:10px;"> <span style="font-size:12px;">        End If</span> </p> <p style="margin-bottom:10px;"> <span style="font-size:12px;">End Sub</span> </p> </td> </tr></tbody></table><p><br class="ch_bogus_spacer"></p> <p>좀비처럼 살아나는 프로그램을 개발완료후 적용 하려 하였으나 첫째는 무력화 방법을 찾았음에도 심야시간 게임을 하지 않고 있습니다.</p> <p> </p> <p>적정수준의 통제가 된다 판단하여 더이상 개발은 당분간 멈출듯 합니다.</p> <p> </p> <p>다시 통제가 되지 않는다면 이젠 쉽게 찾기 어렵게 적용할 것입니다.</p> <p> </p> <p>개발해 보며 생각보다 재미 있었다는건 안비밀!!</p> <p> </p>