' 函数功能：js提示框
' 参    数：strurl:点击确定后返回到的页面地址
'           strmsg:对话框的提示信息 
'----------------------------------------------------------------------
function funmsg(strurl,strmsg)
response.write "<script language='javascript'>"&_
  vbcrlf&"alert("""&strmsg&""");"&_
  vbcrlf&"window.location="""&strurl&""";"&_
  vbcrlf&"</script>"
end function