怎么判断一个文件是否存在

如何判断一个文件是否存在？
请问高手，如何判断一个文件是否存在？如果不存在，则建立这个文件。否则，对该文件进行读取。谢谢！
[最优解释]
dim filePath as String
 filePath="c:\1.txt"
 if dir(filePath)<>"" then 
 CreateObject("Scripting.FileSystemObject").CreateTextFile(filePath, True)
else
 Open filePath For Input As #1
 Dim contentText As String
 contentText = StrConv(InputB(LOF(1), 1), vbUnicode)
 text1.text=contentText
endif

[其他解释]
直接 open ,用Append 模式.
[其他解释]

呵呵，他说的是读取呀。
[其他解释]
说得不够明确啊。