ASP information prompts the function and returns or turns

Sometimes when we write an asp, we need to give users some feedback information. This custom return information function is very convenient for everyone to use.

 '*********************'Subprogram name: Information prompt window' Function: Information prompt, and return or turn' Parameter: 'str prompt String 'stype Processing type: Back Return GoUrl Turn Close 'url Turning Direction'***************************Sub MsgBox(str,stype,url ) response.write <script language=javascript> response.write alert('&str&'); select case pattern case Back response.write history.go(-1); case GoUrl response.write window.location='&url&' case Close response.write window.close() end select response.write </script>End Sub

I won't talk about the specific usage method, it's very simple