Foxtable(狐表)用户栏目专家坐堂 → 请问:点击文件管理器下面的增加按钮,可以不调用FT自带的FTP管理器而调用我自己设计的FTP管理器吗?


  共有5313人关注过本帖树形打印复制链接

主题:请问:点击文件管理器下面的增加按钮,可以不调用FT自带的FTP管理器而调用我自己设计的FTP管理器吗?

帅哥哟,离线,有人找我吗?
audience68
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:324 积分:2547 威望:0 精华:0 注册:2012/5/19 22:40:00
请问:点击文件管理器下面的增加按钮,可以不调用FT自带的FTP管理器而调用我自己设计的FTP管理器吗?  发帖心情 Post By:2014/11/12 8:26:00 [显示全部帖子]

我自己设计了一个FTP管理器,希望在点击文件管理器下端的增加按钮时,不要调用系统自带的FTP管理器而调用我自己设计的FTP管理器,不知是否可行啊?,主要是不想再专门在增设一个新的增加按钮控件,且可以继续利用系统文件管理器自带的其它按钮的性能.不知我这样考虑是否可行,请专家指教.

 回到顶部
帅哥哟,离线,有人找我吗?
audience68
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:324 积分:2547 威望:0 精华:0 注册:2012/5/19 22:40:00
  发帖心情 Post By:2014/11/12 8:34:00 [显示全部帖子]

我把文件管理器下方的增加按钮隐掉,再增加一个"增加"按钮来调用我自己的FTP管理器,其他还用系统文件管理器下方的按钮功能(比如打开文件,删除文件等),不知这样是否可行?

 回到顶部
帅哥哟,离线,有人找我吗?
audience68
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:324 积分:2547 威望:0 精华:0 注册:2012/5/19 22:40:00
  发帖心情 Post By:2014/11/12 8:38:00 [显示全部帖子]

谢谢狐爸回复,我也认为,如果在系统按键前增加一个调用开发者自定义的一些事件功能,可能就更加方便了。图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
audience68
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:324 积分:2547 威望:0 精华:0 注册:2012/5/19 22:40:00
  发帖心情 Post By:2014/11/12 8:39:00 [显示全部帖子]

谢谢BIN版,我试试看看

 回到顶部
帅哥哟,离线,有人找我吗?
audience68
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:324 积分:2547 威望:0 精华:0 注册:2012/5/19 22:40:00
  发帖心情 Post By:2014/11/12 11:39:00 [显示全部帖子]

BIN版,我用自制的FTP管理器生成动态路径上穿文件,以便不同的用户只能看自己上传的文件,但在窗口中的文件管理器如何跟踪这个动态的路径,比如,我点击不同的行,根据单元格内容的变化(也就是上传路径)连显示相应的内容呐?

 回到顶部
帅哥哟,离线,有人找我吗?
audience68
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:324 积分:2547 威望:0 精华:0 注册:2012/5/19 22:40:00
  发帖心情 Post By:2014/11/12 16:18:00 [显示全部帖子]

ftp1.Changedir("/gongling/web")

 

ftp1.Changedir("\photo")
到底是用/还是\,我有点糊涂了

 

 



 回到顶部
帅哥哟,离线,有人找我吗?
audience68
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:324 积分:2547 威望:0 精华:0 注册:2012/5/19 22:40:00
  发帖心情 Post By:2014/11/12 19:24:00 [显示全部帖子]

下面的这段代码基本都是例子中的,上传按钮的代码已经写好并测试成功,可是这个删除代码却怎么也删不了,点击删除按钮,不选文件会提醒"请选择一个文件!",选择了删除文件也会提醒"是否删除选定文件?",但就是总是显示"删除失败!"无法实现删除,真不知错在哪里?请老师指点。加黑部分与上传里的代码完全一样。

Dim lvw As WinForm.ListView = e.Form.Controls("ListView1")
Dim lr As WinForm.ListViewRow = lvw.Current
If lr IsNot Nothing Then
    If MessageBox.Show("是否删除选定文件?","提醒",MessageBoxButtons.YesNo,MessageBoxIcon.Question) = DialogResult.Yes Then
        e.Form.text = "ftp管理器  文件删除中...."
        
        
        Dim ftp As new FTPClient  '先定义好ftp的账号密码
        ftp.Host = "*****"
        ftp.Port = "21000"
        ftp.Account = "*****"
        ftp.Password = "*******"
        ftp.UTF8 = True


        Dim fp As String = "\监造基本信息表\监造资料\" & Tables("监造基本信息表").Current("任务编号")  

        If ftp.DeleteFile(fp & "\" & lr.text) = True Then
            Functions.Execute("刷新ListView")
            e.Form.text = "ftp管理器"
            MessageBox.Show("删除完成!","提醒")
        Else
            e.Form.text = "ftp管理器"
            MessageBox.Show("删除失败!","提醒")
        End If
    End If
Else
    MessageBox.Show("请选择一个文件!","提醒")
End If

 回到顶部
帅哥哟,离线,有人找我吗?
audience68
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:324 积分:2547 威望:0 精华:0 注册:2012/5/19 22:40:00
  发帖心情 Post By:2014/11/12 19:45:00 [显示全部帖子]

谢谢甜版,发现路径不知为何重复出现了2次,图片如下

图片点击可在新窗口打开查看此主题相关图片如下:新图片(3).bmp
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
audience68
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:324 积分:2547 威望:0 精华:0 注册:2012/5/19 22:40:00
  发帖心情 Post By:2014/11/12 19:45:00 [显示全部帖子]

我要删除的文件是7BUnit7习题

 回到顶部
帅哥哟,离线,有人找我吗?
audience68
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:324 积分:2547 威望:0 精华:0 注册:2012/5/19 22:40:00
  发帖心情 Post By:2014/11/12 20:30:00 [显示全部帖子]

谢谢了


 回到顶部
总数 15 1 2 下一页