Form Con Varios Campos

[rlinaresp]

Estimados amigos,

Deseo saber si existe una instruccion o conjunto de ellas, que me permita leer todos los campos de un formulario sin tener que estar leyendolo uno por uno, me explico mejor, tengo un form con los campos C1,C2,C3 etc etc y al momento de hacer el Submit tendria que leerlo uno por uno cuando son pocos no hay problema pero cuando son 20 o 30 ya se me hace un lio en PHP lo solucione con un ARRAY y foreach pero algun genio de arriba prefiere hacerlo en ASP pq ha cambiado el servidor.

Gracias

[u_goldman]

Solucionalo con un array y un for each!

For each item in request.form
Response.write item & "= " & request.form(item) & "<br>"
Next

Salu2,

[rlinaresp]

Mil gracias, ya lo probe y me funciono perfecto, una pregunta mas como puedo hacer para solo mostrar los valores y no que me muestre el nombre del item, me explico mejor el resultado es :
FormsRadioButton1= 1
FormsRadioButton2= 2
FormsCheckbox1= 3
FormsCheckbox2= 4
FormsEditField1= ttttttttt
FormsEditField2= ooooooo
FormsButton1= Text

y yo solo quierso que me salga,
1
2
3
4
ttttttt
ooooo

Gracias

[u_goldman]

For each item in request.form
Response.write request.form(item) & "<br>"
Next

[rlinaresp]

Gracias nuevamente, perdona que te robe otro minuto pero estoy a punto de dar a luz a mi idea, tengo un problema junte eso con las instrcucciones para escribir un archivo texto con el resultado y adivina no me funciono, le puedes dar una mirada, gracias por adelantado.
<%

For each item in request.form
Response.write item & "= " & request.form(item) & "<br>"

Next


Const ForReading = 1, ForWriting = 2, ForAppending = 8
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("D:\Work\WebIdea\Work Sites\User Sites F08\miestudio\Local Publish\prueba.txt", ForWriting, True)
f.Write "Hola mundo prueba 1"
For each item in request.form
Response.write item & "= " & request.form(item) & "<br>"
f.write request.form(item) & "<br>"
Next


f.Close

%>

[u_goldman]

Que es lo que no resulto?

[rlinaresp]

Al ejecutarlo,
1) no mostro nada en la pantalla
2) no grabo nada del reques.form en el archivo texto

Pero si creo el archivo, y grabo "Hola Mundo Prueba 1" con lo cual confirme que si ejecuto las instrucciones pero no grabo lo del request. form

Gracias nuevamente

[u_goldman]

Y asi?

strPrueba = ""

For each item in request.form
strPrueba = strPrueba & request.form(item) & vbCrLf
Next

Const ForReading = 1, ForWriting = 2, ForAppending = 8
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("D:\Work\WebIdea\Work Sites\User Sites F08\miestudio\Local Publish\prueba.txt", ForWriting, True)
f.Write strPrueba
f.close

[rlinaresp]

u goldman, que DIOS te bendiga, ya resulto ahora solo unos detalles y termino con esta idea...gracias por tu tiempo.

[u_goldman]

Gracias y suerte!

[rlinaresp]

Se me presento un problemilla, estoy usando RadioButton, el problema es que cuando no lo selecciona ni siquiera llega el nombre del radio button con valor 0 o " ". entonces se pierde mi secuencia, me explico mejor, despues de llenar el form debe de grabar un archivo texto asi,.

1234*1*4*Ricardo

donde 1234 es el numero del form
1 si escoje el radio button derecho y 2 si escoge el radio button izquierdo.
3 si escoje el radio button derecho y 4 si escoge el radio buttun izquierdo, y
Ricardo que seria su nombre.

Asi lo puedo subir en un excel a la columna A 1234, B 1, C 3 y D Ricardo.

Pero si no escoge el radio button no llega nada pasa algo asi como
1234*Ricardo.

Gracias mil por la ayuda