Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")
If fso.FileExist("C:\command.com") = True Then
MsgBox "C:\Command.com 文件已存在"
Else
MsgBox "C:\Command.com 文件不存在"
End IfSet fso = Nothing
Set fso = CreateObject("Scripting.FileSystemObject")
If fso.FileExist("C:\command.com") = True Then
MsgBox "C:\Command.com 文件已存在"
Else
MsgBox "C:\Command.com 文件不存在"
End IfSet fso = Nothing
解决方案 »
- 关于从数据库查询数据到recordset里数据类型变化问题?
- 怎么样编1+1/2+2/3+3/4.....+n-1/n用for next和do loop
- \请救一下关于在VB中使用注册表的问题(小弟很菜,请各位高手指点一下)
- 为什么我的程序在qbasic下和vb下都是定义了single变量,但结果不一样?
- 怎样让GIF动画在From中动起来呀?
- 请教!一个vb操作数据库的问题
- 为何dbs2.Execute "INSERT INTO ..."语句不能写入查询的结果
- 用vb怎么控制斑马zerba条码打印机
- 如何分解邮件原始信息
- 怎样通过Internet访问SQLSERVER数据库??
- 本人开发的AAFlexGrid表格控件发布,请大家帮助测试使用。
- 程序开发人员的工资调查
Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")
If fso.FileExists("C:\command.com") = True Then
MsgBox "C:\Command.com 文件已存在"
Else
MsgBox "C:\Command.com 文件不存在"
End IfSet fso = Nothing
要这么麻烦吗
if dir("c:\command.com")="" then msgbox "文件不存在"