home *** CD-ROM | disk | FTP | other *** search
/ Internet Pratica / IPRAT_01.iso / ASP / ASPFusion_Basic_Suite / examples / asp / advhttp / act_post_http.asp < prev    next >
Encoding:
Text File  |  2001-04-17  |  829 b   |  32 lines
  1. <%
  2.     Response.Buffer = true
  3. %>
  4. <html>
  5. <head>
  6.     <title>AdvHTTP Component (Post Method)</title>
  7. </head>
  8. <body>
  9. <%
  10.     'please use any file uploading component here to upload file
  11.     '
  12.     'Dim obj
  13.     'Set obj = Server.CreateObject("AdvFile.File")' any upload component
  14.     'obj.Upload("c:\temp")
  15.     'if (obj.IsError) then
  16.     '    Response.Write obj.ErrorReason
  17.     'else
  18.     '    Response.Write obj.Count & " file(s) uploaded."
  19.     'end if
  20.     
  21.     'Response.Write "<br>" & obj.Form("FirstFormField") 
  22.     'Response.Write "<br>" & obj.Form("SecondFormField")
  23.  
  24.     'Response.Write "<br>" & Request.Form("FirstFormField") 
  25.     'Response.Write "<br>" & Request.Form("SecondFormField")
  26.     
  27.     'Response.Write "<br>" & Request.QueryString("FirstURLField") 
  28.     'Response.Write "<br>" & Request.QueryString("SecondURLField")
  29. %>
  30. </body>
  31. </html>
  32.