Ver Mensaje Individual
  #6 (permalink)  
Antiguo 09/09/2005, 15:31
Avatar de u_goldman
u_goldman
Moderador
 
Fecha de Ingreso: enero-2002
Mensajes: 8.031
Antigüedad: 23 años, 3 meses
Puntos: 98


Código:
Function EscribeInputs()
  strInputs = ""

  For each item in request.form
    strInputs = strInputs & "<input type=""hidden"" name="&item&" value="&chr(34) & request.form(item) & chr(34)&">" & vbCrLf
  next
  EscribeInputs = strInputs
End Function
__________________
"El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera."
-- Ernest Hemingway