Private Declare Function GetTempPath Lib “kernel32” Alias “GetTempPathA” (ByVal _ nBufferLength As Long, ByVal lpBuffer As String) As LongFunction TemporaryDirectory() As String Dim buffer As String * 512, length As
Private Declare Function GetClassName Lib “user32” Alias “GetClassNameA” (ByVal _ hWnd As Long, ByVal lpClassName As String, ByVal nMaxCount As Long) As LongPrivate Declare Function GetWindowText Lib “user32” Alias “GetWindowTextA”
Private Declare Function GetWindowText Lib “user32” Alias “GetWindowTextA” _ (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As LongPrivate Declare Function GetClassName Lib “user32” Alias “GetClassNameA”
Option ExplicitPrivate Declare Function GetStdHandle Lib “kernel32” (ByVal nStdHandle As Long) _ As LongPrivate Declare Function WriteFile Lib “kernel32” (ByVal hFile As Long, _ lpBuffer As Any, ByVal nNumberOfBytesToWrite As
Private Declare Function GetStdHandle Lib “kernel32” (ByVal nStdHandle As Long) _ As LongPrivate Declare Function ReadFile Lib “kernel32” (ByVal hFile As Long, _ lpBuffer As Any, ByVal nNumberOfBytesToRead As Long,
Private Declare Function GetClassName Lib “user32” Alias “GetClassNameA” (ByVal _ hwnd As Long, ByVal lpClassName As String, ByVal nMaxCount As Long) As Long’ Return the class name of the specified