UC知道ASP调用字段时的难题（高手请进来看看）
来源：百度知道 编辑：UC知道 时间：2024/06/06 12:55:39
<OPTION value=1 selected>亚洲
<OPTION value=2>欧洲
<OPTION value=3>北美洲
<OPTION value=4>南美洲
<OPTION value=5>非洲
大致这样子吧，一个列表菜单，输入到数据库字段时为数字，而调用时想调用出中文，如上面的对照，如果调用的数为1就显示欧洲，调用出的数为2就显示北美州！
在修改时我弄的这个列表菜单，想让上面列表菜单与调用出数字相同的才有 selected ！
（由于列表菜单里N百个，所以
<OPTION value=1 if rs("caidan")=1 then selected end if >亚洲
<OPTION value=2 if rs("caidan")=2 then selected end if >欧洲
这种的行不通，我现在想不出怎么搞，大家来帮忙想想！````
<OPTION value=2>欧洲
<OPTION value=3>北美洲
<OPTION value=4>南美洲
<OPTION value=5>非洲
大致这样子吧，一个列表菜单，输入到数据库字段时为数字，而调用时想调用出中文，如上面的对照，如果调用的数为1就显示欧洲，调用出的数为2就显示北美州！
在修改时我弄的这个列表菜单，想让上面列表菜单与调用出数字相同的才有 selected ！
（由于列表菜单里N百个，所以
<OPTION value=1 if rs("caidan")=1 then selected end if >亚洲
<OPTION value=2 if rs("caidan")=2 then selected end if >欧洲
这种的行不通，我现在想不出怎么搞，大家来帮忙想想！````
添加select 动态数据 来实现
response.Write grkz_sel("nam","1","1|2|3|4|5","亚洲|欧洲|北美洲|南美洲|非洲")
function grkz_sel(nam,sel,arr,val)
dim i,a,v,tmp
a = split(arr,"|")
v = split(val,"|")
tmp = "<select id="""&nam&""" name="""&nam&"""> " & vbcrlf
for i=0 to UBound(a)
tmp=tmp&"<option value="""&a(i)&""">"&v(i)&"</option>"&vbcrlf
next
tmp=tmp&"</select>"&vbcrlf
tmp=replace(tmp,"<option value="""&sel&""">","<option value="""&sel&""" selected>")
grkz_sel = tmp
end function
---------------
你调用的时候只要
response.Write grkz_sel("nam",rs("caidan"),"1|2|3|4|5","亚洲|欧洲|北美洲|南美洲|非洲")<