VFP实现Thumbs.db系统缓存缩略图的查看.doc

该【VFP实现Thumbs.db系统缓存缩略图的查看 】是由【amikiri】上传分享，beplayapp体育下载一共【21】页，该beplayapp体育下载可以免费在线阅读，需要了解更多关于【VFP实现Thumbs.db系统缓存缩略图的查看 】的内容，可以使用beplayapp体育下载的站内搜索功能，选择自己适合的beplayapp体育下载，以下文字是截取该文章内的部分文字，如需要获得完整电子版，请下载此beplayapp体育下载到您的设备，方便您编辑和打印。,系统增加了图片预览功能,保存了图片的文件夹下会产生一个名为“”的文件,改文件为系统隐藏属性,一旦用户在使用图片预览功能来查看文件夹里的图形时改文件就会自动生成,由于此原因改文件也常常成为泄密隐私的祸首之一,记得当初***门初期传播的时候许多人就是在传播这个文件,,由于很多编程人员对复合beplayapp体育下载不是很了解再加上微软当初对复合beplayapp体育下载结构的不公开,,在这里,,希望对大家有所帮助。VFPCode:Public_Form1_Form1=CreateObject("Form1")*-**-*DEFINECLASSForm1ASformTop=21Left=250Height=299Width=385DoCreate=.=.="--行者示例"BackColor=RGB(205,205,152)Name="Form1"("Command1","_classname1")("Text1","_classname2")("List1","_classname3")("Container1","_classname4")("Image1","_classname5")SETDATEANSISETDATELONGSETSAFETYOFFSETTEXTMERGEONewfilename,fst,stg_handle,fmark,stgfilename,sele_mark,tree_clicktree_click=.=.=.=12Left=12Height=25Width=48Caption="打开"Name="Command1"PROCEDUREClickstg_handle=0CREATECURSORDocFormat(DIDN(5),fnameC(32),ftypeN(1),LDIDN(4),RDIDN(4),NEXTDIDN(4),DOCSIZEN(14),FADRESSN(14),CreatTimeC(8),EditTimeC(8))stgfilename=GETFILE()=stgfilenamestg_handle=FOPEN(stgfilename)IFstg_handle>0fmark=FREAD(stg_handle,8)&&文件标识IFfmark==0hD0CF11E0A1B11AE1读取文件头信息**mark=FREAD(stg_handle,16)&&文件唯一标识FREAD(stg_handle,2)&&文件格式修订号FREAD(stg_handle,2)&&文件格式版本号FREAD(stg_handle,2)&&字节顺序规则标识ssz=2^CTOBIN(FREAD(stg_handle,2),'2rs')&§or大小s_s_size=2^CTOBIN(FREAD(stg_handle,2),'2rs')&&shortsector大小FREAD(stg_handle,10)&&NOUSEDsat_sectors=CTOBIN(FREAD(stg_handle,4),'4rs')&&存放扇区配置表的sector总数frst_SID=CTOBIN(FREAD(stg_handle,4),'4rs')&&存放目录流的第一个sector的SIDFREAD(stg_handle,4)&&NOUSEDmin_size=CTOBIN(FREAD(stg_handle,4),'4rs')&&标准流的最小值ssat_SID=CTOBIN(FREAD(stg_handle,4),'4rs')&&存放短扇区配置表的第一个sector的SIDssat_sectors=CTOBIN(FREAD(stg_handle,4),'4rs')&&存放短扇区配置表的sector总数mast_SID=CTOBIN(FREAD(stg_handle,4),'4rs')&&存放主扇区配置表(Mast)的第一个sector的SIDmast_sectors=CTOBIN(FREAD(stg_handle,4),'4rs')&&存放主扇区配置表(Mast)的sector总数sec_pos=512+frst_SID*ssz&&第一个sector的偏移**以下获取全部主扇区配置表的内容,存放于mast_st中FSEEK(stg_handle,76)mast_st=FREAD(stg_handle,436)&&先读取文件头中的主扇区配置表IFmast_SID>0&&主扇区配置表大于109个FSEEK(stg_handle,(mast_SID-1)*512+1024)&&偏移到第一个mastsectorFORi=1TOmast_sectorsmast_st=mast_st+FREAD(stg_handle,508)&&ssz-4IFi0PUBLICARRAYssat_index(ssat_sectors*512/4)&&存放短扇区链i==-2EXITENDIFSEEK(stg_handle,(i+1)*512)ssat_str=ssat_str+FREAD(stg_handle,512)i=sid_index(i+1)IFi=-2EXITENDIenddFORi=1TOssat_sectors*512/4ssat_index(i)=CTOBIN(SUBSTR(ssat_str,(i-1)*4+1,4),'4rs')endfSTRTOFILE(ssat_str,'3')PUBLICssid_word&&存放全部短流ssid_word=''GO1i=fadress&&=ii=sid_index(i+1)FSEEK(stg_handle,(k+1)*512)ssid_word=ssid_word+FREAD(stg_handle,512)IFi=-2EXITENDIENDDENDIFFCLOSE(stg_handle)sele_mark=.=OUNT()GOiIFval(ALLTRIM(fname))>(STRTRAN(ALLTRIM(fname),0h00,'')+'.jpg')ENDIENDFELSEFCLOSE(stg_handle)sele_mark=.('该文件不是复合beplayapp体育下载',48,'信息提示')ENDIFENDIENDPROCENDDEFINEDEFINECLASS_classname2AStextboxVisible=.=24Left=72Top=12Width=300Name="Text1"ENDDEFINEDEFINECLASS_classname3ASlistboxVisible=.=240Left=12SpecialEffect=1"ToolTipText="双击保存Top=48Width=108Name="List1"PROCEDUREDblClickPUTFILE('当前缩略图另存为',newfilename,'.jpg')ENDPROCPROCEDUREClickIFstg_handle>0rstr=SUBSTR(,1,LEN()-4)LOCATEFORALLTRIM(STRTRAN(fname,0h00,''))==rstrfst=''<=2i==iIFi=-2EXIT