读取通达信权息资料

luckeeylee

读取通达信权息资料

来自：MACD论坛(bbs.shudaoyoufang.com) 作者：luckeeylee 浏览：8489 回复：1

If DownFile("http://www.tdx.com.cn/products/data/data/dbf/info.zip","info.zip")
     IF UnZipFile("info.zip","fhpg.txt","fhpg.txt")
   =MESSAGEBOX("权息资料下载解压完成 ！",64,"Sunshine & Esteem  Prediction System!")
   ELSE
    =MESSAGEBOX("权息资料解压失败 ！",64,"Sunshine & Esteem  Prediction System!")
     RETURN
     ENDIF
Else
    =MESSAGEBOX("权息资料下载失败 ！",64,"Sunshine & Esteem  Prediction System!")
     RETURN
EndIf

B3tA2V60xN

这个没有股本变化数据

[ 本帖最后由 B3tA2V60xN 于 2011-7-22 01:31 编辑 ]