USE API Programming to Determine Whether a File Exists

USE API Programming to Determine Whether a File Exists

Put this code in a BAS Module:

Public Const INVALID_HANDLE_VALUE = -1Public Const MAX_PATH = 260Public Type FILETIME   dwLowDateTime As Long   dwHighDateTime As LongEnd TypePublic Type WIN32_FIND_DATA   dwFileAttributes As Long   ftCreationTime As FILETIME   ftLastAccessTime As FILETIME   ftLastWriteTime As FILETIME   nFileSizeHigh As Long   nFileSizeLow As Long   dwReserved0 As Long   dwReserved1 As Long   cFileName As String * MAX_PATH   cAlternate As String * 14End TypePublic Declare Function FindFirstFile Lib "kernel32" _   Alias "FindFirstFileA" _  (ByVal lpFileName As String, _   lpFindFileData As WIN32_FIND_DATA) As LongPublic Declare Function FindClose Lib "kernel32" _  (ByVal hFindFile As Long) As LongPublic Function FileExists(sSource As String) As Boolean   Dim WFD As WIN32_FIND_DATA   Dim hFile As Long   hFile = FindFirstFile(sSource, WFD)   FileExists = hFile <> INVALID_HANDLE_VALUE   Call FindClose(hFile)End Function

In the form, place a textbox for inserting the file path, and put a command button to fire the event, like this:

Private Sub Command1_Click()   MsgBox FileExists("c:winntsyscom.txt")End Sub

If the file exists then it will return true, otherwise it will return false.

Share the Post:
Heading photo, Metadata.

What is Metadata?

What is metadata? Well, It’s an odd concept to wrap your head around. Metadata is essentially the secondary layer of data that tracks details about the “regular” data. The regular

XDR solutions

The Benefits of Using XDR Solutions

Cybercriminals constantly adapt their strategies, developing newer, more powerful, and intelligent ways to attack your network. Since security professionals must innovate as well, more conventional endpoint detection solutions have evolved

AI is revolutionizing fraud detection

How AI is Revolutionizing Fraud Detection

Artificial intelligence – commonly known as AI – means a form of technology with multiple uses. As a result, it has become extremely valuable to a number of businesses across

AI innovation

Companies Leading AI Innovation in 2023

Artificial intelligence (AI) has been transforming industries and revolutionizing business operations. AI’s potential to enhance efficiency and productivity has become crucial to many businesses. As we move into 2023, several