*************************************
1. common.asp
*************************************

	------------------------------------------------------------------------------------------
	a. Dim AuthArray ¼±¾ð ºÎºÐÀ» ã¾Æ¼­ ¹è¿­ »çÀÌÁ ¾Æ·¡¿Í °°ÀÌ º¯°æ	
	------------------------------------------------------------------------------------------
	  Dim AuthArray(100)
		

	------------------------------------------------------------------------------------------
	b. ¾Æ·¡ÀÇ ÇÔ¼ö¸¦ Ãß°¡ 
	------------------------------------------------------------------------------------------
	  ÷ºÎ ÆÄÀÏ common_add.aspÀÇ ³»¿ëÀ» common.asp¿¡ copy ÇÑ´Ù.

	------------------------------------------------------------------------------------------
	c. ÇÔ¼ö Á¤º¸ º¯°æ
	------------------------------------------------------------------------------------------
	Function DisplayServerName(svrId)
		Dim i, arrList
		i = 0	
		arrList = GetServerList()

		IF IsNumeric(svrId) = False THEN
			svrId = Request("server")
		END IF


		IF LEN(svrId) > 0 THEN
			For i = LBound(arrList, 2) To UBound(arrList, 2)
				If CLng (arrList(0, i)) = CLng( svrId ) Then
					DisplayServerName = arrList(1, i)
					Exit For
				End If
			Next
		    
			IF LEN(TRIM(DisplayServerName)) = 0  THEN
				DisplayServerName = svrId
			END IF
		    
		ELSE
		   DisplayServerName = svrId
		END IF

	End Function
	
	'¼­¹ö À̸§ °¡Á®¿À±â
	Function DisplayAdminServerName(svrId)
		Dim i
		Dim arrList
		
		'response.Write svrId
		IF TRIM(svrId) = ""  OR ISNULL(svrId) THEN
		    
			DisplayAdminServerName = ""
		    
		ELSE 

			arrList = GetAdminServerList()
	    			
			For i = LBound(arrList, 2) To UBound(arrList, 2)
				If CINT(arrList(0, i)) = CINT(svrId) Then
					DisplayAdminServerName = arrList(1, i)
					Exit For
				End If
			Next
		
		END IF	
		
	End Function	
	
2. /images/	
	icon_arrow01_title.gif
	colors.jpg
3. noneclient.asp	
4. menu.asp
5. /itemmall,/ordermange
6. etc file