home *** CD-ROM | disk | FTP | other *** search
/ Internet Pratica / IPRAT_01.iso / ASP / ASPFusion_Basic_Suite / examples / cf / advfile / act_write.cfm < prev    next >
Encoding:
ColdFusion Markup Language  |  2001-03-14  |  568 b   |  22 lines

  1. <html>
  2. <head>
  3.     <title>AdvFile Component</title>
  4. </head>
  5. <body>
  6. <cfobject class="AdvFile.File" action="CREATE" name="AdvFile">
  7. <cfif ParameterExists(Form.NewLine)>
  8.     <cfset AdvFile.AddNewLine = true>
  9. <cfelse>
  10.     <cfset AdvFile.AddNewLine = false>
  11. </cfif>
  12. <cfset AdvFile.Attributes = #Form.Attributes#>
  13. <cfset temp = AdvFile.Write(#Form.Source#, #Form.Data#)>
  14. <cfif #AdvFile.IsError# Eq 1>
  15.     <cfoutput>#AdvFile.ErrorReason#</cfoutput> <br>
  16. <cfelse>
  17.     <cfoutput>Successfully write</cfoutput> <br>
  18. </cfif> 
  19. <a href="dsp_write.htm">Back</a>
  20. </body>
  21. </html>
  22.