CString TO CTime 实现函数

CTime DataTransfer::ToCTime(CString StrTime) 

 { 

  CString    strCString=StrTime;     

  COleVariant vtime(strCString);   

  vtime.ChangeType(VT_DATE);   

  COleDateTime time=vtime;   

  SYSTEMTIME    systime;   

  VariantTimeToSystemTime(time,&systime);   

  CTime tm(systime); 

  return tm; 

 }