判断 文件存在的代码，功能无效啊，那里错了啊

78353208

判断本目录里的文件存在与否，只要其中一个不存在  就载入窗口1  全部存在就载入窗口2

下面的代码  不知道那里出错了  ，文件不存在和存在都是载入窗口1   
网高手 解答  跪谢


下面代码的意思是  只要其中一个文件不存在  就载入窗口1（窗口1是提示的窗口）

全部文件不缺  都存在 就载入窗口2（窗口2是进入程序）


.版本 2

.程序集 窗口程序集1

.子程序 __启动窗口_创建完毕

判断文件 ()

.子程序 判断文件
.局部变量 已载入, 整数型

已载入 ＝ 0
.判断开始 (文件是否存在 (取运行目录 () ＋ “\psapi.dll”) ＝ 真)
    已载入 ＝ 已载入 ＋ 1
.默认

.判断结束
.判断开始 (文件是否存在 (取运行目录 () ＋ “\krnln.fnr”) ＝ 真)
    已载入 ＝ 已载入 ＋ 1
.默认

.判断结束
.判断开始 (文件是否存在 (取运行目录 () ＋ “\eAPI.fne”) ＝ 真)
    已载入 ＝ 已载入 ＋ 1
.默认

.判断结束
.判断开始 (文件是否存在 (取运行目录 () ＋ “\epsonwsp.dll”) ＝ 真)
    已载入 ＝ 已载入 ＋ 1
.默认

.判断结束
.判断开始 (文件是否存在 (取运行目录 () ＋ “\qingling.dll”) ＝ 真)
    已载入 ＝ 已载入 ＋ 1
.默认

.判断结束
.判断开始 (文件是否存在 (取运行目录 () ＋ “\usdjq.dll”) ＝ 真)
    已载入 ＝ 已载入 ＋ 1
.默认

.判断结束
.判断开始 (文件是否存在 (取运行目录 () ＋ “\AdjProg.dll”) ＝ 真)
    已载入 ＝ 已载入 ＋ 1
.默认

.判断结束
.判断开始 (已载入 ＞ 0)
       载入 (窗口1, , 假)
.默认
    载入 (窗口2, , 假)
.判断结束

孤心人

不要用判断命令，用“如果真”命令

判断命令只是针对当前判断，如果正确下面的就不判断了，所以不能全部去判断存不存在

James丶Chen

LS说得对喔.

exit11

判断条件不充分，当全部文件不存在时，已载入=0，一样会载入窗口2

.版本 2

.判断开始 (已载入 ＞ 0)
    载入 (窗口1, , 假)
.判断 (已载入 ＝ 7)
    载入 (窗口2, , 假)

灰色GiveUp

{:3_244:}{:3_244:}只需要一个代码即可 判断多文件存在且提示.rar (1.07 KB, 下载次数: 13)

2011-7-27 17:16 上传

点击文件名下载附件

Room

最好用如果真, 判断不好使, 如果真(文件是否存在(取运行目录 () ＋ “\psapi.dll”))

78353208

.版本 2

.程序集 窗口程序集1

.子程序 __启动窗口_创建完毕

.如果 (文件是否存在 (取运行目录 () ＋ “\psapi.dll”) ＝ 假 且 文件是否存在 (取运行目录 () ＋ “\krnln.fnr”) ＝ 假 且 文件是否存在 (取运行目录 () ＋ “\eAPI.fne”) ＝ 假 且 文件是否存在 (取运行目录 () ＋ “\epsonwsp.dll”) ＝ 假 且 文件是否存在 (取运行目录 () ＋ “\qingling.dll”) ＝ 假 且 文件是否存在 (取运行目录 () ＋ “\usdjq.dll”) ＝ 假 且 文件是否存在 (取运行目录 () ＋ “\AdjProg.dll”) ＝ 假)
    ' 这里 是某个文件不存在 而提示的代码
    载入 (窗口1, , 假)
.否则
    载入 (窗口2, , 假)
.如果结束



(灰色GiveUp )提供的代码我测试了 ，文件删除几个   运行还是载入窗口2   提示文件是全的  晕
但还是得谢谢你

78353208

不过 我还是  找到正确的方法了：共享如下

• .版本 2
• .子程序 判断文件
• .局部变量 已载入, 逻辑型
• .判断开始 (文件是否存在 (取运行目录 () ＋ “\psapi.dll”) ＝ 假)
• 已载入 ＝ 真
• .判断 (文件是否存在 (取运行目录 () ＋ “\krnln.fnr”) ＝ 假)
• 已载入 ＝ 真
• .判断 (文件是否存在 (取运行目录 () ＋ “\eAPI.fne”) ＝ 假)
• 已载入 ＝ 真
• .判断 (文件是否存在 (取运行目录 () ＋ “\epsonwsp.dll”) ＝ 假)
• 已载入 ＝ 真
• .判断 (文件是否存在 (取运行目录 () ＋ “\qingling.dll”) ＝ 假)
• 已载入 ＝ 真
• .判断 (文件是否存在 (取运行目录 () ＋ “\usdjq.dll”) ＝ 假)
• 已载入 ＝ 真
• .判断 (文件是否存在 (取运行目录 () ＋ “\AdjProg.dll”) ＝ 假)
• 已载入 ＝ 真
• .默认
• 已载入 ＝ 假
• .判断结束
• .判断开始 (已载入)
• 载入 (窗口1, , 假)
• .默认
• 载入 (窗口2, , 假)