我们经常整理学生照片，照片命名为身份证号码，有的照相老师不细心，好多人给忘记拍照了。我想求大神给帮忙设计一个小软件，就是依据一个数据库的字段,字段命名为‘sfzh’。比如数据库里有1000个学生照片，但是放照片的文件夹里只有960张照片，用个小软件，可以查到哪40个学生没有交照片。
还有第二个问题，就是能不能再增加一个功能，就是软件依据一个数据库字段，将字段里的学生照片单独拷贝到一个新文件夹里。比如我有个数据库里边有50人，我想单独把这50人照片拷贝出来放到一个新文件夹里。
麻烦大神根据我说的这两个要求设计一个软件吧，
1、筛选出数据库里有人名但是没照片
2、单独复制数据库里的人的照片
谢谢。

软件最好支持vfp9

1.目前你放相片的路径是？ 如 d:\xxx\pho
2.目前你相片文件名称是？ 如 440106201803234071
3.单独复制，就相当于把以前的文件一段到新文件去，如 d:\xxx\pho 移动到 d:\xxx\pho1
是这样的吧

我照片位置，F盘/zp
数据库表位置在    F盘
如果从zp这个文件夹复制部分照片到新的文件夹，这个文件夹不限制在哪个盘，可以自定

大概意思是这样：
cPath = 图片文件路径，如：F:\zp\
cNewPath = 复制图片文件路径，如：F:\zp\pic\
use 学生表
scan
    cFileName = cPath + alltrim(csfzh) + ".jpg" &&如JPG格式
        * 问题1，查无相片
    if !file(cFileName)
        ? xm, csfzh, "此人无相片"
    endif
        * 问题2，复制相片
    if file(cFileName)
        cNewFileName = cNewPath + alltrim(csfzh) + ".jpg" &&如JPG格式
        copy file (cFileName) to (cNewFileName)
    endif
endscan

在数据库中添加一个字段gm为逻辑性
USE hh &&打开照片对照库
DO WHILE NOT EOF()
   yzp=ALLTRIM(sfzh)+".jpg" &&原照片,就在当前目录下
   gzp=F:\zp\路径+ALLTRIM(xjh)+".jpg" &&改成序号的照片，在当前目录的JPG下
   IF FILE(yzp)
      COPY FILE &yzp TO &gzp
      replace gm with .t.
   ENDIF
   SKIP
ENDDO
SET TALK ON

思路：在表字段中增加一个字段：照片文件名，用于保存该学生的全路径照片文件名，有照片的学生照片文件名字段值为sfzh.jpg。无照片的学生文件名字段值为通用文件名（也就是空照片）

[此贴子已经被作者于2018-3-23 12:11编辑过]

楼主注册本论坛已经十年有余了

哦  厉害 不知道我的是几年了