%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim Camotes Dim Camotes_numRows Set Camotes = Server.CreateObject("ADODB.Recordset") Camotes.ActiveConnection = MM_CarotenoidesPrin_STRING Camotes.Source = "SELECT * FROM CamotesBrasileņos ORDER BY Nombre ASC" Camotes.CursorType = 0 Camotes.CursorLocation = 2 Camotes.LockType = 1 Camotes.Open() Camotes_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 Camotes_numRows = Camotes_numRows + Repeat1__numRows %>
| Nombre |
Cultivar |
beta-caroteno |
| <%=(Camotes.Fields.Item("Nombre").Value)%> |
<%=(Camotes.Fields.Item("Cultivar").Value)%> |
<%=(Camotes.Fields.Item("beta-caroteno").Value)%> |