2.8w+
社区成员
1个小问题，100分请教!
<%USERID=session("USERID")%>
<%
Dim Rs1
Set Rs1=Conn.Execute("select COUNT(*) as TTTR from flow f,fileattrib a where f.fileid=a.fileid and f.addrto='"&USERID&"' and f.del<>'1' AND F.HAVEREAD='N'",CmdText)
%>
<html>
<head>
<title>无标题文档</title>
<meta http-equiv="refresh" content="10; url=index1.asp" >
<meta NAME="GENERATOR" Content="Microsoft FrontPage 5.0">
</head>
<%
BBB=RS1("TTTR")
页面每隔一段时间自动刷新，我现在希望做个判断，假如BBB数值变大，则
response.redirect "INDEX2.asp"
否则，继续本页
END IF
%>
<body bgcolor="#FFFFFF" text="#000000">
</body>
</html>
<%
Dim Rs1
Set Rs1=Conn.Execute("select COUNT(*) as TTTR from flow f,fileattrib a where f.fileid=a.fileid and f.addrto='"&USERID&"' and f.del<>'1' AND F.HAVEREAD='N'",CmdText)
%>
<html>
<head>
<title>无标题文档</title>
<meta http-equiv="refresh" content="10; url=index1.asp" >
<meta NAME="GENERATOR" Content="Microsoft FrontPage 5.0">
</head>
<%
BBB=RS1("TTTR")
页面每隔一段时间自动刷新，我现在希望做个判断，假如BBB数值变大，则
response.redirect "INDEX2.asp"
否则，继续本页
END IF
%>
<body bgcolor="#FFFFFF" text="#000000">
</body>
</html>
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
tripofdream 2002-05-15
关键就是用一个session或application变量来保存bbb的初始值
希偌 2002-05-15
<%
BBB=RS1("TTTR")
if application("value")="" then
application("value")=BBB
elseif cint(BBB)<>cint(application("value")) then
application("value")=BBB
response.redirect "INDEX2.asp"
END IF
%>
BBB=RS1("TTTR")
if application("value")="" then
application("value")=BBB
elseif cint(BBB)<>cint(application("value")) then
application("value")=BBB
response.redirect "INDEX2.asp"
END IF
%>
希偌 2002-05-15
<%
BBB=RS1("TTTR")
if application("value")="" then
application("value")=BBB
elseif cint(BBB)<>cint(application("value")) then
application("value")=BBB
response.redirect "INDEX2.asp"
END IF
%>
BBB=RS1("TTTR")
if application("value")="" then
application("value")=BBB
elseif cint(BBB)<>cint(application("value")) then
application("value")=BBB
response.redirect "INDEX2.asp"
END IF
%>
希偌 2002-05-15
这个是我常用的方法！
<%
BBB=RS1("TTTR")
if application("value")="" then
application("value")=BBB
elseif BBB<>application("value") then
application("value")=BBB
response.redirect "INDEX2.asp"
END IF
%>
<%
BBB=RS1("TTTR")
if application("value")="" then
application("value")=BBB
elseif BBB<>application("value") then
application("value")=BBB
response.redirect "INDEX2.asp"
END IF
%>
xxjmz_78 2002-05-15
<USERID=session("USERID")
Dim Rs1
Set Rs1=Conn.Execute("select COUNT(*) as TTTR from flow f,fileattrib a where f.fileid=a.fileid and f.addrto='"&USERID&"' and f.del<>'1' AND F.HAVEREAD='N'",CmdText)
>
<html>
<head>
<title>无标题文档</title>
<meta http-equiv="refresh" content="10; url=index1.asp" >
<meta NAME="GENERATOR" Content="Microsoft FrontPage 5.0">
0A</head>
<
BBB=RS1("TTTR")
if bbb>数值 then
response.redirect "INDEX2.asp"
END IF
>
<body bgcolor="#FFFFFF" text="#000000">
</body>
</html>
Dim Rs1
Set Rs1=Conn.Execute("select COUNT(*) as TTTR from flow f,fileattrib a where f.fileid=a.fileid and f.addrto='"&USERID&"' and f.del<>'1' AND F.HAVEREAD='N'",CmdText)
>
<html>
<head>
<title>无标题文档</title>
<meta http-equiv="refresh" content="10; url=index1.asp" >
<meta NAME="GENERATOR" Content="Microsoft FrontPage 5.0">
0A</head>
<
BBB=RS1("TTTR")
if bbb>数值 then
response.redirect "INDEX2.asp"
END IF
>
<body bgcolor="#FFFFFF" text="#000000">
</body>
</html>
popcode 2002-05-15
<USERID=session("USERID")
Dim Rs1
Set Rs1=Conn.Execute("select COUNT(*) as TTTR from flow f,fileattrib a where f.fileid=a.fileid and f.addrto='"&USERID&"' and f.del<>'1' AND F.HAVEREAD='N'",CmdText)
>
<html>
<head>
<title>无标题文档</title>
<meta http-equiv="refresh" content="10; url=index1.asp" >
<meta NAME="GENERATOR" Content="Microsoft FrontPage 5.0">
0A</head>
<
BBB=RS1("TTTR")
if bbb>数值 then
response.redirect "INDEX2.asp"
END IF
>
<body bgcolor="#FFFFFF" text="#000000">
</body>
</html>
回复人： ChinaOK(授人以鱼，不如授人以渔) ( ) 信誉：144 2002-05-15 11:01:00 得分:0 Top
<response.buffer=true>
<USERID=session("USERID")>
<
Dim Rs1
Set Rs1=Conn.Execute("select COUNT(*) as TTTR from flow f,fileattrib a where f.fileid=a.fileid and f.addrto='"&USERID&"' and f.del<>'1' AND F.HAVEREAD='N'",CmdText)
>
<html>
<head>
<title>无标题文档</title>
<meta http-equiv="refresh" content="10; url=index1.asp" >
<meta NAME="GENERATOR" Content="Microsoft FrontPage 5.0">
0A</head>
<
BBB=RS1("TTTR")
if bbb>YourNo then
response.redirect "INDEX2.asp"
END IF
>
<body bgcolor="#FFFFFF" text="#000000">
</body>
</html>
Dim Rs1
Set Rs1=Conn.Execute("select COUNT(*) as TTTR from flow f,fileattrib a where f.fileid=a.fileid and f.addrto='"&USERID&"' and f.del<>'1' AND F.HAVEREAD='N'",CmdText)
>
<html>
<head>
<title>无标题文档</title>
<meta http-equiv="refresh" content="10; url=index1.asp" >
<meta NAME="GENERATOR" Content="Microsoft FrontPage 5.0">
0A</head>
<
BBB=RS1("TTTR")
if bbb>数值 then
response.redirect "INDEX2.asp"
END IF
>
<body bgcolor="#FFFFFF" text="#000000">
</body>
</html>
回复人： ChinaOK(授人以鱼，不如授人以渔) ( ) 信誉：144 2002-05-15 11:01:00 得分:0 Top
<response.buffer=true>
<USERID=session("USERID")>
<
Dim Rs1
Set Rs1=Conn.Execute("select COUNT(*) as TTTR from flow f,fileattrib a where f.fileid=a.fileid and f.addrto='"&USERID&"' and f.del<>'1' AND F.HAVEREAD='N'",CmdText)
>
<html>
<head>
<title>无标题文档</title>
<meta http-equiv="refresh" content="10; url=index1.asp" >
<meta NAME="GENERATOR" Content="Microsoft FrontPage 5.0">
0A</head>
<
BBB=RS1("TTTR")
if bbb>YourNo then
response.redirect "INDEX2.asp"
END IF
>
<body bgcolor="#FFFFFF" text="#000000">
</body>
</html>
ChinaOk 2002-05-15
<%response.buffer=true%>
<%USERID=session("USERID")%>
<%
Dim Rs1
Set Rs1=Conn.Execute("select COUNT(*) as TTTR from flow f,fileattrib a where f.fileid=a.fileid and f.addrto='"&USERID&"' and f.del<>'1' AND F.HAVEREAD='N'",CmdText)
%>
<html>
<head>
<title>无标题文档</title>
<meta http-equiv="refresh" content="10; url=index1.asp" >
<meta NAME="GENERATOR" Content="Microsoft FrontPage 5.0">
</head>
<%
BBB=RS1("TTTR")
if bbb>YourNo then
response.redirect "INDEX2.asp"
END IF
%>
<body bgcolor="#FFFFFF" text="#000000">
</body>
</html>
<%USERID=session("USERID")%>
<%
Dim Rs1
Set Rs1=Conn.Execute("select COUNT(*) as TTTR from flow f,fileattrib a where f.fileid=a.fileid and f.addrto='"&USERID&"' and f.del<>'1' AND F.HAVEREAD='N'",CmdText)
%>
<html>
<head>
<title>无标题文档</title>
<meta http-equiv="refresh" content="10; url=index1.asp" >
<meta NAME="GENERATOR" Content="Microsoft FrontPage 5.0">
</head>
<%
BBB=RS1("TTTR")
if bbb>YourNo then
response.redirect "INDEX2.asp"
END IF
%>
<body bgcolor="#FFFFFF" text="#000000">
</body>
</html>
yzx_zyj 2002-05-15
ok
