home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 February / CHIPCD_02_2002.iso / Internet / Macromedia ColdFusion Server 5 / coldfusion-50-win-us.exe / data1.cab / Examples / CFDOCS / snippets / cos.cfm < prev    next >
Encoding:
Text File  |  2001-06-13  |  841 b   |  41 lines
  1. <!--- This snippet shows how to use Cos --->
  2.  
  3. <HTML>
  4.  
  5. <HEAD>
  6. <TITLE>
  7. Cos Example
  8. </TITLE>
  9. </HEAD>
  10.  
  11. <BASEFONT FACE="Arial, Helvetica" SIZE=2>
  12. <BODY  bgcolor="#FFFFD5">
  13.  
  14. <H3>Cos Example</H3>
  15.  
  16. <!--- output its Cos value --->
  17. <CFIF IsDefined("form.CosNum")>
  18.  
  19.     <CFIF IsNumeric(form.CosNum)>
  20.         Cos(<CFOUTPUT>#form.CosNum#</CFOUTPUT>) = <CFOUTPUT>#Cos(form.cosNum)# radians = #Evaluate(Cos(form.cosNum) * 180/PI())# Degrees</CFOUTPUT>
  21.     <CFELSE>
  22. <!--- if it is empty, output an error message --->
  23.         <H4>Please enter a number between -1 and 1</H4>
  24.     </CFIF>
  25. </CFIF>
  26.  
  27.  
  28.  
  29. <FORM ACTION="cos.cfm" METHOD="POST">
  30. <P>Type in a number to get its cosine in Radians and Degrees
  31. <BR><INPUT TYPE="Text" NAME="cosNum" SIZE="25">
  32.  
  33. <P><INPUT TYPE="Submit" NAME=""> <INPUT TYPE="RESET">
  34.  
  35. </FORM>
  36.  
  37. </BODY>
  38.  
  39. </HTML>       
  40.      
  41.