Imprimir Campos Formulario

Con el siguiente código obtendremos todos los campos de un formulario y los imprimiremos por pantalla

For each campo in Request.Form

texto= texto & campo & ": " & Request.Form(campo) & "
"

Next

Obtener nombre archivo Asp

Si queremos Saber como se llama la pagina que actualmente estamos ejecutando en asp lo podemos hacer con la siguiente funcion de asp

<%

Function NombrePagina()

ruta = Request.ServerVariables("URL") 'recoge la ruta completa

ruta = Split(ruta,"/") 'convierte cada separación señalada por / en un elemento de un vector

nombre = ruta(UBound(ruta)) 'recogemos el último elemento de ese vector...

NombrePagina = nombre

end function

%>