CreateFolder 是API吧!VB自带 mkdir 命令可以建立文件夹。建立文件常用有 open 命令。 open "c:\test.txt" for output as #1 print #1,"这是一个文本文件!" close #1
'复制到一个文本文件里,另存为后缀名 .vbs 的文件。双击即可创建 C:\Script 目录 Set objFSO = CreateObject("Scripting.FileSystemObject") objFSO.CreateFolder("C:\Script")
楼上的objFSO定义的是什么类型呀
//楼上的objFSO定义的是什么类型呀Dim objFSO As Object
objFSO 是对象类型Dim objFSO As Object
创建文件夹直接使用MkDir函数
Option Explicit Dim fso As FileSystemObject Private Sub Form_Load() Set fso = New FileSystemObject fso.CreateFolder ("D:\Folder") fso.CreateTextFile ("D:\Folder\10.txt")End Sub你需要引用Scripting Runtime这个文件
open "c:\test.txt" for output as #1
print #1,"这是一个文本文件!"
close #1
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.CreateFolder("C:\Script")
Dim fso As FileSystemObject
Private Sub Form_Load()
Set fso = New FileSystemObject
fso.CreateFolder ("D:\Folder")
fso.CreateTextFile ("D:\Folder\10.txt")End Sub你需要引用Scripting Runtime这个文件