1. MFC我想遍歷某個文件夾的所有文件並獲取文件大小，再把它們加起來
RefreshDataTemp(strPath);} //遞歸調用
這里你也寫了，是遞歸調用，那麼也就是子目錄的統計，是在另一個（同名）函數調用中完成的，而size和Size都是局部變數，不會傳遞到上一層函數調用。
解決方法：Size 作為返值或全局變數，tr的三行語句放在這個函數之外，不參與遞歸。
2. python 如何通過儲存在CSV文件中第一列的文件名查找在電腦指定目錄的jpg文件並移動到另外一個指定文件夾
python 移動文件或文件夾操作。python中對文件、文件夾操作時經常用到的os模塊和shutil模塊常用方法。
1.得到當前工作目錄，即當前Python腳本工作的目錄路徑: os.getcwd()
2.返回指定目錄下的所有文件和目錄名:os.listdir()
3.函數用來刪除一個文件:os.remove()
4.刪除多個目錄：os.removedirs(r「c：\python」)
5.檢驗給出的路徑是否是一個文件：os.path.isfile()
6.檢驗給出的路徑是否是一個目錄：os.path.isdir()
7.判斷是否是絕對路徑：os.path.isabs()
8.檢驗給出的路徑是否真地存:os.path.exists()
9.返回一個路徑的目錄名和文件名:os.path.split() eg os.path.split(『/home/swaroop/byte/code/poem.txt』) 結果：(『/home/swaroop/byte/code』, 『poem.txt』)
10.分離擴展名：os.path.splitext()
11.獲取路徑名：os.path.dirname()
12.獲取文件名：os.path.basename()
13.運行shell命令: os.system()
14.讀取和設置環境變數:os.getenv() 與os.putenv()
15.給出當前平台使用的行終止符:os.linesep Windows使用』\r\n』，Linux使用』\n』而Mac使用』\r』
16.指示你正在使用的平台：os.name 對於Windows，它是』nt』，而對於Linux/Unix用戶，它是』posix』
17.重命名：os.rename(old， new)
18.創建多級目錄：os.makedirs(r「c：\python\test」)
19.創建單個目錄：os.mkdir(「test」)
20.獲取文件屬性：os.stat(file)
21.修改文件許可權與時間戳：os.chmod(file)
22.終止當前進程：os.exit()
23.獲取文件大小：os.path.getsize(filename)
文件操作方法大全：
1.os.mknod(「test.txt」) #創建空文件
2.fp = open(「test.txt」,w) #直接打開一個文件，如果文件不存在則創建文件
3.關於open 模式：
w：以寫方式打開，
a：以追加模式打開 (從 EOF 開始, 必要時創建新文件)
r+：以讀寫模式打開
w+：以讀寫模式打開 (參見 w )
a+：以讀寫模式打開 (參見 a )
rb：以二進制讀模式打開
wb：以二進制寫模式打開 (參見 w )
ab：以二進制追加模式打開 (參見 a )
rb+：以二進制讀寫模式打開 (參見 r+ )
wb+：以二進制讀寫模式打開 (參見 w+ )
ab+：以二進制讀寫模式打開 (參見 a+ )
fp.read([size]) #size為讀取的長度，以byte為單位
fp.readline([size]) #讀一行，如果定義了size，有可能返回的只是一行的一部分
fp.readlines([size]) #把文件每一行作為一個list的一個成員，並返回這個list。其實它的內部是通過循環調用readline()來實現的。如果提供size參數，size是表示讀取內容的總長，也就是說可能只讀到文件的一部分。
fp.write(str) #把str寫到文件中，write()並不會在str後加上一個換行符
fp.writelines(seq) #把seq的內容全部寫到文件中(多行一次性寫入)。這個函數也只是忠實地寫入，不會在每行後面加上任何東西。
fp.close() #關閉文件。python會在一個文件不用後自動關閉文件，不過這一功能沒有保證，最好還是養成自己關閉的習慣。 如果一個文件在關閉後還對其進行操作會產生ValueError
fp.flush() #把緩沖區的內容寫入硬碟
fp.fileno() #返回一個長整型的」文件標簽「
fp.isatty() #文件是否是一個終端設備文件(unix系統中的)
fp.tell() #返迴文件操作標記的當前位置，以文件的開頭為原點
fp.next() #返回下一行，並將文件操作標記位移到下一行。把一個file用於for … in file這樣的語句時，就是調用next()函數來實現遍歷的。
fp.seek(offset[,whence]) #將文件打操作標記移到offset的位置。這個offset一般是相對於文件的開頭來計算的，一般為正數。但如果提供了whence參數就不一定了，whence可以為0表示從頭開始計算，1表示以當前位置為原點計算。2表示以文件末尾為原點進行計算。需要注意，如果文件以a或a+的模式打開，每次進行寫操作時，文件操作標記會自動返回到文件末尾。
目錄操作方法大全
1.創建目錄
os.mkdir(「file」)
2.復制文件：
shutil.file(「oldfile」,」newfile」) #oldfile和newfile都只能是文件
shutil.(「oldfile」,」newfile」) #oldfile只能是文件夾，newfile可以是文件，也可以是目標目錄
3.復制文件夾：
4.shutil.tree(「olddir」,」newdir」) #olddir和newdir都只能是目錄，且newdir必須不存在
5.重命名文件(目錄)
os.rename(「oldname」,」newname」) #文件或目錄都是使用這條命令
6.移動文件(目錄)
shutil.move(「oldpos」,」newpos」)
7.刪除文件
os.remove(「file」)
8.刪除目錄
os.rmdir(「dir」) #只能刪除空目錄
shutil.rmtree(「dir」) #空目錄、有內容的目錄都可以刪
9.轉換目錄
os.chdir(「path」) #換路徑
四、文件綜合操作實例
將文件夾下所有圖片名稱加上』_fc』
3. 用dos 命令 看文件大小
dir 文件路徑
就行了，比如F盤有個123.txt的文本文檔，要看它有多大隻需在dos下輸入：dir F:\123.txt
就行了，回答另外給你個數據，1MB=1024kb，1kb=1024b，這里的b就是位元組的意思，也可以說1kb=1024位元組。
4. bat腳本中怎麼獲取文件的大小
如果不用for命令，dir也可以，不過顯示出來的結果可能不是你願意看到的，雖然能顯回示出大小，但太死板了，答文件無論多大都是以位元組為單位，無法進行轉換，如果文件很大的話會顯示比較長的數字串，文件大小不能很直觀的體現出來，而且還顯示出許多其他的一些信息，但如果用for語句的話就比單獨用dir優越得多，以上這些問題都能解決掉，而且還可以加入一些條件語句使之更加靈活適用，如果一次顯示包含多個文件時就需要for和dir組合使用了，dir加個/s可以顯示目錄中所有文件及文件夾（不包括隱藏的），再加/a就包括隱藏文件與文件夾了，總之用dir列出目錄中所有文件，然後讓for來提取最後執行相關命令。
5. 怎麼解除asp上傳文件大小的限制大概會有是什麼樣的語句
ASP上傳文件大小限制語句常見形式：
upFileSize=307200 '設置文件限制為300k=300*1024KB=307200B
按照這個語句就可以設定，版
另外別忘了修改權IIS默認大小限制，IIS是默認限制200k的，若不取消這個限制，ASP的限定即使放開了，也很難生效的
6. vba中要獲取文件夾里excel文件的數量，要用什麼語句
1.GetAttr 函數
語法：GetAttr(pathname)
功能：獲取一個文件、目錄、或文件夾的屬性。返回一個 Integer值。
返回值
由 GetAttr 返回的值，是下面這些屬性值的總和：
常數 值 描述
vbNormal 0 常規
vbReadOnly 1 只讀
vbHidden 2 隱藏
vbSystem 4 系統文件
vbDirectory 16 目錄或文件夾
vbArchive 32 存檔文件
vbalias 64 指定的文件名是別名。只在Macintosh中可用。
說明：若要判斷是否設置了某個屬性，在 GetAttr 函數與想要得知的屬性值之間使用 And 運算符與逐位比較。如果所得的結果不為零，則表示設置了這個屬性值。
示例：
Debug.Print GetAttr("F:\test.txt") '若為存檔文件，在立即窗口可看到值為32
Debug.Print GetAttr("F:\test.txt") '將屬性—高級—可存檔文件的勾去掉後，值為0
為判斷一個文件是否只讀，可用下法:
Debug.Print GetAttr("F:\test.txt") And vbReadOnly
若值非零，說明時只讀的。
2.復制
'
' （1）. 在不需要逐個打開工作簿的情況下,將其有效工作表依次復制到本工作簿的最後.
' 新工作表名為:原工作簿名_原工作表名
'
' Sub 復制工作表()
Dim MyObject As Object
Dim strPath As String, strFileName As String, strMyName As String
Dim shtSheet As Worksheet, strShtName As String
Dim intCount As Integer, intShtCount As Integer, i As Integer
Application.ScreenUpdating = False
strPath = ThisWorkbook.Path
strMyName = ThisWorkbook.Name
intShtCount = ThisWorkbook.Sheets.Count
With Application.FileSearch
.NewSearch
.LookIn = strPath
.SearchSubFolders = False
.Filename = ".xls"
.FileType = msoFileTypeOfficeFiles
If .Execute() > 0 Then
intCount = .FoundFiles.Count
For i = 1 To intCount
strFileName = Replace(.FoundFiles(i), strPath & "\", "")
If strFileName <> strMyName Then
Set MyObject = GetObject(strPath & "/" & strFileName)
'下面進行復制工作
For Each shtSheet In MyObject.Worksheets
strShtName = shtSheet.Name
If MyObject.Sheets(strShtName).UsedRange.Count > 1 Then
MyObject.Sheets(strShtName).Copy After:=ThisWorkbook.Sheets(intShtCount)
intShtCount = intShtCount + 1
'重新命名
strShtName = Replace(strFileName, ".xls", "_") & strShtName
ThisWorkbook.Sheets(intShtCount).Name = strShtName
ThisWorkbook.Sheets("目錄").Cells(i + 1, 1) = strShtName
End If
Next shtSheet
End If
Next i
Else
MsgBox "沒有找到符合指定文件，請修改參數後重新搜索！", ,"提示"
End If
End With
ThisWorkbook.Sheets("目錄").Select
Application.ScreenUpdating = True
End Sub
'
'（2） 逐個打開同一目錄下的所有工作簿,將其有效工作表依次復制到本工作簿的最後.復制完後關閉它.
' 新工作表名為:原工作簿名_原工作表名
'
Sub 復制工作表_2()
Dim MyObject As Object
Dim strPath As String, strFileName As String, strMyName As String
Dim shtSheet As Worksheet, strShtName As String
Dim intCount As Integer, intShtCount As Integer, i As Integer
Application.ScreenUpdating = False
strPath = ThisWorkbook.Path
strMyName = ThisWorkbook.Name
intShtCount = ThisWorkbook.Sheets.Count
With Application.FileSearch
.NewSearch
.LookIn = strPath
.SearchSubFolders = False
.Filename = ".xls"
.FileType = msoFileTypeOfficeFiles
If .Execute() > 0 Then
intCount = .FoundFiles.Count
For i = 1 To intCount
strFileName = Replace(.FoundFiles(i), strPath & "\", "")
If strFileName <> strMyName Then
'Workbooks.Open Filename:=strPath & "/" & strFileName
Set MyObject = GetObject(strPath & "/" & strFileName)
'下面進行復制工作
For Each shtSheet In Workbooks(strFileName).Worksheets
strShtName = shtSheet.Name
If Workbooks(strFileName).Sheets(strShtName).UsedRange.Count > 1 Then
Workbooks(strFileName).Sheets(strShtName).Copy After:=ThisWorkbook.Sheets(intShtCount)
intShtCount = intShtCount + 1
'重新命名
strShtName = Replace(strFileName, ".xls", "_") & strShtName
ThisWorkbook.Sheets(intShtCount).Name = strShtName
ThisWorkbook.Sheets("目錄").Cells(i + 1, 1) = strShtName
End If
Next shtSheet
'Workbooks(strFileName).Close
End If
Next i
Else
MsgBox "沒有找到符合指定文件，請修改參數後重新搜索！", ,"提示"
End If
End With
ThisWorkbook.Sheets("目錄").Select
Application.ScreenUpdating = True
End Sub