Função em ASP para calcular o Cosseno Hiperbolico:

<%
'====================================================================================
' (Public)Math_CosH(x)
' Retorna o Cos-seno hiperbolico de X
' Desenvolvedor : Diego Rodrigues Pizarro / library_asp@yahoo.com.br
' ====================================================================================
Function Math_CosH(ByVal x)
    e = 2.71828182845905
    If Not IsNumeric(no) Then
        Math_CosH = False : Exit Function
    End If
    Math_CosH = ((e^x)-(e^(-x)))/2
End Function
%>