摘要:
Sub createMenus() Dim cmdBar As CommandBar Dim cmdMenu As CommandBarPopup Dim cmdBtn As CommandBarButton Set cmdBar = Application.CommandBars("WorkSheet Menu Bar") 'Set cmdBar = Application.CommandBar 阅读全文
摘要:
Sub ImportData() ' ' Copy Data from one workbook to the Current Workbook ' Place the macro file in the same folder as the source file ' p = ThisWorkbook.Path & "\" f = Dir(p & "*.xlsx")... 阅读全文
摘要:
var fs = require("fs"); var nowDate = new Date(); var result = nowDate.toLocaleDateString()+""+ " "+ nowDate.toLocaleTimeString(); fs.appendFile("d:/2/js/hello.txt",result+"\n", err => { if (!err... 阅读全文
摘要:
var express = require('express'); var app = express(); app.get('/', function(req, res){ res.send('hello world'); }); var server = app.listen(3000,'localhost', function(){ var host = server.a... 阅读全文