| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2004 人关注过本帖
标题:用copy备份数据表,结果显示不能创建选择的目录
取消只看楼主 加入收藏
fwy12
Rank: 1
等 级:新手上路
帖 子:59
专家分:0
注 册:2020-2-16
结帖率:94.44%
收藏
已结贴  问题点数:20 回复次数:2 
用copy备份数据表,结果显示不能创建选择的目录
用copy备份数据表,结果显示不能创建选择的目录。
我用浏览按钮,选择路径。给Thisform.pageframe1.page1.text1.Value。如果是选择的是根目录像E:\就可以备份,但是如果选择文件夹,像E:\00\,就会显示 不能创建 E:\00\,请问是什么原因呢?

程序代码:
Case Thisform.pageframe1.page1.check1.Value=0
    If Empty(Thisform.pageframe1.page1.text1.Value)=.F.
        Dir=Sys(2003)
        dir1=Sys(5)
        ml=dir1+Dir
        Back=Alltrim(Thisform.pageframe1.page1.text1.Value)
        If Empty(Back)=.T.
            =Messagebox("请重新选择你所要备份的目录!")
            Retu
        Else
            If Thisform.pageframe1.page1.check2.Value=1
                &&Select cundao
                COPY File cundao.Dbf To &Back
            Endif
            If Thisform.pageframe1.page1.check3.Value=1
                &&Select jiamu
                Copy File jiamu.Dbf To &Back
            Endif
        Endif
    Endif
Endcase
=Messagebox("数据备份已经完成!","信息提示框")
搜索更多相关主题的帖子: Thisform Value 选择 copy 备份 
2020-02-27 16:49
fwy12
Rank: 1
等 级:新手上路
帖 子:59
专家分:0
注 册:2020-2-16
收藏
得分:0 
我是选择的目录,这个目录是存在的啊
2020-02-27 21:23
fwy12
Rank: 1
等 级:新手上路
帖 子:59
专家分:0
注 册:2020-2-16
收藏
得分:0 
回复 6楼 sxy166
正是这个原因,十分感谢。
2020-02-29 13:11
快速回复:用copy备份数据表,结果显示不能创建选择的目录
数据加载中...
 
   



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

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