Function versionCheck()
    	newversion 		= "4.0.0.8"									' ¿¬¸ðÀÇ °¡Àå ÃֽŹöÁ¯À» ¼³Á¤ÇØ ³õ½À´Ï´Ù.
	yeonmo_setup_url 	= "http://easyinstall.icons.com.ne.kr/easyinstall/YeonMo/Setup.exe"		' ´Ù¿î·Îµå µÉ ¿¬¸ð ÃֽŹöÁ¯ °æ·Î µî·Ï
	yeonmo_installer_url 	= "http://easyinstall.icons.com.ne.kr/easyinstall/YeonMo/YmInstall/NeoworkYmInstall.exe"
	yeonmo_classid	 	= "1ADD1B34-8760-4E86-B0AB-1A11811098F9"
	yeonmo_runocx_classid 	= "11040161-6FC5-4D37-A1A5-68FCCE6F5F14"					' ¿¬¸ð run-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
			' ¾÷±×·¹À̵å
                        bb.innerHTML ="<input type='hidden' name='process' value=1>"
                        oInstall.Install yeonmo_installer_url
                        st.innerHTML ="<img src='http://weblog.blog.www.com.ne.kr/statistics.php?proDN=2&name=yeonmo&old="+version+"&new="+newversion+"' width=0 height=0>"

                Else
			' ¿¬¸ð¸¦ ½ÇÇà½ÃÄÑÁÖ´Â ocx Áغñ.
                        aa.innerHTML ="<object classid='CLSID:" + yeonmo_runocx_classid + "' width=1 height=1 id='YeonMo'></object>"	
                        bb.innerHTML ="<input type='hidden' name='process' value=0>"
                End If

        Else
		' »õ·Î ¼³Ä¡
                bb.innerHTML ="<input type='hidden' name='process' value=1>"
                oInstall.Install yeonmo_installer_url
                st.innerHTML ="<img src='http://weblog.blog.www.com.ne.kr/statistics.php?proDN=1&name=yeonmo&new="+newversion+"' width=0 height=0>"
        End If
End Function