web37.html

来自「javascript 的一些简单例子 主要面对初学者」· HTML 代码 · 共 11 行

<script language="VBScript">
Dim fso,myfile,msg
Set fso=CreateObject("scripting.filesystemobject")
myfile="d:/java"
If fso.fileexists(myfile)Then
msg=myfile+"exits"
Else
msg=myfile+"not exits"
End If
MsgBox msg
</script>