Função de leitura de queries em JSCRIPT para (IB 6 / Firebird)

function lerquery(strSQL){
 var sNome  = Request.ServerVariables("SERVER_NAME");
 var sCaminho = Server.MapPath("<caminho_seu_DB>");

 var sConn = "DRIVER={Easysoft IB6 ODBC};" +
 "SERVER="+ sNome +";"+
 "DATABASE="+ sNome +":"+ sCaminho +";"+
 "UID=SYSDBA;"+
 "PWD=;"+
 "DIALECT=3;"+
 "CHARSET=ISO8859_1;"+
 "ROLE=";

 var cmd = new ActiveXObject("ADODB.Command");
 with (cmd)
 {
  ActiveConnection = sConn;
  CommandText = strSQL;
  CommandType = 1;
  CommandTimeout = 3;
  Prepared = true;
 }
 var lerquery = cmd.Execute();
 return(lerquery);
}

Esta matéria foi postada originalmente no ASP4Developers por César M. Conceição (site), que na época era "Analista / Programador Pleno, mais de 4 anos de experiência no desenvolvimento de sistemas online.(HTML/XHTML/ASP/JAVASCRIPT/DHTML/MS SQL/FIREBIRD/INTERBASE/ACCESS)". Hoje, vai saber...