還是使用不到""Creatfile""啊!!又沒有朋友可以寫個例子給我看(編號:2215)

以經不停嘗試多次寫cretaefile的句子,
Private Declare Function CreateFile Lib "kernel32" Alias "CreateFileA" (ByVal lpFileName As String, ByVal dwDesiredAccess As Long, ByVal dwShareMode As Long, lpSecurityAttributes As Any, ByVal dwCreationDisposition As Long, ByVal dwFlagsAndAttributes As Long, ByVal hTemplateFile As Long) As Long
a = CreateFile("e:\abc", GENERIC_READ Or GENERIC_WRITE, 0&, 0&, CREATE_NEW, FILE_ATTRIBUTE_NORMAL, 0&)
我以確定是沒有"abc"這個檔案,但出來的結果還是a=-1,究竟是錯在那裡呢??
當中有一個問題,就是在"lpSecurityAttributes As Any"原本是"lpSecurityAttributes As SECURITY_ATTRIBUTES",而至於"SECURITY_ATTRIBUTES"寫成"any"的原因是按書所抄的,究竟是不是因為這個成變而發生錯誤呢??
還有希望有朋友能寫一個有關createfile的例子給我看
thanks