LotusScript- delete files

zhaozj2021-02-16  100

Function Deletefile (Byval SfileName As String) AS Integer On Error Resume Next Deletefile = false if isfile (sfilename) Then Kill sfilename deletefile = not isfile (sfilename) End Function

example

If deletefile ("c: /temp/myfile.doc") The msgbox "The file 'c: /temp/myfile.doc HAS been deleded."

转载请注明原文地址:https://www.9cbs.com/read-14259.html

New Post(0)