分析家数据读取及转换工具_怎么用视频转换工具_音视频转换工具(2)

4、提供了分析家数据读取器和数据转换器，可以直接在程序中调用读取器和转换器；

5、提供了一个用于演示和测试调用结果的工具；同时提供VBA、VBS、SAS等语言调用实例（SAS调用实例见）。

版本说明：

目前组件最新版本为0.6版，主要支持分析家6.0。如果分析家版本为6.0以下，则部分功能无法使用。

下载安装方法：

（如果已安装了旧版本请先用提供的Uninstall工具删除！）

首先，访问等网站下载安装文件FinDataToolsV0.7.rar（点击这里下载）。 解压后，双击安装文件开始安装，安装程序会自动检测系统是否已安装了.NET框架2.0中文版（.NET Framework 2.0），如果未安装则安装程序会提示安装（安装程序会.NET Framework 2.0下载页面；或者从这里直接下载： ... p;displaylang=zh-cn）；最后，根据提示完成安装（一直点击“下一步”即可）。安装成功后，将在指定目录（默认为C:\FinData）生成：FinData.dll（组件）、FinData.tlb（COM类型库）、FinDataTools.exe（ 分析家数据读取及转换工具） 、Fxj2Txt.exe（分析家数据转换命令行工具）、FinDataTools.xls（EXCEL调用例子）、FinDataTools.vbs（VBScript调用例子）等，同时将在“程序”菜单中创建一个名为“FinData”的菜单，包括“FinDataTools数据工具”、“卸载”等快捷方式。

使用方法：

调用方法与其它COM/.NET组件一样。

例如，安装后要测试一下是否注册成功为COM组件，可以创建一个VBS文件（扩展名为.VBS），键入以下两行：

set fxj = createobject("findata.fxjdata")

fxj.ShowFxjReader()

执行时如果正确显示分析家数据读取器窗口，说明注册成功。把上面第二行换为fxj.ShowFxjConverter()则可以打开分析家数据转换器，等等。

Sub ReadFxjData()

'调用组件,读取数据保存在变量X中

Dim x As Variant

Dim fxj As New FinData.FxjData

x = fxj.GetData("hq", "SZ000001") ‘读取数据保存在X中

'以下语句将数据保存在工作表中

For i = 0 To UBound(x, 1)

For j = 0 To UBound(x, 2)

ThisWorkbook.Worksheets(1).Cells(i + 1, j + 1) = x(i, j)

Next

Next

End Sub

按F5运行。其中关键语句是x = fxj.GetData("hq", "SZ000001")，只要改变方法GetData中的参数就可以读取到不同的数据，返回的X是一个二维 字符串数组。

在.NET语言中调用方法也很简单，主要语句如下：

FinData.FxjData fxj = new FinData.FxjData();

string[,] s = fxj. GetData("hq", "SZ000001");

上面只是一些例子，具体功能的使用见以下说明。

组件方法和属性说明：

（1）方法GetData

语法：public string[,] GetData(string dataType, string code) 或 public string[,] GetData(string dataType, string code, string newFileName)

本文来自电脑杂谈，转载请注明本文网址：
http://www.pc-fly.com/a/jisuanjixue/article-42728-2.html