网页中实现FLASH实时报价功能
效果见：http://www.529999.com左上角
原先是引用纸金黄的报价flash，因IP被封没法了，只能自已做一个了，搞了半天，终于搞定了这个实时报价。
文件分三个：
FLASH文件： goldprice.swf，关键代码如下：
var myData = new Array();
var url = "gold.txt?r=" + Math.random();
var loader = new LoadVars();
new LoadVars().load("gold.asp?r="+Math.random());
var loader = new LoadVars();
功能读取：gold.txt文件内容，与生成gold.txt的时间差，主要是调用gold.asp文件来生成。
数据库文件：gold.txt，
没什么特别，内容如下就一行:
time=10:28:34&gold=|186.66|186.26|187.06|
187.30|187.57|185.71|187.26|3.00
程序文件：gold.asp
主要用来生成gold.txt
可以用来FLASH中的?+Math.random()来生成主要用到ASP的FSO组件
实际应用中没有用到FSO来生成gold.txt
用了，Microsoft.XMLHTTP组件来“偷取”对方的数据文件gold.txt
<%
Path="对方地址/gold.txt"
t = GetBody(Path) '用GetBody函数读取
Response.BinaryWrite t '用二进制方法写到浏览器上
Function GetBody(url) '本函数为远程获取内容的函数
Set Retrieval = CreateObject("Microsoft.XMLHTTP") '建立XMLHTTP对象
With Retrieval
.Open "Get", url, False, "", "" '用Get，异步的方法发送
.Send
GetBody = .ResponseBody '函数返回获取的内容
End With
on error resume next
if Retrieval.status <>200 then
Set Retrieval = Nothing
exit function
end if
End Function
%>
把他另成为goldtxt.asp当做gold.txt也能用，输出结果一样
另一方法，没有成功，可能意那里有点出入
就是在flash中关键地址，换成http://的url
var myData = new Array();
var url = "http://对方的gold.txt?r=" + Math.random();
var loader = new LoadVars();
没成功
原载: http://www.auuo.com
版权说明：原创文章欢迎转载，但转载请务必以超链接标明文章原始出处、作者信息和本声明。否则必追究法律责任。
联系我们
QQ：51193930(Ahoo)
MSN：auuocx@hotmail.com
网址：http://www.auuo.com
地址：慈溪天九商务中心525室
电话：189-0662-0882
我们的优势
拥有优秀的网站设计师与程序工程师，精通各种一流的图形设计软件，如Photoshop、Freehand CorlDraw、Flash、Dreamweaver、Fireworks等等制作网页和平面设计图。以及使用C语言、C#、ASP.NET框架、asp、php等语言为您开发项目，我们为您准备了最专业的技术服务。为您开发的网站精致实用，代码清晰，保证您的网站安全可靠修改方便，最重要的是符合市场需求，并随时为客户解决各种技术问题。
我们正在努力开拓...