查看: 59|回复: 2

字段按字母排序问题

[复制链接]

神①→沙加

电梯直达

1^#

发表于 2010-1-10 07:51:10 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

同题：
现有一个无限分类下拉菜单是按照类别ID排列的
如何在原有基础上不改变分类布局的情况下  把其中的小类按照名称的字母方式排序？
代码如下：

程序代码：
<table width="190" border="0" align="center" cellpadding="0" cellspacing="0">
            <%
                                 strcode=""
                                 for i=1 to Len(SourCode) \ 4
                                 strcode=strcode&" or c_code like '"&left(SourCode,i*4)&"____'"
                                 next
                                 if strcode<>"" then
                                 strcode="(1<>1"&strcode&" or Len(c_code)=4)"
                                 else
                                 strcode=" Len(c_code)=4"
                                 end if
                                 strSQL="Select * From web_news_class Where 1=1 and " & strcode & "  Order by c_code"
                                 'response.Write(strsql)
                                 Set rs=Server.CreateObject("ADODB.RecordSet")
                                 rs.open strSQL,conn,1,1
                                 for i=1 to rs.recordcount
                                 Level=(Len(rs("c_code"))/4-1)*3
                                 If Len(rs("c_code"))>4 then
                                 mefeekk="this.className='highlight1'"
                                 else
                                 mefeekk="this.className='highlight'"
                                 end if
                                 %>

         <% If Len(rs("c_code"))>4 Then %>
         <tr>
            <td height="25" bgcolor="#FFFFFF"  >
            <% select case  Len(rs("c_code"))
            case 12

            %>
              
            <% case 16 %>
                
            <% end select %>
<% bpk=conn.execute("select count(*) from [web_news_class] where c_name='"&rs("c_name")&"'")(0) %>
            <a href="product.asp?class=<%=rs("id")%>&classname=<%=trim(rs("c_name"))%>"><% If bpk>0 Then %><IMG src="image/11111.gif" width="20" height="19" border=0 align="absbottom"><% Else %><img src="pic/05.gif">
<% End If %>
<%=trim(rs("c_name"))%></a>             </td></tr>
         <% Else %>
            <tr>
            <td height="25" bgcolor="#FFFFFF"  class="w2" >

            <img src="to_class3.gif"  align="absmiddle">  <a href="product.asp?class=<%=rs("id")%>&classname=<%=trim(rs("c_name"))%>"><strong><%=trim(rs("c_name"))%></strong></a>  </td>
            </tr>
<tr>
            <td height="1" background="pic01/011.jpg">  </td></tr>

<% End If %>

         <%
                                    rs.movenext
                                 next
                                 %>
      </table>

收藏0

使用道具举报

first

2^#

发表于 2010-1-10 07:51:14 | 只看该作者

SELECT * FROM [tb] ORDER BY 排序的字段 COLLATE chinese_PRC_CS_AS_KS_WS

回复支持反对

使用道具举报

返回列表

		自动登录	找回密码
密码			注册