Type a page name and press Enter. You'll jump to the page if it exists, or you can create it if it doesn't.
To create a page in a module other than kernel32, prefix the name with the module name and a period.
[System.Runtime.InteropServices.StructLayout(LayoutKind.Sequential)]
public struct OFSTRUCT
{
public byte cBytes;
public byte fFixedDisc;
public UInt16 nErrCode;
public UInt16 Reserved1;
public UInt16 Reserved2;
[System.Runtime.InteropServices.MarshalAs(System.Runtime.InteropServices.UnmanagedType.ByValTStr, SizeConst = 128)]
public string szPathName;
}
VB.NET Signature:
Private Declare Function OpenFile Lib "kernel32.dll" (ByVal lpFileName As String, ByRef lpReOpenBuff As OFSTRUCT, ByVal uStyle As Long) As Long
User-Defined Types:
<System.Runtime.InteropServices.StructLayout(LayoutKind.Sequential)> _
Public Structure OFSTRUCT
Public cBytes As Byte
Public fFixedDisc As Byte
Public nErrCode As UInt16
Public Reserved1 As UInt16
Public Reserved2 As UInt16
<System.Runtime.InteropServices.MarshalAs(System.Runtime.InteropServices.UnmanagedType.ByValTStr, SizeConst:=128)> _
Public szPathName As String
End Structure
Notes:
None.
Tips & Tricks:
Please add some!
Sample Code:
Private Const OF_EXIST As Long = &H4000
Private Const OF_ERROR As Long = -1
Private Const OFS_MAXPATHNAME As Long = 128
Public Function FileExists(ByVal sFile As String) As Boolean
Dim lRetVal As Long
Dim of As OFSTRUCT
lRetVal = OpenFile(sFile, of, OF_EXIST)
If lRetVal <> OF_ERROR Then
FileExists = True
Else
FileExists = False
End If
End Function
Alternative Managed API:
Do you know one? Please contribute it!
Please edit this page!
Do you have...
helpful tips or sample code to share for using this API in managed code?
corrections to the existing content?
variations of the signature you want to share?
additional languages you want to include?
Select "Edit This Page" on the right hand toolbar and edit it! Or add new pages containing supporting types needed for this API (structures, delegates, and more).