标题:用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



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




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

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