<SCRIPT RUNAT=SERVER LANGUAGE=VBScript>
function show_book_state(book_state)
	dim strBook_state
	select case book_state
	case 0:
		strBook_state="·ñ"
	case 1:
		strBook_state="ÊÇ"
	end select
	show_book_state=strBook_state
end function

function show_borrow_state(book_state)
	dim strBook_state	
	select case book_state
	case 0:
		strBook_state="ÒÑ¹é»¹"
	case 1:
		strBook_state="½è³ö"
	end select
	show_borrow_state=strBook_state
end function
</SCRIPT>