Something

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Untitled Document</title>
<link href="css.css" rel="stylesheet" type="text/css" />
<!--[if IE]>
<style type="text/css"> 
/* place css fixes for all versions of IE in this conditional comment */
.twoColHybLtHdr #sidebar1 { padding-top: 30px; }
.twoColHybLtHdr #mainContent { zoom: 1; padding-top: 15px; }
/* the above proprietary zoom property gives IE the hasLayout it may need to avoid several bugs */
</style>
<![endif]-->
</head>

<body class="twoColHybLtHdr">
<%

Dim AdoCon
Dim rsAddDogs
Dim strSQL

Set adocon = server.CreateObject("ADODB.Connection")
adoCon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("St George's.mdb")

Set rsAddDogs = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT tblDogs.Name, tblDogs.Size, tblDogs.Age, tblDogs.Breed, tblDogs.Gender, tblDogs.Housetrained, tblDogs.Kid_Friendly, tblDogs.Fixed, tblDogs.History, tblDogs.Special_Needs FROM tblDogs;"

rsAddDogs.Open strSQL, adoCon%>

<div id="container">
  <div id="header">
    <h1 align="center"><img src="images/Banner.png" width="539" height="85" alt="Banner" /></h1>
  <!-- end #header --></div>
  <div id="sidebar1">
    <h3 align="center">Menu</h3>
    <p><ul>
<li><a href="index.html">Home</a></li>
<li><a href="dogs.html">Apply To Adopt One Of Our Dogs</a> </li>
<li><a href="donate.html">Donate</a></li>
<li><a href="about.html">About</a></li>
<li><a href="contact.html">Contact</a></li>
<li><a href="links.html">Links</a></li>
<li><a href="staffhome.html">Staff Login</a></li>
</ul></p>
  <!-- end #sidebar1 --></div>
  <div id="mainContent">
    <h1> Our Dogs</h1>
    <p>Here are some of the many dogs we have available to adopt at our shelter right now, you can even apply online to adopt.</p>
    <p>
      <label>Name
      <input name="Name" type="text" id="Name" value="<%response.write(rsAddDogs("Name"))%>" />
      </label>
Breed
<input name="Breed" type="text" id="Breed" value="<%response.write(rsAddDogs("Breed"))%>" />
</p>
    <p>
      <label>Age
      <input name="Age" type="text" id="Age" value="<%response.write(rsAddDogs("Age"))%>" />
      </label>
      <label></label>
      <label></label>
  Housetrained
  <input name="Housetrained" type="text" id="Housetrained" value="<%response.write(rsAddDogs("Housetrained"))%>" />
    </p>
    <p>
      <label>Gender
      <input name="Gender" type="text" id="Gender" value="<%response.write(rsAddDogs("Gender"))%>" />
      </label>
      <label></label>
      <label></label>
      <label>Kid-Friendly
      <input name="Kid_Friendly" type="text" id="Kid_Friendly" value="<%response.write(rsAddDogs("Kid_Friendly"))%>" />
      </label>
    </p>
    <p>
      <label></label>
      <label></label>
      <label>Size
      <input name="Size" type="text" id="Size" value="<%response.write(rsAddDogs("Size"))%>" />
      </label>
      <label>Fixed
      <input name="Fixed" type="text" id="Fixed" value="<%response.write(rsAddDogs("Fixed"))%>" />
      </label>
    </p>
    <p>
      <label>History</label>
      <textarea name="History" cols="50" rows="4" id="History"><%response.write(rsAddDogs("History"))%>
      </textarea>
    </p>
    <p>
      <label>Special Needs
      <textarea name="Special_Needs" cols="50" rows="4" id="Special_Needs"><%response.write(rsAddDogs("Special_Needs"))%>
      </textarea>
      </label>
      <label></label>
    </p>
    <p>Previous Next</p>
    <p>Apply to <a href="adopt.asp">adopt this dog</a>.</p>
  </div>
	<div id="footer">
    <p>© St George's Dogs Home 2007. All rights reserved.</p>
    <!-- end #footer --></div>
<!-- end #container --></div>
<%rsAddDogs.Close
Set rsAddDogs = Nothing
Set adoCon = Nothing
%>
</body>
</html>