标题:如何获得prg程序里变量的值!(fpt下载vfp代码)[
取消只看楼主
ygy1029zj
Rank: 1
等 级:新手上路
帖 子:17
专家分:0
注 册:2008-11-28
结帖率:100%
已结贴  问题点数:10 回复次数:3 
如何获得prg程序里变量的值!(fpt下载vfp代码)[
我的目的是想实现从ftp上下载文件,弄一个进度条显示下载完成
的情况。现在我用一段程序获得了从ftp上下载文件的大小、已下载大小。在prg程序里用“?”是可以在屏幕上显示下载信息。就是不知道如何将prg里变量的值(文件大小,已下载大小,文件名等)实时传倒表单上。如果实时传到表单上的话我就可以用一个进度条来显示。这样就直观多了!
我想请高手帮我指点迷津!谢谢!(不胜感激)

我是利用myfll来实现的!myfll代码如下:
Set Library To myfll
SetVfpEvents("test()",1)
FtpDownFile("127.0.0.1","www\test.rar","d:\test.rar")
Set Library To  


然后用test.rg文件里:
Procedure test
Lparameters a,b,c,d
?"当前ID",a ,"已发送字节:" ,b ,"总字节:",c ,"附加参数:", d
Return .t.
EndProc  


我就是想在表单里获取b,c,d的值。要实时获得!这样就可以弄进度条!

请高手帮忙解决!
搜索更多相关主题的帖子: 下载文件 如何 不胜感激 test 
2011-10-17 17:10
ygy1029zj
Rank: 1
等 级:新手上路
帖 子:17
专家分:0
注 册:2008-11-28
得分:0 
呵呵。abcd四个变量Lparameters a,b,c,d已经的出来了!它们分别是id,文件大小,已下载大小,文件名!我就是想要把abcd这结果返回倒表单里引用!
2011-10-19 15:21
ygy1029zj
Rank: 1
等 级:新手上路
帖 子:17
专家分:0
注 册:2008-11-28
得分:0 
楼上这位仁兄的确是高手。厉害厉害!俺们佩服死 了!达到了这种效果!而且是用另外一种方式制作出来的进度条。厉害!
2011-10-19 22:48
ygy1029zj
Rank: 1
等 级:新手上路
帖 子:17
专家分:0
注 册:2008-11-28
得分:0 
回复 16楼 茵梦湖
今天登陆下论坛看到您的回复,内心很感动!真的谢谢你的热心回答!
2011-10-26 23:35



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-352713-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 1.166564 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved