大神,在吗
我用API的方式用WriteFile函数向一个文本文件中写入字符,但为什么WriteFile函数返回值老是为0呀,并且我用GetLastError(),返回值也是0,意思是writefile函数操作成功,但实际没写入呀!求大神指教!
这是程序代码:
TextNew = CreateFile("F:\APP VB\sample - Senior\File_New_API\TextNew_API.txt", (GENERIC_READ Or GENERIC_WRITE), FILE_SHARE_READ Or FILE_SHARE_WRITE, ByVal 0&, CREATE_ALWAYS, 0, 0) *创建文件"
retal = WriteFile(TextNew, TextSend.Text, Len(TextSend.Text), RetBytes, 0)‘向txt文件中写入文本框中的数据
ErrorWrite = GetLastError()’捕获错误信息
程序运行结果WriteFile函数和GetLastError函数返回值都为0,是不是很矛盾呀,并且我看了txt文件中,没有任何数据写入!
求大神指教
我用API的方式用WriteFile函数向一个文本文件中写入字符,但为什么WriteFile函数返回值老是为0呀,并且我用GetLastError(),返回值也是0,意思是writefile函数操作成功,但实际没写入呀!求大神指教!
这是程序代码:
TextNew = CreateFile("F:\APP VB\sample - Senior\File_New_API\TextNew_API.txt", (GENERIC_READ Or GENERIC_WRITE), FILE_SHARE_READ Or FILE_SHARE_WRITE, ByVal 0&, CREATE_ALWAYS, 0, 0) *创建文件"
retal = WriteFile(TextNew, TextSend.Text, Len(TextSend.Text), RetBytes, 0)‘向txt文件中写入文本框中的数据
ErrorWrite = GetLastError()’捕获错误信息
程序运行结果WriteFile函数和GetLastError函数返回值都为0,是不是很矛盾呀,并且我看了txt文件中,没有任何数据写入!
求大神指教