Private Declare Function CreateFile Lib "kernel32" Alias "CreateFileA" (ByVal lpFileName As String, ByVal dwDesiredAccess As Long, ByVal dwShareMode As Long, lpSecurityAttributes As SECURITY_ATTRIBUTES, ByVal dwCreationDisposition As Long, ByVal dwFlagsAndAttributes As Long, ByVal hTemplateFile As Long) As LongPrivate Type SECURITY_ATTRIBUTESnLength As LongbInheritHandle As LonglpSecurityDescriptor As LongEnd TypePrivate Sub MYSub_Click()Dim SA As SECURITY_ATTRIBUTESFileHandle =CreateFile("C:\abc.jpeg", GENERIC_WRITE, FILE_SHARE_READ Or FILE_SHARE_WRITE, SA, OPEN_EXISTING, 0, 0)End Sub當(dāng)執(zhí)行編譯到CreateFile這行時,編譯器報告說SA這個參數(shù)類型不對的錯誤,怎么解決這個問題呢?將SA替換為0或者1等,雖然編譯能夠通過,但得到的FileHandle 句柄值始終為-1,這與事實不符,導(dǎo)致后續(xù)的處理無法,要怎么設(shè)置這個SA值呢?兩位的方法都調(diào)試過了,都仍然報錯,終于找到方法了,將SA 替換為vbNullString之后就成功了,但我不知道是為什么這么替換后就成功了。分?jǐn)?shù)不能浪費(fèi),先來先得吧。
2 回答

MMTTMM
TA貢獻(xiàn)1869條經(jīng)驗 獲得超4個贊
SA你沒賦值,只聲明了變量的類型
SA.lpSecurityDescriptor = &O0
SA.bInheritHandle = False
SA.nLength = Len(SecAttrib)
- 2 回答
- 0 關(guān)注
- 669 瀏覽
添加回答
舉報
0/150
提交
取消