|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
function writeSlt(arrstr,arrstrValue,selectedstr) \\\'arrstr 要显示在option里面的值,arrstrValue option的实际值,selectedstr要选中的默认值 \\\'将一个字串分割为数组,输出select的option,并选中selectedstr arrstr&arrstrValue长度要一致 arr=split(arrstr,",") arrValue=split(arrstrValue,",") j=0 do while j<=ubound(arr) if trim(arrValue(j))=trim(selectedstr) then response.write "<option value=\\\'" & arrValue(j) & "\\\' selected>" & arr(j) & "</option>" else response.write "<option value=\\\'" & arrValue(j) & "\\\'>" & arr(j) & "</option>" end if j=j+1 loop end function 可以从数据库中读出数据,形成逗开分隔的字符串,来动态生成select的<option> function getArrString(table,fld,cond,sortfld) \\\'获取一个指定表中指定字段指字条件的数据,返回一个以逗号分隔的字符串 set rs=server.createobject("adodb.recordset") sql="select " & fld & " from " & table if len(cond)>0 then sql=sql & " where " & cond end if if len(sortfld)>0 then sql=sql & " order by " & sortfld end if rs.Open sql,conn,1,1 if not (rs.bof or rs.EOF) then do while not rs.EOF getArrString=getArrString & trim(rs(fld)) & "," rs.MoveNext loop end if getArrString=left(getArrString,len(getArrString)-1) rs.Close set rs=nothing end function 返回类别: 教程 上一教程: ADO存取数据时如何实现留言记录的分页显示 下一教程: ASP变量-函数-过程和条件语句 您可以阅读与"针对SELECT写了一个通用的OPTION输出函数"相关的教程: · 一个超强通用的分页显示函数 · 一个通用的保护ASP系统的方式 · 一个简朴的E_MAIL地址判定函数(通用) · 一个通用数据库显示程序 · 防止ACCESS数据库被下载的一个通用解决方式 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |