My Little Scripts - params.asp

Scripts.com - Get the best scripts NOW!
HotScripts.com - Over 10 web rings.
more links...

Index News Samples Downloads E-Mail me Forum Sign Up

PARAMS.ASP

These are the ASP and ASP.NET versions of params.php. The function is not as necessary in ASP as it is in PHP, but it makes translating my scripts an easier task.

<%
function param(Name)
         param = ""

         if Request.Cookies(Name) <> "" then
            param = Request.Cookies(Name)
         end if

         if Request.Form(Name) <> "" then
            param = Request.Form(Name)
         end if

         if Request.QueryString(Name) <> "" then
            param = Request.QueryString(Name)
         end if
end function
%>

<script language="VB" runat="server">
Function param(ByVal Name As String) As String
         param = ""

         If IsNothing(Request.Cookies(Name)) = False Then
            param = Request.Cookies(Name).Value
         End If

         If Request.Form(Name) <> "" Then
            param = Request.Form(Name)
         End If

         If Request.QueryString(Name) <> "" Then
            param = Request.QueryString(Name)
         End If
End Function
</script>