1 답변


수정됨
0 투표

1. Request.Form 데이터 전부 화면에 출력

<%

Dim Item, fieldName, fieldValue

For Each Item In Request.Form
    fieldName = Item
    fieldValue = Request.Form(Item)

    Response.Write fieldName & " = " & fieldValue & "<br>"
Next

%>

 

2. 컬렉션 형식, Scripting.Dictionary 담아 사용하기.

<%

Dim Item, fieldName, fieldValue
Dim a, b, c, d

Set d = Server.CreateObject("Scripting.Dictionary")

For Each Item In Request.Form
    fieldName = Item
    fieldValue = Request.Form(Item)

    d.Add fieldName, fieldValue
Next

' Rest of the code is for going through the Dictionary
a = d.Keys  ' Field names  '
b = d.Items ' Field values '

For c = 0 To d.Count - 1
    Response.Write a(c) & " = " & b(c)
    Response.Write "<br>"
Next

%>

구로역 맛집 시흥동 맛집
이 포스팅은 쿠팡 파트너스 활동의 일환으로, 이에 따른 일정액의 수수료를 제공받습니다.
add
...