
09/09/2005, 15:31
|
 | 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 |