<%@LANGUAGE="JAVASCRIPT"%> <% var Recordset1 = Server.CreateObject("ADODB.Recordset"); Recordset1.ActiveConnection = MM_Farco_Noticias_STRING; Recordset1.Source = "SELECT * FROM articulos"; Recordset1.CursorType = 0; Recordset1.CursorLocation = 2; Recordset1.LockType = 3; Recordset1.Open(); var Recordset1_numRows = 0; %> <% // *** Recordset Stats, Move To Record, and Go To Record: declare stats variables // set the record count var Recordset1_total = Recordset1.RecordCount; // set the number of rows displayed on this page if (Recordset1_numRows < 0) { // if repeat region set to all records Recordset1_numRows = Recordset1_total; } else if (Recordset1_numRows == 0) { // if no repeat regions Recordset1_numRows = 1; } // set the first and last displayed record var Recordset1_first = 1; var Recordset1_last = Recordset1_first + Recordset1_numRows - 1; // if we have the correct record count, check the other stats if (Recordset1_total != -1) { Recordset1_numRows = Math.min(Recordset1_numRows, Recordset1_total); Recordset1_first = Math.min(Recordset1_first, Recordset1_total); Recordset1_last = Math.min(Recordset1_last, Recordset1_total); } %> <% var MM_paramName = ""; %> <% // *** Move To Record and Go To Record: declare variables var MM_rs = Recordset1; var MM_rsCount = Recordset1_total; var MM_size = Recordset1_numRows; var MM_uniqueCol = "artId"; MM_paramName = "id"; var MM_offset = 0; var MM_atTotal = false; var MM_paramIsDefined = (MM_paramName != "" && String(Request(MM_paramName)) != "undefined"); %> <% // *** Move To Specific Record: handle detail parameter if (MM_paramIsDefined && MM_rsCount != 0) { // get the value of the parameter var param = String(Request(MM_paramName)); // find the record with the unique column value equal to the parameter value for (MM_offset=0; !MM_rs.EOF; MM_offset++) { if (MM_rs.Fields.Item(MM_uniqueCol).Value == param) break; MM_rs.MoveNext(); } // if not found, set the number of records and reset the cursor if (MM_rs.EOF) { if (MM_rsCount < 0) MM_rsCount = MM_offset; if (MM_size < 0 || MM_size > MM_rsCount) MM_size = MM_rsCount; MM_offset = 0; // reset the cursor to the beginning if (MM_rs.CursorType > 0) { if (!MM_rs.BOF) MM_rs.MoveFirst(); } else { MM_rs.Close(); MM_rs.Open(); } } } %> <% // *** Move To Record: if we dont know the record count, check the display range if (MM_rsCount == -1) { // walk to the end of the display range for this page for (var i=MM_offset; !MM_rs.EOF && (MM_size < 0 || i < MM_offset + MM_size); i++) { MM_rs.MoveNext(); } // if we walked off the end of the recordset, set MM_rsCount and MM_size if (MM_rs.EOF) { MM_rsCount = i; if (MM_size < 0 || MM_size > MM_rsCount) MM_size = MM_rsCount; } // if we walked off the end, set the offset based on page size if (MM_rs.EOF && !MM_paramIsDefined) { if ((MM_rsCount % MM_size) != 0) { // last page not a full repeat region MM_offset = MM_rsCount - (MM_rsCount % MM_size); } else { MM_offset = MM_rsCount - MM_size; } } // reset the cursor to the beginning if (MM_rs.CursorType > 0) { if (!MM_rs.BOF) MM_rs.MoveFirst(); } else { MM_rs.Requery(); } // move the cursor to the selected record for (var i=0; !MM_rs.EOF && i < MM_offset; i++) { MM_rs.MoveNext(); } } %> <% // *** Move To Record: update recordset stats // set the first and last displayed record Recordset1_first = MM_offset + 1; Recordset1_last = MM_offset + MM_size; if (MM_rsCount != -1) { Recordset1_first = Math.min(Recordset1_first, MM_rsCount); Recordset1_last = Math.min(Recordset1_last, MM_rsCount); } // set the boolean used by hide region to check if we are on the last record MM_atTotal = (MM_rsCount != -1 && MM_offset + MM_size >= MM_rsCount); %> FARCO's Services



  Certification for Draft Beer Dispensers, DBD-2E and DBD-2E2 models.  
   
Recently were classified in accordance with NSF International Standard No. 18 the draft beer dispensers, models DBD-2E and DBD-2E2.

These refrigerators are intended for the storage and dispensing of beverages such as beer. The evaluation indicated that materials used for their construction do not impart an odor, color, taste or toxic material to food products.

  

 
<% Recordset1.Close(); %>