2,463
社区成员
发帖
与我相关
我的任务
分享
Sub d()
Dim a() As String
a = Split("src\main\java\erp_connector\servlet\EmployeePayPostServlet.java", "\")
MsgBox a(UBound(a))
End Sub
Dim MyFile As Object
Set MyFile = CreateObject("Scripting.FileSystemObject")
If MyFile.FileExists("E:\dzwebs\Pic\logo.gif" ) = True Then
MsgBox "文件存在"
Else
MsgBox "文件不存在"
End If