<%@LANGUAGE="VBSCRIPT"%> <% Dim Recordset1 Dim Recordset1_numRows Set Recordset1 = Server.CreateObject("ADODB.Recordset") Recordset1.ActiveConnection = MM_farmadieta_STRING Recordset1.Source = "SELECT * FROM TA_modo_respuesta" Recordset1.CursorType = 0 Recordset1.CursorLocation = 2 Recordset1.LockType = 1 Recordset1.Open() Recordset1_numRows = 0 %> <% Dim Recordset2__MMColParam Recordset2__MMColParam = "1" If (Session("MM_pa2") <> "") Then Recordset2__MMColParam = Session("MM_pa2") End If %> <% Dim Recordset2 Dim Recordset2_numRows Set Recordset2 = Server.CreateObject("ADODB.Recordset") Recordset2.ActiveConnection = MM_farmadieta_STRING Recordset2.Source = "SELECT usuario FROM T_clientes_datos WHERE pa2 = '" + Replace(Recordset2__MMColParam, "'", "''") + "'" Recordset2.CursorType = 0 Recordset2.CursorLocation = 2 Recordset2.LockType = 1 Recordset2.Open() Recordset2_numRows = 0 %> FARMADIETA
EMPLEO

Si quieres unirte a un equipo joven y dinámico y está interesado en los aspectos relacionados con la nutrición no dudes en contactar con nosotros a través del 902 180312 o bien a través del e-mail info@farmadieta.com

 

©Copyright Farmadieta 2003
<% Recordset1.Close() Set Recordset1 = Nothing %> <% Recordset2.Close() Set Recordset2 = Nothing %>