看得破的人,处处都是生机;

看不破的人,处处都是困境;

拿得起的人,处处都是担当;

拿不起的人,处处都是疏忽;

放得下的人,处处都是大道;

放不下的人,处处都是迷茫;

想得开的人,处处都是春天;

想不开的人,处处都是凋枯;

做何人,在自己;

小自我,大天地;

vbs 简单文件操作

Dim fso, MyFile, fld
Set fso = CreateObject("Scripting.FileSystemObject")
Set fld = fso.createfolder("c:\aaa")
Set MyFile = fso.CreateTextFile("c:\aaa.txt", True)
MyFile.WriteLine("This is a test.")
MyFile.Close

posted @ 2019-03-05 13:51  心电心  阅读(485)  评论(0)  编辑  收藏  举报