<%
@ Page Language="VB" MasterPageFile="~/Customers/Layout.master" AutoEventWireup="false" CodeFile="AutoFill.aspx.vb" Inherits="Customers_AutoFill" title="Untitled Page" %>
<
asp:Content ID="Content1" ContentPlaceHolderID="MainContent" Runat="Server">
<script>
initDocs();
var zipXml;
function getXmlLocation()
{
var pos = window.location.pathname.lastIndexOf("/");
return window.location.protocol + "//" + window.location.host + window.location.pathname.substr(0, pos) + "/";
}
function initDocs()
{
zipXml =
new ActiveXObject("Microsoft.XMLDOM");
zipXml.async =
false;
}
function GetCityState(obj)
{
var oCity = document.all("txtCity");
var oState = document.all("cboState");
if (obj.value.length > 0) {
zipXml.load(getXmlLocation() +
"AutoFillCityStateXML.aspx?zip=" + obj.value);
var address = zipXml.getElementsByTagName("address")[0];
if (address != null && address.attributes.length > 0) {
if (address.attributes.getNamedItem("city") != null)
oCity.value = address.attributes.getNamedItem(
"city").value;
if (oState != null) {
if (address.attributes.getNamedItem("state") != null) {
for (i = 0; i < oState.options.length; i++) {
if (oState.options
.text == address.attributes.getNamedItem("state").value)
oState.selectedIndex = i;
}
}
}
}
}
}
</script>
<TABLE id="Table1" style="BORDER-RIGHT: darkgray 1px solid; BORDER-TOP: darkgray 1px solid; FONT-SIZE: 11px; BORDER-LEFT: darkgray 1px solid; BORDER-BOTTOM: darkgray 1px solid; FONT-FAMILY: Tahoma"
cellSpacing="0" cellPadding="8" border="0">
<TR>
<TD bgColor="#f1f1f1">Enter a zip code, and tab off the field. As soon as the
field loses focus, the city and state will be auto-filled.
</TD>
</TR>
<TR>
<TD style="PADDING-RIGHT: 0px; PADDING-LEFT: 0px; PADDING-BOTTOM: 0px; PADDING-TOP: 0px">
<table style="FONT-SIZE: 11px; FONT-FAMILY: Tahoma" cellSpacing="8" cellPadding="0">
<tr>
<td width="50">Zip Code:</td>
<td><asp:TextBox Runat="server" ID="txtZip" Font-Size="11px" Font-Names="Tahoma"></asp:TextBox></td>
</tr>
<tr>
<td width="50">City:</td>
<td><asp:TextBox Runat="server" ID="txtCity" Font-Size="11px" Font-Names="Tahoma"></asp:TextBox></td>
</tr>
<tr>
<td width="50">State:</td>
<td>
<select name="cboState" id="cboState" style="FONT-SIZE:11px;WIDTH:100%;FONT-FAMILY:Tahoma">
<option selected value=""></option>
<option value="1">Alabama</option>
<option value="2">Alaska</option>
<option value="58">Alberta</option>
<option value="3">Arizona</option>
<option value="4">Arkansas</option>
<option value="62">British Columbia</option>
<option value="5">California</option>
<option value="6">Colorado</option>
<option value="7">Connecticut</option>
<option value="8">Delaware</option>
<option value="9">District of Columbia</option>
<option value="10">Florida</option>
<option value="11">Georgia</option>
<option value="12">Hawaii</option>
<option value="13">Idaho</option>
<option value="14">Illinois</option>
<option value="15">Indiana</option>
<option value="16">Iowa</option>
<option value="17">Kansas</option>
<option value="18">Kentucky</option>
<option value="19">Louisiana</option>
<option value="20">Maine</option>
<option value="64">Manitoba</option>
<option value="21">Maryland</option>
<option value="22">Massachusetts</option>
<option value="23">Michigan</option>
<option value="24">Minnesota</option>
<option value="25">Mississippi</option>
<option value="26">Missouri</option>
<option value="27">Montana</option>
<option value="28">Nebraska</option>
<option value="29">Nevada</option>
<option value="56">New Brunswick</option>
<option value="30">New Hampshire</option>
<option value="31">New Jersey</option>
<option value="32">New Mexico</option>
<option value="33">New York</option>
<option value="57">Newfoundland</option>
<option value="34">North Carolina</option>
<option value="35">North Dakota</option>
<option value="65">Northwest Territories</option>
<option value="55">Nova Scotia</option>
<option value="36">Ohio</option>
<option value="37">Oklahoma</option>
<option value="54">Ontario</option>
<option value="38">Oregon</option>
<option value="53">OverSeasAddress</option>
<option value="39">Pennsylvania</option>
<option value="63">Prince Edward Island</option>
<option value="40">Puerto Rico</option>
<option value="60">Quebec</option>
<option value="41">Rhode Island</option>
<option value="59">Saskatchewan</option>
<option value="42">South Carolina</option>
<option value="43">South Dakota</option>
<option value="44">Tennessee</option>
<option value="45">Texas</option>
<option value="46">Utah</option>
<option value="47">Vermont</option>
<option value="48">Virginia</option>
<option value="49">Washington</option>
<option value="50">West Virginia</option>
<option value="51">Wisconsin</option>
<option value="52">Wyoming</option>
<option value="61">Yukon Territory</option>
</select>
</td>
</tr>
</table>
</TD>
</TR>
</TABLE>
</
asp:Content>
--- behind code
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
txtZip.Attributes(
"OnBlur") = "BLOCKED SCRIPTGetCityState(this);"
End Sub