Private Declare Function DeleteFile Lib "kernel32" Alias "DeleteFileA" (ByVal lpFileName As String) As Long '************************************************************* Public Function ImportPhoto(sPicFile As String, sEmpID As