using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; using System.IO; using System.Collections; namespace ProductElectronQuote { public pa
var fs = require("fs") var path = require("path") var listRealPath = path.resolve(__dirname); var newPath = path.resolve(__dirname+'/newFile'); // 整合到 新文件夹的名称 需要手动创建 或者更改为已存在的名称 var formatList = ['avi', 'mp4', 'mov', 'rmvb', 'mkv']; re
Sub OneTxt() '打开一个txt文件 Dim Filename As Variant, extLine&, mArr() As String Dim i%, j%, txtpath As String Dim txtname As Variant ChDir ThisWorkbook.Path txtpath = "D:\Users\addy.zhao\Desktop\computers\" 'Filename = Application.GetOpenFilenam