取错误信息文本

jr21066

就是GetLastError.不过把返回的数字加上了中文提示,提示信息在常量里.

  

子程序名	返回值类型	公开	备 注
取错误信息文本	文本型

变量名	类 型	静态	数组	备 注
局_错误值	文本型
局_文本数组	文本型		0
计数器	整数型

局_错误值 ＝ 到文本 (GetLastError ()) ＋ “-”
局_文本数组 ＝ 分割文本 ( #GetLastError提示, #换行符, )
计次循环首 (取数组成员数 (局_文本数组), 计数器)
如果真 (取文本左边 (局_文本数组 [计数器], 取文本长度 (局_错误值)) ＝ 局_错误值)
返回 (局_文本数组 [计数器])

计次循环尾 ()
返回 (“”)

.版本 2<br /> <br /> .子程序 取错误信息文本, 文本型<br /> .局部变量 局_错误值, 文本型<br /> .局部变量 局_文本数组, 文本型, , "0"<br /> .局部变量 计数器, 整数型<br /> <br /> 局_错误值 ＝ 到文本 (GetLastError ()) ＋ “-”<br /> 局_文本数组 ＝ 分割文本 (#GetLastError提示, #换行符, )<br /> .计次循环首 (取数组成员数 (局_文本数组), 计数器)<br />     .如果真 (取文本左边 (局_文本数组 [计数器], 取文本长度 (局_错误值)) ＝ 局_错误值)<br />         返回 (局_文本数组 [计数器])<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 返回 (“”)

项目部002

下个版本发布前添加此命令，感谢建议

jr21066

好了.用api再写一个

  

子程序名	返回值类型	公开	备 注
取错误信息文本	文本型

变量名	类 型	静态	数组	备 注
局_错误值	整数型
局_错误信息文本	文本型
计数器	整数型

局_错误值 ＝ GetLastError ()
局_错误信息文本 ＝ 取空白文本 (512)
FormatMessageA ( #FORMAT_MESSAGE_FROM_SYSTEM, #FORMAT_MESSAGE_IGNORE_INSERTS, 局_错误值, 0, 局_错误信息文本, 取文本长度 (局_错误信息文本), 0)
返回 (“错误码:” ＋ 到文本 (局_错误值) ＋ “|” ＋ 删首尾空 (局_错误信息文本))

DLL命令名	返回值类型	公开	备 注
FormatMessageA	整数型
DLL库文件名:
kernel32
在DLL库中对应命令名:
FormatMessageA
参数名	类 型	传址	数组	备 注
dwFlags	整数型			0
lpSource	整数型			0
dwMessageId	整数型			0
dwLanguageId	整数型			0
lpBuffer	文本型			0
nSize	整数型			0
Arguments	整数型			0

常量名称	常量值	公 开	备 注
FORMAT_MESSAGE_FROM_SYSTEM	4096
FORMAT_MESSAGE_IGNORE_INSERTS	512

.版本 2<br /> <br /> .子程序 取错误信息文本, 文本型, 公开<br /> .局部变量 局_错误值, 整数型<br /> .局部变量 局_错误信息文本, 文本型<br /> .局部变量 计数器, 整数型<br /> <br /> 局_错误值 ＝ GetLastError ()<br /> 局_错误信息文本 ＝ 取空白文本 (512)<br /> FormatMessageA (#FORMAT_MESSAGE_FROM_SYSTEM, #FORMAT_MESSAGE_IGNORE_INSERTS, 局_错误值, 0, 局_错误信息文本, 取文本长度 (局_错误信息文本), 0)<br /> 返回 (“错误码:” ＋ 到文本 (局_错误值) ＋ “|” ＋ 删首尾空 (局_错误信息文本))<br /> <br /> .版本 2<br /> <br /> .DLL命令 FormatMessageA, 整数型, "kernel32", "FormatMessageA"<br />     .参数 dwFlags, 整数型, , 0<br />     .参数 lpSource, 整数型, , 0<br />     .参数 dwMessageId, 整数型, , 0<br />     .参数 dwLanguageId, 整数型, , 0<br />     .参数 lpBuffer, 文本型, , 0<br />     .参数 nSize, 整数型, , 0<br />     .参数 Arguments, 整数型, , 0<br /> <br /> .版本 2<br /> <br /> .常量 FORMAT_MESSAGE_FROM_SYSTEM, "4096"<br /> .常量 FORMAT_MESSAGE_IGNORE_INSERTS, "512"

jr21066

Hoibben 发表于 2018-10-13 23:30
win7 x64 中文 其他未测~

白写了...

Hoibben

jr21066 发表于 2018-10-13 23:23
系统返回的应该是英文的吧

win7 x64 中文 其他未测~

jr21066

Hoibben 发表于 2018-10-13 22:54
FormatMessage 了解一下~

系统返回的应该是英文的吧

Hoibben

FormatMessage 了解一下~