摘要: Public Sub test() Dim strPath As String Dim fso As Object Dim objFolder As Object Set fso = CreateObject("Scripting.FileSystemObject") lngSeqNo = 0 st 阅读全文
posted @ 2021-09-12 13:32 奥兰王子 阅读(5465) 评论(0) 推荐(0) 编辑