VB获取网页源代码刷新的问题

来源：百度知道 编辑：UC知道 时间：2024/04/27 15:34:11
比如网页地址为:http://localhost/view.asp
该页面随机显示一个字符串，刷新一次变一次

VB用XMLHTTP每隔5秒获取一次该页面的字符串
正常是每次获取的字符串应该都不一样
但是每次获取的结果都一样。

这时候手动刷新下http://localhost/view.asp VB里才显示新的字符串

不知道是缓存的问题 还是什么问题 哪个大哥指点一下

XMLHTTP我使用了确实存在这样的问题，在进程没结束前结果永远不变
不过我找到了解决方案，我没你那么快，我是5分钟，5分钟旧的程序自动退出前启动一个新的进程，这样就可以刷新了，我已经使用了三个多月，只要计算机开着都实时刷新，处理代码，效果非常理想，望采纳，谢谢！

以下是VBS代码:
========edit1.vbs=========
Dim s, t, fso, w

Set w = CreateObject("WScript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")

s = GetCode("GB2312", "http://localhost/view.asp")
's是代码，在这里处理

wscript.sleep 5000
w.run "wscript.exe """ & wscript.scriptfullname & """"

Public Function BytesToBstr(strBody, CodeBase)
Dim ObjStream
Set ObjStream = CreateObject("Adodb.Stream")
With ObjStream
.Type = 1
.Mode = 3
.open
.write strBody
.Position = 0
.Type = 2
.Charset = CodeBase
BytesToBstr = .ReadText
.Close
End With
Set Obj