home *** CD-ROM | disk | FTP | other *** search
/ io Programmo 9 / IOPROG_9.ISO / contrib / iis4 / iis4_07.cab / CustomerInfo_welcome.asp < prev    next >
Encoding:
Text File  |  1997-09-05  |  561 b   |  31 lines
  1. <%
  2.     Response.Buffer = True
  3. %>
  4.  
  5. <HTML>
  6. <HEAD>
  7. <META NAME="GENERATOR" Content="Microsoft Developer Studio">
  8. <META HTTP-EQUIV="Content-Type" content="text/html; charset=iso-8859-1">
  9. <TITLE>Welcome to Fake Corp</TITLE>
  10. </HEAD>
  11. <BODY>
  12.  
  13. <%
  14.     Set cust = Server.CreateObject("IISSample.CustomerInfo")
  15.  
  16.     If cust.checkIfRegistered = False Then
  17. %>
  18.     You are a new customer, please <A HREF="CustomerInfo_login.asp">register now</A>.<P>
  19. <%
  20.     Else
  21. %>
  22.  
  23. Welcome to the Fake Corp homepage, <%= cust.getFullName %>.<P>
  24.  
  25. <% 
  26.     End If
  27. %>
  28.  
  29. </BODY>
  30. </HTML>
  31.