访问 sql出错时，如果屏掉这样的提示？

st_2000 2016-06-23 12:27:42

连接失败：
SQLState:01000
......

这样的提示也太专业了，用户看不懂

如何让它提示：连接服务器失败，请联系网络管理员.....等等，这样的白话？

...全文

1180 5 打赏收藏转发到动态举报

写回复

用AI写文章

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

jesons 2016-08-19

打赏
举报

程序里的错误信息我一般是都是直接反馈给用户的，用户碰到错误提示，我让它截屏给我 ^_^

st_2000 2016-08-13

打赏
举报

着实感谢十豆三，感谢大家！！！！

十豆三 2016-07-18

打赏
举报

前面再加一行： SQLSetprop(0,"DispLogin",3)

st_2000 2016-07-16

打赏
举报

SQLSetprop(0, 'DispWarnings', .F.) T_XHANDLE=SQLSTRINGCONNECT(sqlconnstr) If T_XHANDLE <= 0 MessageBox('连接数据库服务器失败！',0,'Error:') Clear Events QUIT ENDIF 这样写的，还是提示sql server的错误登录框

都市夜猫 2016-06-23

打赏
举报

设置连接的 DispWarnings 属性试试

SQLSetprop(0, 'DispWarnings', .f.)
If SQLStringConnect(.....) < 1
	AError(aTemp)
	MessageBox('连接服务器失败，请联系网络管理员' + Chr(13)+Chr(13) + aTemp[3])
	Return .F.
EndIf