<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> 
<!--#include file="Connections/FC.asp" -->
<%
Dim rsFC_Furniture
Dim rsFC_Furniture_numRows

Set rsFC_Furniture = Server.CreateObject("ADODB.Recordset")
rsFC_Furniture.ActiveConnection = MM_FC_STRING
rsFC_Furniture.Source = "SELECT * FROM Furniture"
rsFC_Furniture.CursorType = 0
rsFC_Furniture.CursorLocation = 2
rsFC_Furniture.LockType = 1
rsFC_Furniture.Open()

rsFC_Furniture_numRows = 0
%>
<%
' *** Validate request to log in to this site.
MM_LoginAction = Request.ServerVariables("URL")
If Request.QueryString<>"" Then MM_LoginAction = MM_LoginAction + "?" + Request.QueryString
MM_valUsername=CStr(Request.Form("SignIn_Usr"))
If MM_valUsername <> "" Then
  MM_fldUserAuthorization=""
  MM_redirectLoginSuccess="SignSuccessful.asp"
  MM_redirectLoginFailed="SignNotSuccessful.asp"
  MM_flag="ADODB.Recordset"
  set MM_rsUser = Server.CreateObject(MM_flag)
  MM_rsUser.ActiveConnection = MM_FC_STRING
  MM_rsUser.Source = "SELECT Username, Password"
  If MM_fldUserAuthorization <> "" Then MM_rsUser.Source = MM_rsUser.Source & "," & MM_fldUserAuthorization
  MM_rsUser.Source = MM_rsUser.Source & " FROM OrderLogin WHERE Username='" & Replace(MM_valUsername,"'","''") &"' AND Password='" & Replace(Request.Form("SignIn_Pass"),"'","''") & "'"
  MM_rsUser.CursorType = 0
  MM_rsUser.CursorLocation = 2
  MM_rsUser.LockType = 3
  MM_rsUser.Open
  If Not MM_rsUser.EOF Or Not MM_rsUser.BOF Then 
    ' username and password match - this is a valid user
    Session("MM_Username") = MM_valUsername
    If (MM_fldUserAuthorization <> "") Then
      Session("MM_UserAuthorization") = CStr(MM_rsUser.Fields.Item(MM_fldUserAuthorization).Value)
    Else
      Session("MM_UserAuthorization") = ""
    End If
    if CStr(Request.QueryString("accessdenied")) <> "" And false Then
      MM_redirectLoginSuccess = Request.QueryString("accessdenied")
    End If
    MM_rsUser.Close
    Response.Redirect(MM_redirectLoginSuccess)
  End If
  MM_rsUser.Close
  Response.Redirect(MM_redirectLoginFailed)
End If
%>
<%
'  *** Recordset Stats, Move To Record, and Go To Record: declare stats variables

Dim rsFC_Furniture_total
Dim rsFC_Furniture_first
Dim rsFC_Furniture_last

' set the record count
rsFC_Furniture_total = rsFC_Furniture.RecordCount

' set the number of rows displayed on this page
If (rsFC_Furniture_numRows < 0) Then
  rsFC_Furniture_numRows = rsFC_Furniture_total
Elseif (rsFC_Furniture_numRows = 0) Then
  rsFC_Furniture_numRows = 1
End If

' set the first and last displayed record
rsFC_Furniture_first = 1
rsFC_Furniture_last  = rsFC_Furniture_first + rsFC_Furniture_numRows - 1

' if we have the correct record count, check the other stats
If (rsFC_Furniture_total <> -1) Then
  If (rsFC_Furniture_first > rsFC_Furniture_total) Then
    rsFC_Furniture_first = rsFC_Furniture_total
  End If
  If (rsFC_Furniture_last > rsFC_Furniture_total) Then
    rsFC_Furniture_last = rsFC_Furniture_total
  End If
  If (rsFC_Furniture_numRows > rsFC_Furniture_total) Then
    rsFC_Furniture_numRows = rsFC_Furniture_total
  End If
