????用asp实现网页同步浏览怎么做? ???菜鸟求助!愿送100分 在线等!!!!!

[zcllcz]

就是一个用户可以带领其他的用户浏览网页。当前者浏览某一个网页时，其他的人也能看到同样的网页，功能挺象“来一贴“中的同步浏览功能" 。
asp可以实现么？
能给程序么？？？

本人菜鸟,急用，请给出客户端和服务器端的完整程序，sos！！！！
非常感谢!

[hxyman]

<%
if session("username")="指定的用户" then
Application.Lock
Application("weburl") = Request.ServerVariables("Path_info")
Application.UnLock
end if
if Application("weburl")<>"" then
response.redirect Application("weburl")
else
response.redirect "这里填写默认访问地址，意为指定用户没访问时其它用户的访问地址"
end if%>

把上面这段代码加到每个页面的顶部

[hxyman]

上面要改一下

<%
if session("username")="指定的用户" then
Application.Lock
Application("weburl") = Request.ServerVariables("Path_info")
Application.UnLock
else
if Application("weburl")<>"" then
response.redirect Application("weburl")
else
response.redirect "这里填写默认访问地址，意为指定用户没访问时其它用户的访问地址"
end if
end if%>

把上面这段代码加到每个页面的顶部

[zcllcz]

谢谢楼上hxyman(86815260) 的解答啊,我晚上试一下,很快送给你分

[hxyman]

不好意思，先没仔细看，上面的代码会重复转向页面，下面再改下

<%
if session("username")="指定的用户" then
Application.Lock
Application("weburl") = Request.ServerVariables("Path_info")
Application.UnLock
else
if Application("weburl")<>Request.ServerVariables("Path_info") then
if Application("weburl")<>"" then
response.redirect Application("weburl")
else
response.redirect "这里填写默认访问地址，意为指定用户没访问时其它用户的访问地址"
end if
end if
end if%>

把上面这段代码加到每个页面的顶部

[zcllcz]

谢谢楼上hxyman(86815260) 的解答啊,但如果我服务器端
看的是譬如http://www.sohu.com之类的页面，我无法在页面前加这段程序啊？
可以延时的,没关系

[zcllcz]

不好意思，我要下机一会，学校机房关机了
晚上6点我都在
麻烦您了
谢谢

[zy51]

你的那个说法,单纯的依靠asp是绝对的,根本性的做不到的.

[hxyman]

如果我服务器端
看的是譬如http://www.sohu.com之类的页面，我无法在页面前加这段程序啊？
可以延时的,没关系
--------------------------------
那~~~~~~~~~我就没办法了，除非我跟张朝阳关系很铁啊
HOHO~~~~
不过还可以加个查看指定用户从哪个页面来

一句话，一旦脱离了本服务器，就没办法了

[srgg]

“指定用户”的页面地址用一个Application保存，每次页面转向写入Application
“其他用户”用隐含框架刷新，读取Application，再转向

[zcllcz]

坦白的说 那段程序我不是很懂
???可否详细解释下呢???? 不好意思啊

!!!另外我的思路如下!!!:
SETURL.asp
<%
Dim URL,username,password
password = Request.Form(password)
username = Request.Form(name)
IF
登陆用户为指定用户
THEN
Response.Redirect(URL) //url是保存管理员所在的页面
ELSE IF
登陆人员为管理员
THEN
URL = Request.QueryString(url) //管理员所在的页面的url地址,通过网址传递
Response.Redirect(URL) //转到管理员要去的页面
END IF
END IF
%>

例如管理员在某个页面中链接<a href="SetUrl.asp?url=http://www.sina.com">Welcome</a>
则url=http://www.sina.com调入URL = Request.QueryString(url),完成更新.

初步想法,在线等答疑
万分感谢!!!!!!!!!!!!!!!!!!!

[hxyman]

<%
if session("username")="指定的用户" then 'session("username")用来保存用户名，如果是
'管理员指定的用户名，那么
Application.Lock
Application("weburl") = Request.ServerVariables("Path_info")
'把此指定用户访问的本页面写入Application("weburl")，用来指定其它用户也访问这个页面
Application.UnLock
else
if Application("weburl")<>Request.ServerVariables("Path_info") then
'如果其它用户访问的是指定用户访问的页面，那么不跳转
if Application("weburl")<>"" then
'如果指定用户访问的页面存在，那么
response.redirect Application("weburl") '其它用户也跳转到以上这个页面
else '否则跳转到默认的页面
response.redirect "这里填写默认访问地址，意为指定用户没访问时其它用户的访问地址"
end if
end if
end if%>

把上面这段代码加到每个页面的顶部

[hxyman]

你要实现的功能我不怎么懂
你加我QQ 86815260
我们QQ上聊，一起学习

[zcllcz]

我大菜鸟啦 哈哈
谢谢你啊
我的qq 471309430

[zcllcz]

谢谢大家帮忙啊