//下拉条自动加载数据value与text用#分开
//参数说明:sql:SQL数据库语句,space:是否有空值,sField:字段,funcname:函数名称
function f_selectdata(sql,space,sField,funcname)
{
obj=eval("document.all."+sField)
obj.length=0
if(funcname!="")
{
func=eval(funcname)
func
}
obj.length=0
textvalueall=f_returnvalue(sql,"0")
var textvalue =new Array(textvalueall);
textvalue=textvalueall.split(",")
if(space=="")//有空值
{
sOption1=document.createElement("Option")
sOption1.value=''
sOption1.text=''
obj.add(sOption1)
}
if(space=="所有")//有空值
{
sOption1=document.createElement("Option")
sOption1.value=''
sOption1.text='所有'
obj.add(sOption1)
}
for(i=0;i<textvalue.length;i++)
{
if(textvalue[i]!="")
{
ilen=textvalue[i].indexOf("#")
thevalue=textvalue[i].substring(0,ilen)
thetext=textvalue[i].substring(ilen+1,textvalue[i].length)
sOption1=document.createElement("Option")
sOption1.value=ltrim(rtrim(thevalue))
sOption1.text=ltrim(rtrim(thetext))
obj.add(sOption1)
}
}
if(space!=""&&space!="所有")//默认值
obj.value=space
}