0

我正在使用 asp classic（没有 .net）我有一个用户列表，当用户（按 id_rol 排序）发生变化时，例如如果用户查看，我一直试图放置一种标签列表第一个选项获取（“Todos”），这意味着他可以看到所有用户，但如果他看 1 可以看到 10 个 id_rol=1 的用户，如果看这个列表的第 12 个位置，它会显示一个标签调用“编辑器”并显示其他 10 个用户，我的问题是，在代码中我告诉如果选项为 0 显示 TODO，如果为 1 显示 DIRECTOR 和下面的用户，如果选择为 12 显示 DIGITADOR 和所有用户该描述，如果列表中的位置是 22，则显示 EDITOR 并继续，

在此处输入图像描述 rigth 现在显示 0、1、2 和 3 位置的选项，但我需要 0、1、12 和 22 位置的选项有什么帮助吗？请。这是我的代码：

function cb_usuarios(cod_usuario)
'response.write seccion&"<*------"
sql=" select * from usuarios where 1=1"
'sql=" select * from usuarios where 1=1 order by id_rol asc"
if Session("id_perfil") ="1" then sql = sql &" and id_rol in(3,4)"
if Session("id_perfil") ="2" then sql = sql &" and id_rol=3"
if Session("id_perfil") ="3" then sql = sql &" and id_rol in(3,4,7)"
if Session("id_perfil") ="4" then sql = sql &" and id_rol in(1,7,6)"
if Session("id_perfil") ="6" then sql = sql &" and id_rol in(7,4)"
'sql = sql &" order by nombre "
 sql = sql &" order by id_rol "

'if(id_rol=1)then
'response.write director
'else
'response.write('esto es una prueba')
'response.write sql
Set rsx = Server.CreateObject("ADODB.Recordset")
rsx.Open SQL, conexion, 3
%>

Usuarios<select name="usuarios" class="filtros">
<option selected value="0">TODOS</option>
<option selected value="1">DIRECTOR</option>
<option selected value="12">DIGITADOR</option>
<option selected value="22">EDITOR</option>

<%
while not rsx.eof
if ( trim(rsx("usuario")) = trim(cod_usuario)) then
sel="Selected"
else
sel=""
end if 
%>
<option select value="<%=rsx("usuario")%>" <%=sel%>><%=rsx("nombre")%></option>
<%
rsx.movenext
wend
rsx.close
%></select><%
end function
4

2 回答 2

0

选择的语法是...

<select>
    <option value="1">unos</option>
    <option selected value="2">duos</option>

没有这样的事情：选项选择值....选择是错误的html只有选择的是html

于 2012-07-06T17:46:47.607 回答
0

这段代码成功了：

在此处输入图像描述 

function cb_usuarios(cod_usuario)
'response.write seccion&"<*------"


     sql=" select * from usuarios where 1=1"
    'sql=" select * from usuarios where 1=1 order by id_rol asc"


            if Session("id_perfil") ="1" then sql = sql &" and id_rol in(3,4)"
            if Session("id_perfil") ="2" then sql = sql &" and id_rol=3"
    if Session("id_perfil") ="3" then sql = sql &" and id_rol in(3,4,7)"
    if Session("id_perfil") ="4" then sql = sql &" and id_rol in(1,7,6)"
    if Session("id_perfil") ="6" then sql = sql &" and id_rol in(7,4)"

        'sql = sql &" order by nombre "
     sql = sql &" order by id_rol "

    'if(id_rol=1)then
    'response.write director
    'else
    'response.write('esto es una prueba')






'   response.write sql
    Set rsx = Server.CreateObject("ADODB.Recordset")
    rsx.Open SQL, conexion, 3
%>

Usuarios<select name="usuarios" class="filtros">

        <option selected value="0">TODOS</option>





    <%
    while not rsx.eof
        if ( trim(rsx("usuario")) = trim(cod_usuario)) then
            sel="Selected"
        else
            sel=""
        end if 
                    if ( trim(rsx("id")) =9) then
                     %>
        <option select value="0" <%=sel%>>======DIRECTOR=======</option>
        <%
                      end if
                     if ( trim(rsx("id")) =47) then
                     %>
        <option select value="0" <%=sel%
>>======DIGITADOR=======</option>
        <%
                      end if
                  if ( trim(rsx("id")) =37) then
                  %>
        <option select value="0" <%=sel%>>=====EDITOR========</option>
        <%
        end if
        if ( trim(rsx("id")) =24) then
                  %>
        <option select value="0" <%=sel%>>=====SUPERVISOR
JEFE========</option>
        <%
        end if
        if ( trim(rsx("id")) =41) then
                  %>
        <option select value="0" <%=sel% 
 >>=====ADMINISTRADOR========</option>
        <%
        end if
        if ( trim(rsx("id")) =43) then
                  %>
        <option select value="0" <%=sel%
 >>=====SUPERVISOR========</option>
        <%
        end if

        if ( trim(rsx("id")) =29) then
                  %>
        <option select value="0" <%=sel%
 >>=====CODIFICACION========</option>
        <%
        end if      %>
        <option select value="<%=rsx("usuario")%>" <%=sel%>><%=rsx
 ("nombre")%></option>
        <%
        rsx.movenext
    wend
    rsx.close
%></select><%
 end function
于 2012-07-05T21:41:14.740 回答