if exist('u:\ibm\as400.kmp') = 0
  go u:
  md 'ibm'
  copy 's:\caccess\as400.kmp' 'u:\ibm\as400.kmp'
endif  

_________________________
Give a man a fish and he will be back for more. Slap him with a fish and he will go away forever.