大哥 我（错在那里）怎么那么奇怪？？

[ErrMsg]

<%sql="select * from Jiaot where Address='"& Address &"' order by JiaotID desc"

Set RS = Server.CreateObject("ADODB.RecordSet")
rs.Open sql, Conn, 1, 2

page=Request("page")
if page=0 then
page=1
end if
RecordCount = 0
do while not rs.Eof
RecordCount = RecordCount +1
rs.MoveNext
loop
if not RecordCount=0 then
rs.MoveFirst
end if
pageCount=RecordCount/1
pageCount=int(pageCount)

%>
<%
if not rs.eof and not rs.bof then
do while pos<(page-1)*1
pos=pos+1
rs.moveNext
loop
Neir=rs("Neir")
'Img=rs("Img")
Neir=replace(Neir,"<","<")
Neir=replace(Neir,">",">")
Neir=replace(Neir,chr(13),"<BR>")
Neir=replace(Neir,chr(32)," ")
rs.Close
%>
<% y=1%>
<%do while y<pagecount+1%>
<%if y=page-1 then %>
<a href="jiaot.asp?hanfei=<%=address%>&page=<%=y%>"><FONT COLOR="#FF0000"><%=y%></FONT></a>
<%else%>
<a href="jiaot.asp?hanfei=<%=address%>&page=<%=y%>"><%=y%></a>
<%end if%>
<%
y=y+1
loop
%>
我现在就是想：我选了那一页 该页的 就显示为红色 问题就是只有我用y=page-1 的时候 点了第二页 反而是第一页变红色 也就是显示了此处代码“<a href="jiaot.asp?hanfei=<%=address%>&page=<%=y%>"><FONT COLOR="#FF0000"><%=y%></FONT></a>”
按照道理来说：变成 y=page 就好了 可是 不行呀 怎么办 帮帮我？

[rover0]

楼主，是不是MM呀！

[yangyanli]

<%if y=page-1 then %>

试试
<%if y=page then %>

[ErrMsg]

不可以呀//
我不说了吗 按照道理来说是可以的 可是 不行

[yangsm]

帮楼主顶！~

[ErrMsg]

我自己解决了 我发现我没有把page 转换成int