至 SunDayBoys

[cz9986]

edyang给出如下程序：

Dim hFile As Long
Dim sa As SECURITY_ATTRIBUTES
hFile = CreateFile("c:\autoexec.bat", GENERIC_READ, FILE_SHARE_READ, sa, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0)
MsgBox hFile, vbInformation
CloseHandle hFil

可显示 -1 , ??????? ，将FILE_EXISTING换成FILE_ALWAYS一样。

UN1 提供的方法，
hFile = CreateFile("c:\autoexec.bat", GENERIC_READ, FILE_SHARE_READ, ByVal 0, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0)
却只显示 236,无论换成什么文件名？？？

将OPEN_EXISTING换成OPEN_ALWAYS还是不行，快救救我？？？

最好请哪位高手不辞辛苦 伊妹儿一个调试好的源程序给我，我快吐血啦！！！
不胜感激，哪天请各位高手吃饭：）
我的地址：[e-mail]
邪门啦？？？？