End If
%>
<%
' *** Recordset Stats: if we don't know the record count, manually count them

If (rsFC_Furniture_total = -1) Then

  ' count the total records by iterating through the recordset
  rsFC_Furniture_total=0
  While (Not rsFC_Furniture.EOF)
    rsFC_Furniture_total = rsFC_Furniture_total + 1
    rsFC_Furniture.MoveNext
  Wend

  ' reset the cursor to the beginning
  If (rsFC_Furniture.CursorType > 0) Then
    rsFC_Furniture.MoveFirst
  Else
    rsFC_Furniture.Requery
  End If

  ' set the number of rows displayed on this page
  If (rsFC_Furniture_numRows < 0 Or rsFC_Furniture_numRows > rsFC_Furniture_total) Then
    rsFC_Furniture_numRows = rsFC_Furniture_total
  End If

  ' set the first and last displayed record
  rsFC_Furniture_first = 1
  rsFC_Furniture_last = rsFC_Furniture_first + rsFC_Furniture_numRows - 1
  
  If (rsFC_Furniture_first > rsFC_Furniture_total) Then
    rsFC_Furniture_first = rsFC_Furniture_total
  End If
  If (rsFC_Furniture_last > rsFC_Furniture_total) Then
    rsFC_Furniture_last = rsFC_Furniture_total
  End If

End If
%>

<%
Dim MM_paramName 
%>
<%
' *** Move To Record and Go To Record: declare variables

Dim MM_rs
Dim MM_rsCount
Dim MM_size
Dim MM_uniqueCol
Dim MM_offset
Dim MM_atTotal
Dim MM_paramIsDefined

Dim MM_param
Dim MM_index

Set MM_rs    = rsFC_Furniture
MM_rsCount   = rsFC_Furniture_total
MM_size      = rsFC_Furniture_numRows
MM_uniqueCol = ""
MM_paramName = ""
MM_offset = 0
MM_atTotal = false
MM_paramIsDefined = false
If (MM_paramName <> "") Then
  MM_paramIsDefined = (Request.QueryString(MM_paramName) <> "")
End If
%>
<%
' *** Move To Record: handle 'index' or 'offset' parameter

if (Not MM_paramIsDefined And MM_rsCount <> 0) then

  ' use index parameter if defined, otherwise use offset parameter
  MM_param = Request.QueryString("index")
  If (MM_param = "") Then
    MM_param = Request.QueryString("offset")
  End If
  If (MM_param <> "") Then
    MM_offset = Int(MM_param)
  End If

  ' if we have a record count, check if we are past the end of the recordset
  If (MM_rsCount <> -1) Then
    If (MM_offset >= MM_rsCount Or MM_offset = -1) Then  ' past end or move last
      If ((MM_rsCount Mod MM_size) > 0) Then         ' last page not a full repeat region
        MM_offset = MM_rsCount - (MM_rsCount Mod MM_size)
      Else
        MM_offset = MM_rsCount - MM_size
      End If
    End If
  End If

  ' move the cursor to the selected record
  MM_index = 0
  While ((Not MM_rs.EOF) And (MM_index < MM_offset Or MM_offset = -1))
    MM_rs.MoveNext
    MM_index = MM_index + 1
  Wend
  If (MM_rs.EOF) Then 
    MM_offset = MM_index  ' set MM_offset to the last possible record
  End If

End If
%>
<%
' *** Move To Record: if we dont know the record count, check the display range

