asp ÏÂÀ­¿ò

ÎÒÒª×öÒ»¸öÏÂÀ­¿ò  ÄÚÈÝÊÇ56¸öÃñ×å
¿ÉÊÇÏÂÀ­¿òµÄÄÚÈÝ  ÎÒÖ»»á
<select name="sex">
          <option value="ÄÐ" selected>ÄÐ </option>
          <option value="Å®">Å® </option>
        </select>   
ÕâÑù

ÓÐû¼òµ¥µãµÄ·½·¨

---

¾ÍÕâÑù£¬ÄÚÈݶàÁË¿ÉÒÔרÃŽ¨¸öÊý¾Ý±í£¬È»ºóselectlistÀïµÄÖµ´ÓÊý¾Ý¿âÀï¶ÁÈ¡¡£

---

VBScript code:
s = "ÃɹÅ×å,»Ø×å,²Ø×å,άÎá¶û×é,Ãç×å,ÒÍ×å,׳×å,²¼ÒÀ×å,³¯ÏÊ×å,Âú×å,¶±×å,Ñþ×å,°××å,ÍÁ¼Ò×å,¹þÄá×å,¹þÈø¿Ë×å,´ö×å,Àè×å,ËÛËÛ×å,Øô×å,î´×å,¸ßɽ×å,À­ìï×å,Ë®×å,¶«Ïç×å,ÄÉÎ÷×å,¾°ÆÄ×å,¿Â¶û¿Ë×Î×å,ÍÁ×å,´ïÎÓ¶û×å,ØïÀÐ×å,Ǽ×å,²¼ÀÊ×å,ÈöÀ­×å,ëÄÑ×å,ØîÀÐ×å,Îý²®×å,°¢²ý×å,Ëþ¼ª¿Ë×å,ÆÕÃ××å,Å­×å,ÎÚ×αð¿Ë×å,¶íÂÞ˹×å,¶õοË×å,µÂ°º×å,±£°²×å,Ô£¹Ì×å,¾©×å,ËþËþ¶û×å,¶ÀÁú×å,¶õÂ×´º×å,ºÕÕÜ×å,ÃÅ°Í×å,»ùŵ×å,çó°Í×å"
ar = split(s,",")
response.write "<select name=mz>"
for i=0 to ubound(ar)
response.write "<option value='" & ar(i) & "'>" & ar(i) & "</option>"
next
response.write "</select>"

---

<%
s = "ÃɹÅ×å,»Ø×å,²Ø×å,άÎá¶û×é,Ãç×å,ÒÍ×å,׳×å,²¼ÒÀ×å,³¯ÏÊ×å,Âú×å,¶±×å,Ñþ×å,°××å,ÍÁ¼Ò×å,¹þÄá×å,¹þÈø¿Ë×å,´ö×å,Àè×å,ËÛËÛ×å,Øô×å,î´×