weixin_53925881的博客

原创 重点介绍“Netsuite.DLL V1.05”的几个函数

.Send( String ClientID , String Msg) 发送信息 &&return bool .T. 成功|.F.失败。* .CloseUserConnect( ClientID) 关闭对应的Client连接 &&return bool .T. 成功|.F.失败。"已停止:" + Transform( m.loDevice.PlaybackState = Stopped )

原创 Netsuite.dll V1.001版

'Unicode: ' + m.lcPstr + ' 宽度：' +Transform( Len(m.lcPstr ) ) &&Unicode。'UTF-8: ' + m.lcPstr + ' 宽度：' +Transform(Len(m.lcPstr ) ) &&UTF-8。'ASCII: ' + m.lcPstr + ' 宽度：' +Transform(Len(m.lcPstr ))&&双字节字符。

原创 突然之间发现VFP可以做成很好看的CTP看板

原创 test_mtcomvfp_简单的单线程实例.prg

我是线程: ,模式: ,执行(),完成....#Defin AbortRequested 128 &&线程的Thread.Abort()方法已被调用，但是线程还未停止；

原创 做一个ZMQ应答模式，性能确实好见图

原创 Bulkcopy(四），在VFP中将本地图片导入MSSQL

Messagebox( '本次往MSSQL上传图片共计耗时：' + Transform( Seconds() - m.lntimeStart ) + '记录数：' + Transform( m.lnRowcount ) +;'调用过程：' + m.loerr.Procedure , 16 , 'CmdBar.Execute')Messagebox( '错误信息：' + m.loerr.Message + Chr(13) +;

原创 Bulkcopy(三），将VFP的cursor导入MSSQL

Messagebox( '导入MSSQL整体耗时：' + Transform( Seconds() - m.lntimeStart ) + '记录数：' + Transform( m.lnRowcount ) , 64 ), [id,xdate,bdsna,pano,pana,orig,md,jj1,jj2,issta];

原创 Bulkcopy(二），导入EXCEL到MSSQL

Messagebox( '导入MSSQL耗时：' + Transform( Seconds() - m.lntimeStart ) + '记录数：' + Transform( m.lnRowcount ) , 64 )If m.loNetFunction .SQLBulkInsert( 'test';&&SQL导入的表名。m.lisIdentity = .F. &&是否导入到SQL表时重新生成ID。

原创 Bulkcopy(一），导入DBF到MSSQL

Messagebox( '导入MSSQL耗时：' + Transform( Seconds() - m.lntimeStart ) + '记录数：' + Transform( m.lnRowcount ) , 64 )If m.loNetFunction.SQLBulkInsert( 'test';m.lisIdentity = .F. &&是否导入到SQL表时重新生成ID。*--执行(成功=.T. |失败-.F.)

原创 在VFP如何使用PostMessage|SendMessage发送消息给窗体

再创建一个表单用来发送消息给“被发送PostMessage的表单”，将其Caption设置为：“发送PostMessage的表单”,表单文件保存为“test1".添加一个timer用来不断给test表单发送当前时间。首先我们创建一个VFP窗体把窗体Caption设置为：“被发送PostMessage的表单”，表单文件保存为：test。在表单LOAD中写入如下代码：声明三个函数。

原创 WebView2 For VFP 1.06共享版

_vfp.AutoYield=.F. 在VFP事件方法执行长耗时，将对COM+事件方法有阻塞影响或异常影响，也就意味着您不能很随意在事件中进用Set Step On 来调试。*作者包装的任何方法函数在：This.oWebview2这个对象之下 This.oWebview2.Function1,.Function2,.Function3.....*在事件方法中需要注意VFP因是单线程设计，若您在事件方法中执行了一个长耗时动作，将由_vfp.AutoYield=.T.|.F.来约定COM+事件通知是否排队。

原创 VFP也可以调用MT4,MT5来做单

这是一张VFP9.0 通过 Winsocket 调用MT4指令来进行开单，查单。这是我写的一个Socket通信的MT4.EA交易服务端。