If (MM_rsCount = -1) Then

  ' walk to the end of the display range for this page
  MM_index = MM_offset
  While (Not MM_rs.EOF And (MM_size < 0 Or MM_index < MM_offset + MM_size))
    MM_rs.MoveNext
    MM_index = MM_index + 1
  Wend

  ' if we walked off the end of the recordset, set MM_rsCount and MM_size
  If (MM_rs.EOF) Then
    MM_rsCount = MM_index
    If (MM_size < 0 Or MM_size > MM_rsCount) Then
      MM_size = MM_rsCount
    End If
  End If

  ' if we walked off the end, set the offset based on page size
  If (MM_rs.EOF And Not MM_paramIsDefined) Then
    If (MM_offset > MM_rsCount - MM_size Or MM_offset = -1) Then
      If ((MM_rsCount Mod MM_size) > 0) Then
        MM_offset = MM_rsCount - (MM_rsCount Mod MM_size)
      Else
        MM_offset = MM_rsCount - MM_size
      End If
    End If
  End If

  ' reset the cursor to the beginning
  If (MM_rs.CursorType > 0) Then
    MM_rs.MoveFirst
  Else
    MM_rs.Requery
  End If

  ' move the cursor to the selected record
  MM_index = 0
  While (Not MM_rs.EOF And MM_index < MM_offset)
    MM_rs.MoveNext
    MM_index = MM_index + 1
  Wend
End If
%>
<%
' *** Move To Record: update recordset stats

' set the first and last displayed record
rsFC_Furniture_first = MM_offset + 1
rsFC_Furniture_last  = MM_offset + MM_size

If (MM_rsCount <> -1) Then
  If (rsFC_Furniture_first > MM_rsCount) Then
    rsFC_Furniture_first = MM_rsCount
  End If
  If (rsFC_Furniture_last > MM_rsCount) Then
    rsFC_Furniture_last = MM_rsCount
  End If
End If

' set the boolean used by hide region to check if we are on the last record
MM_atTotal = (MM_rsCount <> -1 And MM_offset + MM_size >= MM_rsCount)
%>
<%
' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters

Dim MM_keepNone
Dim MM_keepURL
Dim MM_keepForm
Dim MM_keepBoth

Dim MM_removeList
Dim MM_item
Dim MM_nextItem

' create the list of parameters which should not be maintained
MM_removeList = "&index="
If (MM_paramName <> "") Then
  MM_removeList = MM_removeList & "&" & MM_paramName & "="
End If

MM_keepURL=""
MM_keepForm=""
MM_keepBoth=""
MM_keepNone=""

' add the URL parameters to the MM_keepURL string
For Each MM_item In Request.QueryString
  MM_nextItem = "&" & MM_item & "="
  If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then
    MM_keepURL = MM_keepURL & MM_nextItem & Server.URLencode(Request.QueryString(MM_item))
  End If
Next

' add the Form variables to the MM_keepForm string
For Each MM_item In Request.Form
  MM_nextItem = "&" & MM_item & "="
  If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then
    MM_keepForm = MM_keepForm & MM_nextItem & Server.URLencode(Request.Form(MM_item))
  End If
Next

' create the Form + URL string and remove the intial '&' from each of the strings
MM_keepBoth = MM_keepURL & MM_keepForm
If (MM_keepBoth <> "") Then 
  MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1)
End If
If (MM_keepURL <> "")  Then
  MM_keepURL  = Right(MM_keepURL, Len(MM_keepURL) - 1)
End If
If (MM_keepForm <> "") Then
  MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1)
End If

' a utility function used for adding additional parameters to these strings
Function MM_joinChar(firstItem)
  If (firstItem <> "") Then
    MM_joinChar = "&"
  Else
    MM_joinChar = ""
  End If
End Function
%>
<%
' *** Move To Record: set the strings for the first, last, next, and previous links

Dim MM_keepMove
Dim MM_moveParam
Dim MM_moveFirst
Dim MM_moveLast
Dim MM_moveNext
Dim MM_movePrev

Dim MM_urlStr
Dim MM_paramList
Dim MM_paramIndex
Dim MM_nextParam

MM_keepMove = MM_keepBoth
MM_moveParam = "index"

