VFP调用Sql Server的查询语句（通用类）！

最新推荐文章于 2022-10-11 16:56:06 发布

最新推荐文章于 2022-10-11 16:56:06 发布 · 326 阅读

文章标签：

#数据库

本文深入探讨了SQL查询的基本语法及其在数据库操作中的应用，包括如何使用SQL语句读取特定表的数据，并通过错误处理确保数据读取的顺利进行。

* ----------------------------------------------------------------------- \\ sql_select

m_sql="SELECT * from sys_menu" && \\ sql语句
m_dbf='menu1' && \\ 临时表名称
m_name='菜单表' && \\ 提示表描述
do cx\sql_select
thisform.retu

SELECT menu1
GO top

* ----------------------------------------------------------------------- \\ 另一个调用程序

IF USED("&m_dbf")
USE IN &m_dbf
ENDIF

m_retu=0

IF SQLEXEC(gnMyLogHandle,m_sql,m_dbf) = -1
m_retu=1
AERROR( laError )
MESSAGEBOX( '读取数据库错误提示：' + ALLTRIM(STR(laError[ 1 ])) + CHR( 13 ) +laError[ 2 ])
ENDIF
* ------------------------------------------------------------------------------------------- \\ 检查是否出错

IF m_retu=1
MESSAGEBOX(m_sql)
STRTOFILE(m_sql ,"c:\Error.TXT")
MESSAGEBOX('请注意：系统在【读取】数据【'+m_name+'】时，发生错误，请检查网络是否畅通或与系统管理员联系！'+m_message,48,m_message1)
RETURN
ENDIF