[VB6 ] 讀檔檔案過大之問題
'把整個文字檔讀進來
On Error GoTo OPENERR
Var = ""
sDataSrc = ""
Open App.Path & "\Data\" & File1.FileName For Input As #1
Var = InputB(LOF(1), #1)
sDataSrc = StrConv(Var, vbUnicode)
Close #1
OPENERR:
Close #1
Form1.MousePointer = 0
MsgBox Err.Description
Unload Me
我想讀一個檔案(檔案有1.4G)
var = inputb(lof(1), #1)跑完就直接跳到openerr
出現的錯誤訊息是 字串空間不足
這是檔案太大沒辦法讀進來嗎?
請問有什麼方法可以解決嗎? 謝謝!!
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.222.162.50
※ 編輯: aabbccd 來自: 61.222.162.50 (07/22 09:29)
※ 編輯: aabbccd 來自: 61.222.162.50 (07/22 09:31)
推
07/22 12:44, , 1F
07/22 12:44, 1F
→
07/22 12:45, , 2F
07/22 12:45, 2F
推
07/23 12:38, , 3F
07/23 12:38, 3F
→
07/23 12:39, , 4F
07/23 12:39, 4F
推
07/23 13:24, , 5F
07/23 13:24, 5F