回 帖 发 新 帖 刷新版面

主题:[讨论]pb使用mftpx.OCX控件出错,控件已经注册过了!

我按照以下说明弄好
3. 使用Mabry Internet FTP/X Control 

---- 此控件是由Mabry Software公司提供的一个用于Ftp的控件,读者可以到www.mabry.com上去下载此控件(mftpx.ocx)。经比较,笔者认为在进行ftp传输方面,使用此控件进行编程最方便。它能完成绝大部分Ftp的功能,而且在编程中能很方便地控制程序的运行。比如说要完成前述功能,我们先注册该控件,然后在PB程序中加入一个该控件的Ole,取名Ole_1;一个单行编辑器Sle_1,用为显示有关信息;一个按钮Cb_1,点击它时进行Ftp操作。另设一个boolean 型Instance Variables,取名is_con,并将它设为false,用于指示网络是否已连通。对该控件的属性进行如下设置: 

属性 值 说明

Host 202.114.67.2 

Logonname User 

Logonpassword 12345 

Timeout 10 根据实际情况设置

---- 在Cb_1的clicked事件中加入以下代码: 

sle_1.text = "正在连接....."

setpointer(hourglass!)

ole_1.object.connect()

if is_con then

sle_1.text = "开始传输...."

ole_1.object.putfile

("c:\temp\t00001.txt","/txtdata/t00001.txt")

sle_1.text = "传输完毕!"

end if

setpointer(arrow!)

is_con = false

在Ole_1的各事件中加入相应代码:

connected事件:

if fconnected then

sle_1.text = "连接成功!"

is_con = true

else

sle_1.text = "连接失败!"

is_con = false

end if

externalexception事件:

sle_1.text = "外部错误,可能网络不通"

action = ExceptionIgnore!

progress事件:

sle_1.text = "已传输"

+ string(bytestransfered)+"字节....."


[color=#FF0000]因为
属性 值 说明

Host 202.114.67.2 

Logonname User 

Logonpassword 12345 

Timeout 10 根据实际情况设置[/color]

这个我不知道哪里设置,所以在cb_1.clicked下最开始写了
ole_1.object.host="80.64.64.7"
ole_1.object.logonname="sygsj"
ole_1.object.logonpassword="gsj987"
ole_1.object.timeout=10

然后编译(compile)没有出错信息,运行(run)也不出错,界面弹出后,点击cb_1按钮,出错,提示是:

Application terminated.

Error: Error acessing external object property host at line 1 in clicked event of object cb_1 of w_download

不知道哪里有问题,请哪位大侠指导一下

回复列表 (共2个回复)

沙发

你好.我是全职网赚工作者.
如果你有时间有电脑.
想在网络上创业.请联系我..
项目绝对真实.详情QQ空间资料
加盟请联系 QQ908889846
2010年,中国网民突破了4亿,
网络游戏玩家超过了3亿,
互联网即将进入全民网游的时代

板凳

最新互助式项目。C易特元亨QQ919169870

这是一个互助的模式。
不推广人也有钱赚的。分A B两个网。
不推广的人在A网。推广的人 在B网。
B网推广的人帮助A网。
A网赚取6000元出局。
B网就多了。
详情了解加QQ919169870 
  http://blog.sina.com.cn/s/blog_6b19ec920100liv6.html
C易特奖励制度 
http://blog.sina.com.cn/cyite6
C易特更多资料博客

我来回复

您尚未登录,请登录后再回复。点此登录或注册