' if the page has a repeated region, remove 'offset' from the maintained parameters
If (MM_size > 1) Then
  MM_moveParam = "offset"
  If (MM_keepMove <> "") Then
    MM_paramList = Split(MM_keepMove, "&")
    MM_keepMove = ""
    For MM_paramIndex = 0 To UBound(MM_paramList)
      MM_nextParam = Left(MM_paramList(MM_paramIndex), InStr(MM_paramList(MM_paramIndex),"=") - 1)
      If (StrComp(MM_nextParam,MM_moveParam,1) <> 0) Then
        MM_keepMove = MM_keepMove & "&" & MM_paramList(MM_paramIndex)
      End If
    Next
    If (MM_keepMove <> "") Then
      MM_keepMove = Right(MM_keepMove, Len(MM_keepMove) - 1)
    End If
  End If
End If

' set the strings for the move to links
If (MM_keepMove <> "") Then 
  MM_keepMove = MM_keepMove & "&"
End If

MM_urlStr = Request.ServerVariables("URL") & "?" & MM_keepMove & MM_moveParam & "="

MM_moveFirst = MM_urlStr & "0"
MM_moveLast  = MM_urlStr & "-1"
MM_moveNext  = MM_urlStr & CStr(MM_offset + MM_size)
If (MM_offset - MM_size < 0) Then
  MM_movePrev = MM_urlStr & "0"
Else
  MM_movePrev = MM_urlStr & CStr(MM_offset - MM_size)
End If
%>
<html>
<head>
<meta http-equiv="content-type" content="text/html;charset=iso-8859-1">
<meta name="generator" content="Adobe GoLive 4">
<title>Ferguson Copeland, Ltd. Factory Website</title>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function YY_checkform() { //v4.66
//copyright (c)1998,2002 Yaromat.com
  var args = YY_checkform.arguments; var myDot=true; var myV=''; var myErr='';var addErr=false;var myReq;
  for (var i=1; i<args.length;i=i+4){
    if (args[i+1].charAt(0)=='#'){myReq=true; args[i+1]=args[i+1].substring(1);}else{myReq=false}
    var myObj = MM_findObj(args[i].replace(/\[\d+\]/ig,""));
    myV=myObj.value;
    if (myObj.type=='text'||myObj.type=='password'||myObj.type=='hidden'){
      if (myReq&&myObj.value.length==0){addErr=true}
      if ((myV.length>0)&&(args[i+2]==1)){ //fromto
        var myMa=args[i+1].split('_');if(isNaN(myV)||myV<myMa[0]/1||myV > myMa[1]/1){addErr=true}
      } else if ((myV.length>0)&&(args[i+2]==2)){
          var rx=new RegExp("^[\\w\.=-]+@[\\w\\.-]+\\.[a-z]{2,4}$");if(!rx.test(myV))addErr=true;
      } else if ((myV.length>0)&&(args[i+2]==3)){ // date
        var myMa=args[i+1].split("#"); var myAt=myV.match(myMa[0]);
        if(myAt){
          var myD=(myAt[myMa[1]])?myAt[myMa[1]]:1; var myM=myAt[myMa[2]]-1; var myY=myAt[myMa[3]];
          var myDate=new Date(myY,myM,myD);
          if(myDate.getFullYear()!=myY||myDate.getDate()!=myD||myDate.getMonth()!=myM){addErr=true};
        }else{addErr=true}
      } else if ((myV.length>0)&&(args[i+2]==4)){ // time
        var myMa=args[i+1].split("#"); var myAt=myV.match(myMa[0]);if(!myAt){addErr=true}
      } else if (myV.length>0&&args[i+2]==5){ // check this 2
            var myObj1 = MM_findObj(args[i+1].replace(/\[\d+\]/ig,""));
            if(myObj1.length)myObj1=myObj1[args[i+1].replace(/(.*\[)|(\].*)/ig,"")];
            if(!myObj1.checked){addErr=true}
      } else if (myV.length>0&&args[i+2]==6){ // the same
            var myObj1 = MM_findObj(args[i+1]);
            if(myV!=myObj1.value){addErr=true}
      }
    } else
    if (!myObj.type&&myObj.length>0&&myObj[0].type=='radio'){
          var myTest = args[i].match(/(.*)\[(\d+)\].*/i);
          var myObj1=(myObj.length>1)?myObj[myTest[2]]:myObj;
      if (args[i+2]==1&&myObj1&&myObj1.checked&&MM_findObj(args[i+1]).value.length/1==0){addErr=true}
      if (args[i+2]==2){
        var myDot=false;
        for(var j=0;j<myObj.length;j++){myDot=myDot||myObj[j].checked}
        if(!myDot){myErr+='* ' +args[i+3]+'\n'}
      }
    } else if (myObj.type=='checkbox'){
      if(args[i+2]==1&&myObj.checked==false){addErr=true}
      if(args[i+2]==2&&myObj.checked&&MM_findObj(args[i+1]).value.length/1==0){addErr=true}
    } else if (myObj.type=='select-one'||myObj.type=='select-multiple'){
      if(args[i+2]==1&&myObj.selectedIndex/1==0){addErr=true}
    }else if (myObj.type=='textarea'){
      if(myV.length<args[i+1]){addErr=true}
    }
    if (addErr){myErr+='* '+args[i+3]+'\n'; addErr=false}
  }
  if (myErr!=''){alert('The required information is incomplete or contains errors:\t\t\t\t\t\n\n'+myErr)}
  document.MM_returnValue = (myErr=='');
}

