ASP 경고창

유용한 함수들 중 하나.

function AlertHistoryBack(message)
AlertHistoryBack="<SCRIPT LANGUAGE=javaScript>" &_
      "alert('" & message & "');" &_
      "history.back();" &_
      "</SCRIPT>"
End function

function GotoHistoryBack()
GotoHistoryBack="<SCRIPT LANGUAGE=javaScript>" &_
      "history.back();" &_
      "</SCRIPT>"
End function

function GotoUrl(url)
GotoUrl="<SCRIPT LANGUAGE=javaScript>" &_
      "location.href = '"&url&"';" &_
      "</SCRIPT>"
End function
function GototUrl_Reload(url)
GototUrl_Reload="<SCRIPT LANGUAGE=javaScript>" &_
      "location.href = '"&url&"';" &_
      "opener.document.location.reload();" &_
      "</SCRIPT>"
End function

function AlertClose(message)
AlertClose="<SCRIPT LANGUAGE=javaScript>" &_
      "alert('" & message & "');" &_
      "self.close();" &_
      "</SCRIPT>"
End function

function PopClose()
PopClose="<SCRIPT LANGUAGE=javaScript>" &_
      "self.close();" &_
      "</SCRIPT>"
End function

function PopClose_Reload()
PopClose_Reload="<SCRIPT LANGUAGE=javaScript>" &_
                "opener.document.location.reload();" &_
                "self.close();" &_
                "</SCRIPT>"
End Function

function AlertNormal(message)
AlertNormal="<SCRIPT LANGUAGE=javaScript>" &_
    "alert('" & message & "');" &_
    "</SCRIPT>"
End function

Function AlertMove(message, url)
    AlertMove = "<script language='javascript'>"&_
                "alert('"& message &"');"&_
                "location.href = '"& url &"';"&_
                "</script>"
End Function

Function AlertCloseReload(message)
    AlertCloseReload = "<script language='javascript'>"&_
                       "alert('"& message &"');"&_
                       "opener.location.reload();"&_
                       "self.close();"&_
                       "</script>"
End Function