asp语法问题

[ziyuanxian]

<%
            small =rsSmallClass("SmallClassName")
            if small<>"" then
               sqlt = "select count(*),id from news where SmallClassName='" & small&"'"
               set rst = server.createobject("adodb.recordset")
               rst.open sqlt,conn,1,1
               If count==1 then
			   %>
			   <A href="show.asp?id=<%=rst("id")%>"><%=rsSmallClass("SmallClassName")%></A>
				<% else
                  response.write "没有记录."
               end if
              if rst.state<>0 then rst.close
              set rst = nothing
           else%>			 
			   <a  href="1otype.asp?classid=<%=rst("bigclassid")%>&boardname=<%=rsSmallClass("SmallClassName")%>">
			  <%             
           end if

%>

我这个是一个关于栏目里记录数多少判断后跟据数目不同分别链到不同的页面。
即记录为1时，让它直接链到这个记录的内容显示页，否则链到记录的列表页。
上面是我弄的代码，实现不了我要的功能。
望高手们指点一下，谢谢啦！

[ziyuanxian]

[Quote=引用 2 楼 lzp4881 的回复:]
<%
small =rsSmallClass("SmallClassName")
if small <>"" then
sqlt = "select count(*) as count,id from news where SmallClassName='" & small&"'"
set rst = server.createobject("adodb.recordset")
rst.open sqlt,conn,1,1
If rst("count")=1 then
%>
<A href="show.asp?id= <%=rst("id")…
[/Quote]
用了这个后，所用的链接都变成了http://127.0.0.1/show.asp?id=
我输出了一下count,发现是空的，什么都没有

[ziyuanxian]

3楼也是一样

[wushaowu]

<%
sqlt = "select id from news where SmallClassName='" & small&"'"
set rst = server.createobject("adodb.recordset")
rst.open sqlt,conn,1,1
if not rst.eof and not rst.bof then
If rst.count=1 then
'连接到单独页面显示
else
'连接到列表页面显示
end if
else
response.write "没有记录."
end if
rst.close
set rst = nothing
%>

[lzp4881]

<%
small =rsSmallClass("SmallClassName")
if small<>"" then
sqlt = "select count(*),id from news where SmallClassName='" & small&"'"
set rst = server.createobject("adodb.recordset")
rst.open sqlt,conn,1,1
If rst("count")=1 then
%>
<A href="show.asp?id=<%=rst("id")%>"><%=rsSmallClass("SmallClassName")%></A>
<% else
response.write "没有记录."
end if
if rst.state<>0 then rst.close
set rst = nothing
else%>
<a href="1otype.asp?classid=<%=rst("bigclassid")%>&boardname=<%=rsSmallClass("SmallClassName")%>">
<%
end if

%>

[lzp4881]

<%
small =rsSmallClass("SmallClassName")
if small <>"" then
sqlt = "select count(*) as count,id from news where SmallClassName='" & small&"'"
set rst = server.createobject("adodb.recordset")
rst.open sqlt,conn,1,1
If rst("count")=1 then
%>
<A href="show.asp?id= <%=rst("id")%>"> <%=rsSmallClass("SmallClassName")%> </A>
<% else
response.write "没有记录."
end if
if rst.state <>0 then rst.close
set rst = nothing
else%>
<a href="1otype.asp?classid= <%=rst("bigclassid")%>&boardname= <%=rsSmallClass("SmallClassName")%>">
<%
end if

%>

[lihan6415151528]

<%
            small =rsSmallClass("SmallClassName")
            if small<>"" then
               sqlt = "select count(*),id from news where SmallClassName='" & small&"'"
               set rst = server.createobject("adodb.recordset")
               rst.open sqlt,conn,1,1
               If not rst.bof and rst.eof               %>
               <A href="show.asp?id=<%=rst("id")%>"><%=rsSmallClass("SmallClassName")%></A>
                <% else
                  response.write "没有记录."
               end if
              if rst.state<>0 then rst.close
              set rst = nothing
           else%>             
               <a  href="1otype.asp?classid=<%=rst("bigclassid")%>&boardname=<%=rsSmallClass("SmallClassName")%>">
              <%             
           end if

%>

[银狐被占用]

6楼的方法就可以

[anbs01]

这个对。
[Quote=引用 6 楼 wushaowu 的回复:]
<%
sqlt = "select id from news where SmallClassName='" & small&"'"
set rst = server.createobject("adodb.recordset")
rst.open sqlt,conn,1,1
if not rst.eof and not rst.bof then
If rst.count=1 then
'连接到单独页面显示
else
'连接到列表页面显示
…
[/Quote]