function MM_validateForm() { //v4.0
  var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.arguments;
  for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=MM_findObj(args[i]);
    if (val) { nm=val.name; if ((val=val.value)!="") {
      if (test.indexOf('isEmail')!=-1) { p=val.indexOf('@');
        if (p<1 || p==(val.length-1)) errors+='- '+nm+' must contain an e-mail address.\n';
      } else if (test!='R') { num = parseFloat(val);
        if (isNaN(val)) errors+='- '+nm+' must contain a number.\n';
        if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
          min=test.substring(8,p); max=test.substring(p+1);
          if (num<min || max<num) errors+='- '+nm+' must contain a number between '+min+' and '+max+'.\n';
    } } } else if (test.charAt(0) == 'R') errors += '- '+nm+' is required.\n'; }
  } if (errors) alert('The following error(s) occurred:\n'+errors);
  document.MM_returnValue = (errors == '');
}
//-->
</script>
</head>
<body bgcolor="white" >

<div id="TopLogo" style="position:absolute; width:200px; height:37px; z-index:3; left: 21px; top: 38px;"><img height="47" width="380" src="OldSite/FC%20New%20Logo.gif"></div>
<div id="Search" style="position:absolute; width:359px; height:70px; z-index:1; left: 408px; top: 12px;">
  <div style="float:left;"><br>
      <br>
    &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a href="showall.asp">My Wishlist</a> </div>
  <form action="AdvSearchResults.asp" method="get" name="SearchForm" id="SearchForm">
    <p align="right"><a href="Help.asp"><img src="OldSite/5anipt5a_Edited.gif" alt="SearchWindow" width="20" height="20" border="0" align="absmiddle"></a>&nbsp;
        <input type="text" name="SearchParam" size="25">
        <br>
        <select name="CompType">
          <option value="AND">All Words</option>
          <option value="OR">Any Word</option>
          <option value="EXACT">Exact Phrase</option>
        </select>
        <input type="submit" name="Submit2" value="Search">
    </p>
  </form>
</div>
<div id="HorRule" style="position:absolute; width:360; height:1px; z-index:4; left: 407px; top: 67px;"> 
  <hr align="left" width="360" size="1" noshade>
