µ±Óû§ÌîÐ´Ò³Ãæ
¿Éͨ¹ý·ÃÎÊASPµÄForm¼¯ºÏÀ´·ÃÎÊÆä¿Ø¼þÄÚµÄÖµ£º
strFirstName = Request.Form(¡°FirstName¡±)
strLastName = Request.Form(¡°LastName¡±)
Ò²¿ÉʹÓô°ÌåÖпؼþµÄÕûÐÍË÷Òý£¬Ë÷ÒýµÄ·¶Î§´ÓÔÚHTMLÖеÚÒ»¸ö¶¨ÒåµÄ¿Ø¼þ¿ªÊ¼£¬È»ºó¸ù¾Ý¶¨ÒåµÄ˳ÐòÅÅÐò£º
strFirstName = Request.Form(1)
strLastName = Request.Form(2)
È»¶ø£¬ºóÃæµÄÕâÖÖÒÔÕûÐÍΪË÷ÒýµÄ¼¼Êõ²»ÍƼöʹÓã¬ÒòΪһµ©ÓÐHTMLÖеĿؼþ·¢ÉúÁ˱仯£¬»òÕß²åÈëÒ»¸öеĿؼþ£¬ÔòASP´úÂ뽫µÃµ½´íÎóµÄÖµ¡£½øÒ»²½¶øÑÔ£¬¶ÔÓÚÔĶÁ´úÂëµÄÈËÀ´½²£¬¼«ÈÝÒ×»ìÏý¡£
1) ·ÃÎʼ¯ºÏµÄÈ«²¿Öµ
¿ÉÒÔͨ¹ýÒýÓü¯ºÏ°ÑÕû¸öFormÉϵÄһϵÁÐÖµ±ä³Éµ¥¸öµÄ×Ö·û±äÁ¿£¬ÇÒ²»ÓÃÌṩ¼ü»òË÷Òý¡£
StrAllFormContent = Request.Form
¼ÙÈçÎı¾¿ò°üº¬ÖµPriscillaºÍDescartes£¬ÔòRequest.FormÓï¾ä½«·µ»ØÏÂÁÐ×Ö·û£º
FirstName=Priscilla&LastName=Descartes
×¢Ò⣬ÌṩµÄÖµÊÇÒÔÃû³Æ/Öµ¶ÔµÄÐÎʽ³öÏֵ썼´¿Ø¼þÃû³Æ=¿Ø¼þÖµ£©£¬²¢ÇÒÿһ¶ÔÃû³Æ/ÖµÏ໥֮¼äÊÇÓ÷ûºÅ¡°&¡±Ïà·Ö¸ôµÄ¡£¼ÙÈç´òËã°Ñ´°ÌåÖеÄÄÚÈÝ´«µÝµ¥¶ÀµÄ£¬Ï£ÍûµÃµ½ÖµµÄ±ê×¼¸ñʽµÄ¿ÉÖ´ÐÐÓ¦ÓóÌÐò»òDLL£¬Õâ¸ö¼¼ÊõÊǺÜÓÐÓõġ£È»¶ø£¬Ò»°ã˵À´£¬¶¼ÊÇͨ¹ýÒÔ´°ÌåÖпؼþµÄÃû³ÆÎªÎı¾¼üÀ´·ÃÎʼ¯ºÏÖеÄÄÚÈÝ¡£
2) ±éÀúÒ»¸öASP¼¯ºÏ
ÓÐÁ½ÖÖ·½Ê½±éÀúÒ»¸öASP¼¯ºÏÖеÄËùÓгÉÔ±£¬·½Ê½ÓëÆÕͨVB¼¯ºÏµÄ»ù±¾Ïàͬ¡£Ã¿¸ö¼¯ºÏÌṩһ¸öCountÊôÐÔ£¬·µ»ØµÄÊǼ¯ºÏÖÐÌõÄ¿ÊýÁ¿¡£¿Éͨ¹ýʹÓÃÒ»¸öÕûÐÍË÷ÒýʹÓÃCountÊôÐÔÀ´±éÀú¡£
For intLoop=1 To Request.Form.Count
Response.Write Request.Form(intLoop) & ¡°
¡±
Next
¼ÙÈçÏÈǰµÄ´°Ìå°üº¬PriscillaºÍDescartesÖµµÄÁ½¸öÎı¾¿ò£¬½«µÃµ½ÈçϽá¹û£º
Priscilla
Descartes
È»¶ø£¬¸üºÃµÄ·½·¨ÊÇʹÓÃFor Each...Next½á¹¹¡£
For Each objItem In Request.Form
Response.Write objItem & ¡°=¡± & Request.Form(objItem) & ¡°
¡±
Next
Õâ´øÀ´µÄºÃ´¦ÊǼȿÉÒÔ·ÃÎʿؼþµÄÃû³ÆÓÖ¿É·ÃÎÊÆäÖµ¡£ÉÏÊö´úÂ뽫µÃµ½ÈçϽá¹û£º
FirstName = Priscilla
LastName = Descartes
×¢Ò⣬һЩä¯ÀÀÆ÷·µ»Øµ½ASPµÄ
ÔÚForm¼¯ºÏÖУ¬½«Îª¡°OtherHobby¡±´´½¨Ò»¸öÌõÄ¿¡£È»¶ø£¬Ëü½«°üÀ¨´ÓÈý¸öÎı¾¿òÖеõ½µÄÖµ¡£¼ÙÈçÔÚÌύʱ£¬Óû§ÁôÏÂÁËÒ»¸ö»ò¶à¸öΪ¿Õ£¬Ôò·µ»ØµÄֵΪ¿Õ×Ö·û´®¡£¼ÙÈçÓû§ÔÚµÚÒ»ºÍµÚÈý¸öÎı¾¿ò·Ö±ðÊäÈëGardeningºÍMountaineering£¬µÚ¶þ¸öÎı¾¿òΪ¿Õ£¬ÔÚÎÒÃǵÄASP´úÂëÖзÃÎÊRequest.Form(¡°OtherHobby¡±)£¬½«·µ»Ø×Ö·û´®£º
Gardening, ,Mountaineering
ΪÁËÄܹ»ÔÚÕâÖÖÇé¿öÏ£¬·ÃÎʵ¥¸öÖµ£¬¿ÉÒÔÓø´ÔÓһЩµÄ´úÂ룺
For Each objItem In Request.Form
If Request.Form(objItem).Count >1 Then ¡®More than one value in this item
Response.Write objItem & ¡°:
¡±
For intLoop = 1 To Request.Form(objItem).Count
Response.Write ¡°Subkey¡± & intLoop & ¡°value = ¡°_
& Request.Form(objItem) (intLoop) & ¡°
¡±
Next
Else
Response.Write objItem & ¡° = ¡± & Request.Form(objItem) & ¡°
¡±
End If
Next
¶ÔÓÚÇ°ÃæµÄ°üº¬Èý¸öOtherHobby¿Ø¼þµÄ´°ÌåʵÀý£¬Õ⽫·µ»Ø£º
OtherHobby:
Subkey 1 value = Gardening
Subkey 2 value =
Subkey 3 value = Mountaineering
È»¶ø£¬ÓÉÓÚºÜÉÙ¸ø¶à¸öÎı¾¿òÏàͬµÄÃû×Ö£¬Òò´ËÕâÖÖ¼¼ÊõºÜÉÙÓõ½¡£