ACTIVE SERVER PAGE

ASP 프로그래밍을 하다 보면 자바스크립트 alert 처리하는 부분때문에 시간을 낭비하는 경우가 많습니다.

이럴 경우 메세지만 전달해서 alert 을 사용하면 프로그래밍 시간을 단축할수 있습니다.

아래 소스 처럼요.

	'-----------------ALERT 표시 ---------------------------
	sub Alert(txtmsg)
		txtmsg = replace(txtmsg, "'", "`")
		response.write "<script language='javascript'>"
		response.write "alert('" & txtmsg & "');"
		response.write "</script>"
	end sub

	'-----------------ALERT 표시 후 뒤로 이동---------------
	sub Alert_back(txtmsg)
		txtmsg = replace(txtmsg, "'", "`")
		response.write "<script language='javascript'>"
		response.write "alert('" & txtmsg & "');"
		response.write "history.back ();"
		response.write "</script>"
		response.end
	end sub

	'-----------------ALERT 표시 후 특정 URL 로 이동-----------------
	sub Alert_url(txtmsg, txturl)
		txtmsg = replace(txtmsg, "'", "`")
		response.write "<script language='javascript'>"
		response.write "alert('" & txtmsg & "');"
		response.write "window.location.replace ('" & txturl & "');"
		response.write "</script>"
		response.end
	end sub

	'-----------------ALERT 표시없이 전체윈도우에 대한 특정 URL 로 이동(프레임으로 나누어져 있을때)
	sub Win_link(txturl)
		response.write "<script language='javascript'>"
		response.write "parent.location.replace ('" & txturl & "');"
		response.write "</script>"
		response.end
	end sub

	'----------------- 창 닫기 ----------------------------------
	sub win_close()
		response.write "<script language='javascript'>"
		response.write "window.close();"
		response.write "</script>"
		response.end
	end sub

파일을 include 하신후

Alert "하하하"
Alert_back "하하하"
Alert_url "하하하"
Win_link "하하하","호호호"
win_close()

와 같은 형식으로 사용하시면 됩니다.

즐거운 프로그래밍 되세요.