</div>
<div id="Navigation" style="position:absolute; width:95px; height:403px; z-index:2; left: 8px; top: 95px;">
  <div align="right">
    <a href="adlib.html"><img src="OldSite/AdLib.gif" alt="Dining, Bedroom, Occasional, Exposed Wood, Upholstery, Leather, Exquisite Furniture" width="31" height="16" border="0"></a><a href="Wood.html"><br>
      </a>
    <hr align="right" width="30	" size="1" noshade>
    <a href="Wood.html"><img src="OldSite/Exposed.gif" alt="Dining, Bedroom, Occasional, Exposed Wood, Upholstery, Leather, Exquisite Furniture" width="73" height="16" border="0"><br>
    </a>
    <hr align="right" width="72" size="1" noshade>
    <a href="sofas.html"><img src="OldSite/Uphol.gif" alt="Dining, Bedroom, Occasional, Exposed Wood, Upholstery, Leather, Exquisite Furniture" width="54" height="16" border="0"></a><br>
    <hr align="right" width="56" size="1" noshade>
    <a href="Leather.html"><img src="OldSite/Leather.gif" alt="Dining, Bedroom, Occasional, Exposed Wood, Upholstery, Leather, Exquisite Furniture" width="37" height="16" border="0"></a><br>
    <hr align="right" width="36" size="1" noshade>
    <a href="furniture.html"><img src="OldSite/company.gif" alt="Dining, Bedroom, Occasional, Exposed Wood, Upholstery, Leather, Exquisite Furniture" width="47" height="16" border="0"></a><br>
    <hr align="right" width="45" size="1" noshade>
    <a href="features.html"><img src="OldSite/Fabric&Finishes.gif" alt="Dining, Bedroom, Occasional, Exposed Wood, Upholstery, Leather, Exquisite Furniture" width="88" height="16" border="0"><br>
      <hr align="right" width="83" size="1" noshade>
    </a><a href="features.html"> </a><a href="requestform.html"><img src="OldSite/FindAStore.gif" alt="Dining, Bedroom, Occasional, Exposed Wood, Upholstery, Leather, Exquisite Furniture" width="65" height="16" border="0"><br>
    <hr align="right" width="60" size="1" noshade>
    </a><a href="requestform.html"><img src="OldSite/QuestionsComments.gif" alt="Dining, Bedroom, Occasional, Exposed Wood, Upholstery, Leather, Exquisite Furniture" width="88" height="16" border="0"><br>
        <hr align="right" width="68" size="1" noshade>
        </a><a href="InventoryReduction/LOGIN_InvRed.asp"><img src="OldSite/DealerLogin.gif" alt="Dining, Bedroom, Occasional, Exposed Wood, Upholstery, Leather, Exquisite Furniture" width="62" height="16" border="0" align="absmiddle"></a><br>
    <hr align="right" width="60" size="1" noshade>
    <a href="index.html"><img src="OldSite/home.gif" alt="Dining, Bedroom, Occasional, Exposed Wood, Upholstery, Leather, Exquisite Furniture" width="31" height="16" border="0"></a><br>
    <hr align="right" width="30" size="1" noshade>
    <br>
  </div>
</div>
<div id="VertRule" style="position:absolute; width:14px; height:350px; z-index:5; left: 109px; top: 98px;"><img src="OldSite/introli.jpg" alt="Vertical Rule" width="1" height="377"></div>
<div id="BottomColumn" style="position:absolute; width:24px; height:34px; z-index:8; left: 48px; top: 508px;"><img src="OldSite/FCcolumn.gif" alt="Logo" width="21" height="34"></div>
<div id="BottomLogo" style="position:absolute; width:103px; height:18px; z-index:7; left: 9px; top: 490px;">
  <p><img src="OldSite/FCsmall.gif" alt="LogoType" width="102" height="13"></p>
