⑴ 怎样在文件夹中一次选中多个文件
1、首先鼠标单击打开要选择文件的文件夹。
⑵ 如何用Java判断两个文件内容是否相同
如果你维护这些文件列表,并且后期会不定期进行比较,也就是确定一个文件有多次被比较的机会。可以计算这些文件的MD5并缓存起来,后期直接用MD5进行比较。
如果只是临时性的随机选两个文件进薯碰行比较,可以先比较文件伍雹大小,如果文件大小不同就说明文件内容不相同。如果大小相等的话,可以打开这两个文件的输入流,字节逐一比较,如果中间有不相等的字节就说明两个文件不相等,然后直接退出比较,需要注意的是文件流要缓冲(BufferedInputStream)。
之所以不推荐MD5是因为MD5也需要根据文件全部内容计算散列值,可是实际上中途发现有一个字节不相同就可以判定这两个文件是不同的,根本没必要去读取文件的全部内容。
//in1,
in2为两个文件的输入流,数橘谈最后注意流的关闭
int
c;
while
((c
=
in1.read())
!=
-1)
{
if
(in2.read()
!=
c)
return
false;
}
return
true;
⑶ excel 计算文件夹下所有文件中数据求和!请大神指点~
需要使用VBA程序来处理,
将如下代码复制到你的模块内,修改你的文件夹名称(WenJianJiaMingCheng)内容,然后执行即可:
Sub programX()
Application.DisplayAlerts = False :
Application.ScreenUpdating = False : ChengXuWenjianMing = ActiveWorkbook.Name
JiLuBiao = ActiveSheet.Name:
Cells.ClearContents
WenJianJiaMingCheng =
"C:\LiangYouFu\ImportantBackup\" '反斜杠不可省略
WenJianMing = Dir(WenJianJiaMingCheng)
Do While WenJianMing <>
""
WenJianMing = Dir
ChuLiShuJu WenJianJiaMingCheng,
WenJianMing, ChengXuWenjianMing, JiLuBiao
Loop
MsgBox "文件遍历结束,请查看数据!
End Sub
Sub ChuLiShuJu(WenJianJiaMingCheng,
WenJianMing, ChengXuWenjianMing, JiLuBiao)
on error resume next
Workbooks.Open WenJianJiaMingCheng &
WenJianMing
pox =
Application.CountA(Workbooks(ChengXuWenjianMing).Sheets(JiLuBiao).Range("a:a"))
+ 1
Workbooks(ChengXuWenjianMing).Sheets(JiLuBiao).Cells(pox,
1) = WenJianMing
Workbooks(ChengXuWenjianMing).Sheets(JiLuBiao).Cells(pox,
2) = Workbooks(WenJianMing).Sheets("sheet1").Range("a1")
Windows(WenJianMing).Close
savechanges:=False
End Sub