您现在的位置：程序化交易>> 期货公式>> 金字塔等>> 金字塔知识>>正文内容

如何读取TXT文件内容？　[金字塔]

作者：金字塔来源：cxh99.com 发布时间：2015年08月23日点击数：　【收藏到本网的会员中心】

咨询内容： 我们知道，在后台，可以用debugfile将变量输出到文件，反过来，要将TXT文件中的一个数值，如何读取到金字塔后台的变量中？深度请教！
金字塔客服：
3.1版已经增加了INI文本文件的读写函数,你可以直接使用这个来操作了

参考

http://www.weistock.com/bbs/dispbbs.asp?boardid=2&Id=59406
[此贴子已经被作者于2014/1/18 14:10:47编辑过]
用户回复： Sub WriteTxt() Set WSHShell = CreateObject("WScript.Shell") DesktopPath = WSHShell.SpecialFolders("Desktop") xFile = DesktopPath & "\config.txt" MyTxt = Application.AppPath & " 文件创建时间 " & Now() Set fso = CreateObject("scripting.FileSystemObject") '绑定fso对象 Set MyFile = fso.CreateTextFile(xFile, True) MyFile.WriteLine (MyTxt) MyFile.Close Set MyFile = Nothing Set fso = NothingEnd SubSub ReadTxt() Set WSHShell = CreateObject("WScript.Shell") DesktopPath = WSHShell.SpecialFolders("Desktop") xFile = DesktopPath & "\config.txt" Set fso = CreateObject("scripting.FileSystemObject") '绑定fso对象 Set MyFile = fso.openTextFile(xFile, 1, True) '用.open方法打开文件 Do Until MyFile.AtEndOfStream strLine = MyFile.ReadLine application.MsgOut strLine Loop MyFile.Close Set MyFile = Nothing Set fso = NothingEnd Sub
网友回复： 请问楼上这个是在自定义函数里面实现吗？

有思路，想编写各种指标公式，程序化交易模型，选股公式，预警公式的朋友

可联系技术人员 QQ: 511411198 进行有偿编写！（不贵！点击查看价格！）

【字体：小大】【打印文章】【查看评论】

没有相关内容