</div>
<div id="Layer1" style="position:absolute; width:640; height:355; z-index:1; left: 126; top: 98;"> 
  <div align="center">
    <p><strong><font size="4" face="Garamond, Times New Roman, Georgia, serif">Find a Store  or Submit Questions/Comments </font></strong></p>
    <form action="http://fp1.formmail.com/cgi-bin/fm192" method="POST" name="dealer" id="dealer">
      <input type="hidden" name="_pid" value="52421">
      <input type="hidden" name="_fid" value="TJLOCVS8">
      <table border=0>
        <tr>
          <th align=left>First Name</th>
          <th align=left colspan=2>Last Name</th>
        </tr>
        <tr>
          <td><input size=30 maxlength=30 name="fname"></td>
          <td colspan=2><input size=30 maxlength=30 name="lname"></td>
        </tr>
        <tr>
          <th align=left>Title</th>
          <th align=left colspan=2>Company</th>
        </tr>
        <tr>
          <td><input size=30 maxlength=30 name="title2"></td>
          <td colspan=2><input size=30 maxlength=30 name="company"></td>
        </tr>
        <tr>
          <th align=left>Address 1</th>
          <th align=left colspan=2>Address 2</th>
        </tr>
        <tr>
          <td><input size=30 maxlength=30 name="address1"></td>
          <td colspan=2><input size=30 maxlength=30 name="address2"></td>
        </tr>
        <tr>
          <th align=left>City</th>
          <th align=left>State/Country</th>
          <th align=left>Zip Code</th>
        </tr>
        <tr>
          <td><input size=30 maxlength=30 name="city"></td>
          <td><input size=20 maxlength=20 name="state"></td>
          <td><input size=10 maxlength=10 name="zipcode"></td>
        </tr>
        <tr>
          <th align=left>Telephone
        <th align=left colspan=2><font color="#FF0000"><sup>*</sup></font>Email Address        </tr>
        <tr>
          <td><input size=30 maxlength=30 name="phone"></td>
          <td colspan=2><input name="email" onBlur="YY_checkform('form1','email','S','2','Please enter a valid email address!');return document.MM_returnValue" size=30 maxlength=50></td>
        </tr>
        <tr>
          <th align=left>Fax</th>
          <td rowspan=2 align=left colspan=2><font size="-1"><font color="#FF0000"><sup>*</sup></font> Your Email address is only required so that<br>
            &nbsp;&nbsp;
            we may contact you and will not be added<br>
            &nbsp;&nbsp; to any Email list.</font> </td>
        </tr>
        <tr>
          <td valign=top><input size=30 maxlength=30 name="fax"></td>
        </tr>
        <tr>
          <th align=left></th>
          <th align=left colspan=2>Please specify, if you checked Other</th>
        </tr>
        <tr>
          <td align=top><input type="radio" value="Consumer" name="CustType" checked>
            Consumer
            <input type="radio" value="Designer" name="CustType">
            Designer
            <input type="radio" value="Retailer" name="CustType">
            Retailer
            <input type="radio" value="Other" name="CustType">
            Other </td>
          <td colspan=2><input size=30 maxlength=30 name="other"></td>
        </tr>
      </table>
      <table border=0>
        <tr>
          <td><b>How did you hear about us? </b>
              <select name="source" size="1">
                <option>Magazine ad </option>
                <option>Web site </option>
                <option>Search engine </option>
                <option>Referral </option>
                <option>Trade show </option>
                <option>Direct mail </option>
                <option>Other </option>
              </select>
            <br>
            <br></td>
        </tr>
        <tr bgcolor="#FFFFCC">
          <td><input type="checkbox" name="sendbrochure" value="yes">
              <b> Please send me your latest
                furniture brochure.</b></td>
        </tr>
        <tr>
          <th align=left colspan=2><br>
            Type your message here:    
        </tr>
        <tr>
          <td colspan=2><textarea name="message" rows="10" cols="70"></textarea></td>
        </tr>
      </table>
      <table border=0 width=492>
        <tr align=center>
          <td align=right width=245><input name="submit" type="submit" onClick="return validate();" value="Submit Request"></td>
          <td colspan=2 align=left width=245><input name="reset" type="reset" value="Reset Screen"></td>
        </tr>
      </table>
    </form>
    <p align="left">&nbsp;</p>
  </div>
  <p align="left">&nbsp; </p>
  <p>&nbsp;</p>
</div>
</body>
</html>
<%
rsFC_Furniture.Close()
Set rsFC_Furniture = Nothing
%>