ptLibert 发表于 2014-8-10 11:10:29

8月8日更新:新增对数组的支持,例子Variable : strArray, fltArray;
If IsLastBar And (StkInBlock(StkLabel,'上海A股') Or StkInBlock(StkLabel,'深圳A股') Or StkInBlock(StkLabel,'创业板') Or StkInBlock(StkLabel,'中小企业')) Then
Begin
url = 'http://s1.dfcfw.com/xml/' + StkLabel + '.xml';

<%#
        using System.Xml;
        String strHtml = "";
        String url = (String)GetVarData("url");
        WebRequest request = WebRequest.Create(url);
        WebResponse response = request.GetResponse();
        StreamReader reader = new StreamReader(response.GetResponseStream(), Encoding.GetEncoding("utf-8"));
        strHtml = reader.ReadToEnd();
        reader.Close();
        reader.Dispose();
        response.Close();
        XmlDocument doc = new XmlDocument();
        doc.Load(new StringReader(strHtml));

        List<String> listString = new List<String>();
        List<float> listFloat = new List<float>();
        XmlNode node1 = doc.FirstChild.NextSibling.FirstChild;

        while (node1 != null)
        {
                listString.Add(node1.InnerText);
                listFloat.Add(float.Parse(node1.InnerText));
                Console.WriteLine(node1.InnerText);
                node1 = node1.NextSibling;
        }
    //传递数组
        SetVarData("strArray", listString.ToArray());
        SetVarData("fltArray", listFloat.ToArray());

%>

Comment( strArray, ' ', strArray, ' ', strArray, ' ', strArray, ' ', strArray, ' ', strArray);
Comment( fltArray, ' ', fltArray, ' ', fltArray, ' ', fltArray, ' ', fltArray, ' ', fltArray);
End

fengzhanshan 发表于 2014-8-18 16:49:35

ptLibert 发表于 2014-8-10 11:10 static/image/common/back.gif
8月8日更新:新增对数组的支持,例子

新手请教,是不是扩展了fox.api;,接口之后,就可以工作在逐行模式下呢,感觉这个是逐行模式的。记得说.net dll 只能逐根模式。特别希望.net dll 能在逐行下工作,主要是选股

ktdev 发表于 2014-8-18 18:32:41

fengzhanshan 发表于 2014-8-18 16:49 static/image/common/back.gif
新手请教,是不是扩展了fox.api;,接口之后,就可以工作在逐行模式下呢,感觉这个是逐行模式的。记得说.ne ...

逐行逐根都可以,但SetVarData和GetVarData确实一般来说用在逐行模式,和飞狐的vbs类似

fengzhanshan 发表于 2014-8-18 19:16:17

ktdev 发表于 2014-8-18 18:32 static/image/common/back.gif
逐行逐根都可以,但SetVarData和GetVarData确实一般来说用在逐行模式,和飞狐的vbs类似 ...

谢谢,我多试试

gf66wj88 发表于 2014-10-10 20:27:56

谢谢了
页: 1 2 [3]
查看完整版本: 用 .net dll 代替 VBS