CreateFile()に関して (ID:142897)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 VisaulBasic2008Exp版を使用しています。 CreateFile()APIを使用してバイナリファイルを読み出したいのですが、 CreateFile()が失敗してその先に進めません。 どなたかアドバイス頂けないでしょうか? 宣言部 Public Declare Function CreateFile Lib "kernel32.dll" Alias CreateFileA" _ (ByVal lpFileName As String, ByVal dwDesiredAccess As Integer, ByVal dwShareMode As Integer, ByRef lpSecurityAttributes As Integer, ByVal dwCreationDisposition As Integer, ByVal dwFlagsAndAttributes As Integer, ByVal hTemplateFile As Integer) As Integer Public Const GENERIC_READ = &H80000000 Public Const OPEN_EXISTING = 3 関数部 Dim fp As Integer Dim file As String file="C:\bin\ABC.bin" fp = CreateFile(file, GENERIC_READ, 0, 0, OPEN_EXISTING, 0, 0) 上記を実行するとfpに-1が戻ってきて失敗しています。 fileは確実にありますし、大文字小文字を変えてみても変化ありませんでした。