7,763
社区成员
发帖
与我相关
我的任务
分享
Dim xml_document As New DOMDocument 'XML ROOT
'创建过程
'保存
xml_document.save filePath + "\AddDevice-JY33010230_" & ID & ".xml"
Set xml_document = Nothing
'打开这个文件
Open txtUploadFile For Input As #1
'系统就提示 文件已经打开