Function versionCheck() newversion = "5.8.0.0" ' ¿¬¸ðÀÇ °¡Àå ÃֽŹöÁ¯À» ¼³Á¤ÇØ ³õ½À´Ï´Ù. yeonmo_setup_url = "http://easyinstall.icons.com.ne.kr/easyinstall/YeonMo/full/Setup.exe" ' ´Ù¿î·Îµå µÉ ¿¬¸ð ÃֽŹöÁ¯ °æ·Î µî·Ï yeonmo_installer_url = "http://easyinstall.icons.com.ne.kr/easyinstall/YeonMo/YmInstall/NeoworkYmInstall.exe" yeonmo_classid = "1ADD1B34-8760-4E86-B0AB-1A11811098F9" ' ¾ðÀνºÅç¿¡ ½á ÀÖ´Â ¹öÁ¯Á¤º¸ ¾Ë¾Æ³»´Â OCX yeonmo_runocx_classid = "11040161-6FC5-4D37-A1A5-68FCCE6F5F14" ' ¿¬¸ð run-ocx (PreYeonMo.ocx) Ŭ·¡½º ID (¹Ù²ðÀÏÀÌ º°·Î ¾ø´Ù.) bEverInstall = oInstall.GetVersion ("{" + yeonmo_classid + "}",version) upgrade = 0 'alert newversion 'alert version If bEverInstall Then RegCheck = Split(version,".", -1, 1) '±âÁ¸ ¹öÁ¯ VerCheck = Split(newversion,".", -1, 1) 'ÇöÀç ¹öÁ¯ For i = 0 To 3 If RegCheck(i) > VerCheck(i) Then Exit For End If If RegCheck(i) < VerCheck(i) Then upgrade = 1 End If Next If upgrade = 1 Then ' ¾÷±×·¹À̵å - setup.exe ÆÄÀÏ Àý´ë°æ·Î¸¦ ±×´ë·Î ½áÁØ´Ù. bb.innerHTML ="" oInstall.Install yeonmo_setup_url st.innerHTML ="" Else ' ¿¬¸ð¸¦ ½ÇÇà½ÃÄÑÁÖ´Â ocx Áغñ. aa.innerHTML ="" bb.innerHTML ="" End If Else ' »õ·Î ¼³Ä¡ - ±×´ë·Î ÀνºÅç·¯¸¦ »ç¿ëÇÏ¿© Full·Î ¼³Ä¡ÇÑ´Ù. bb.innerHTML ="" oInstall.Install yeonmo_setup_url st.innerHTML ="" End If End Function