<!--#include file="jsrsServer.inc"-->
<% jsrsDispatch "makeList modelList optionsList" %>

<script runat=server language=javascript>

function makeList() {
  var conn = getConn();
  var sql = "select makeID, makeName from Makes order by makeName";
  var rs = conn.Execute( sql );
  return serializeRS( rs );
}

function modelList( makeID ){
  var conn = getConn();
  var sql = "select modelID, modelName from Models where makeID=" + makeID + " order by modelName";
  var rs = conn.Execute( sql );
  return serializeRS( rs );
}

function optionsList( modelID ){
  var conn = getConn();
  var sql = "select optionID, optionName from Options where modelID=" + modelID + " order by optionName";
  var rs = conn.Execute( sql );
  return serializeRS( rs );
}

function getConn(){
  var conn = new ActiveXObject("ADODB.Connection");
  var ConnectString = "DBQ=" + Server.MapPath("autos95.mdb") + ";Driver={Microsoft Access Driver (*.mdb)};";
  conn.Open( ConnectString );
  return conn;
}

function serializeRS( rs ){
  // this is a really simple way to do it and yes, it could be designed better.
  var s = '';
  while( ! rs.eof ){
    var r = '';
    for( var i=0; i < rs.fields.count; i++ ){
      r += "~"  + rs(i);
    }
    s += r.substring(1) + "|";
    rs.moveNext();
  }
  return s;
}

</script>