我正在尝试加载 0f 250MB 的 XML 文件。但它无法加载文件。请指导我。
我展示了我正在使用的代码。
frmArvindKMM.CD.Filter = "Text File(*.xml)|*.xml|All File |*.*"
frmArvindKMM.CD.ShowOpen
If frmArvindKMM.CD.FileName = "" Then
MsgBox "Import Failed", vbCritical + vbOKOnly, "AMN & Co."
Exit Sub
End If
Set xmlDoc = New DOMDocument30
If frmArvindKMM.CD.FileName = "" Then
MsgBox "Failed to import"
Exit Sub
ElseIf xmlDoc.Load(frmArvindKMM.CD.FileName) Then
xmlDoc.async = False
Else
MsgBox "Failed to import"
Exit Sub
End If