CFile tmpfile;

  tmpfile.Open(filepath,CFile::modeRead);

  DWORD complen=tmpfile.GetLength();

  BYTE* header=(BYTE*)::GlobalAlloc(GPTR,8);

  BYTE* buf=(BYTE*)::GlobalAlloc(GPTR,(complen-8)*1.01+12);

  BYTE* bufd=(BYTE*)::GlobalAlloc(GPTR,(filelen-8)*1.01+12);

  tmpfile.Read(header,8);

  tmpfile.ReadHuge(buf,complen-8);

  tmpfile.Close();

  unsigned long destlen;//return the value of the destlen.

  uncompress(bufd,&destlen,buf,(complen-8)*1.01+12);

 //uncompress the swf file and return the destination file length.

  header[0]=‘F‘;//change the header indentifier.

 CString temp1,temp2;

  temp1=filepath.Left(filepath.GetLength()-4);

  temp2.Format("~%s$.swf",temp1);

  CFile filedes;

  filedes.Open(temp2,CFile::modeCreate|CFile::modeWrite);

  filedes.Write(header,8);

  filedes.Write(bufd,destlen);

  filedes.Close();

  ::GlobalFree(buf);

  ::GlobalFree(bufd);

  return temp2;