|
|
<% If NOT IsNull (RecordSet.Fields.Item ("FirstName")) Then Response.Write (Replace (RecordSet.Fields.Item ("FirstName"), "\", "")) End If %> <% If NOT IsNull (RecordSet.Fields.Item ("LastName")) Then Response.Write (Replace (RecordSet.Fields.Item ("LastName"), "\", "")) End If %> |
| <% If NOT IsNull (RecordSet.Fields.Item ("Title")) Then Response.Write (Replace (RecordSet.Fields.Item ("Title"), "\", "")) End If %> | |
| <% If NOT IsNull (RecordSet.Fields.Item ("Company")) Then Response.Write (Replace (RecordSet.Fields.Item ("Company"), "\", "")) End If %> | |
| <% If NOT IsNull (RecordSet.Fields.Item ("Address1")) Then Response.Write (RecordSet.Fields.Item ("Address1")) End If %> | |
| <% If NOT IsNull (RecordSet.Fields.Item ("Address2")) Then Response.Write (RecordSet.Fields.Item ("Address2")) End If %> | |
|
<% If NOT IsNull (RecordSet.Fields.Item ("City")) Then Response.Write (RecordSet.Fields.Item ("City")) End If %>, <% If NOT IsNull (RecordSet.Fields.Item ("State")) Then Response.Write (RecordSet.Fields.Item ("State")) End If %> <% If NOT IsNull (RecordSet.Fields.Item ("Zip")) Then Response.Write (RecordSet.Fields.Item ("Zip")) End If %> |
|
|
|
|
| Preferred Phone: | <% If NOT IsNull (RecordSet.Fields.Item ("PreferredPhone")) Then Response.Write (RecordSet.Fields.Item ("PreferredPhone")) End If %> <% If NOT IsNull (RecordSet.Fields.Item ("preferredphone_ext")) AND NOT RecordSet.Fields.Item ("preferredphone_ext") = "" Then Response.Write ("Ext. " & RecordSet.Fields.Item ("preferredphone_ext")) End If %> |
| Company Phone: | <% If NOT IsNull (RecordSet.Fields.Item ("CompanyPhone")) Then Response.Write (RecordSet.Fields.Item ("CompanyPhone")) End If %> <% If NOT IsNull (RecordSet.Fields.Item ("companyphone_ext")) AND NOT RecordSet.Fields.Item ("companyphone_ext") = "" Then Response.Write ("Ext. " & RecordSet.Fields.Item ("companyphone_ext")) End If %> |
| Toll Free: | <% If NOT IsNull (RecordSet.Fields.Item ("TollFree")) Then Response.Write (RecordSet.Fields.Item ("TollFree")) End If %> <% If NOT IsNull (RecordSet.Fields.Item ("tollfree_ext")) AND NOT RecordSet.Fields.Item ("tollfree_ext") = "" Then Response.Write ("Ext. " & RecordSet.Fields.Item ("tollfree_ext")) End If %> |
| Fax Number: | <% If NOT IsNull (RecordSet.Fields.Item ("Fax")) Then Response.Write (RecordSet.Fields.Item ("Fax")) End If %> <% If NOT IsNull (RecordSet.Fields.Item ("fax_ext")) AND NOT RecordSet.Fields.Item ("fax_ext") = "" Then Response.Write ("Ext. " & RecordSet.Fields.Item ("fax_ext")) End If %> |
| Cell: | <% If NOT IsNull (RecordSet.Fields.Item ("CellPhone")) Then Response.Write (RecordSet.Fields.Item ("CellPhone")) End If %> |
| Email: | <% If NOT IsNull (RecordSet.Fields.Item ("Email")) Then Response.Write ("" & RecordSet.Fields.Item ("Email") & "") End If %> |
| Website: | "><%=RecordSet.Fields.Item ("URL")%> |
|
|
|
| Specialty: | <% If NOT IsNull (RecordSet.Fields.Item ("Specialties")) Then Response.Write Replace (RecordSet.Fields.Item ("Specialties"), "\", "") End If %> |
| Installations Served: | <% Do Until Installation_RecordSet.EOF Response.Write (Installation_RecordSet.Fields.Item ("installation")) Installation_RecordSet.MoveNext If NOT Installation_RecordSet.EOF Then Response.Write (", ") End If Loop %> |
| Cities Served: | <% Do Until City_RecordSet.EOF Response.Write (City_RecordSet.Fields.Item ("city") & ", " & City_RecordSet.Fields.Item ("state")) City_RecordSet.MoveNext If NOT City_RecordSet.EOF Then Response.Write (", ") End If Loop %> |
|
|
|
| About Me: | <%=Replace (Replace (RecordSet.Fields.Item ("AboutMe"), "\", ""), " ", "")%> |
<% If NOT IsNull (RecordSet.Fields.Item ("Image")) Then Response.Write ("