Hi,大家好,我是编程小6,很荣幸遇见你,我把这些年在开发过程中遇到的问题或想法写出来,今天说一说我的学猫框之路004[通俗易懂],希望能够帮助你!!!。
今天继续学习猫框,数据库是SQL SERVER中的NorthWind,知识内容来源于猫老师猫框的网站:www.sn58.com(VFP祺佑三层开发框架),在这里先向猫老师表示感谢。
一、准备NorthWind数据库
费了半天的功夫,终于下载、安装好了。
二、进行账套设置:
三、运行猫框
运行项目:Qiyuprj
运行环境设置
运行调试服务器
1、数据查询 SQLQuery方法
参数:SQL语句,游标名
返回表:返回查询的游标
返回值:>=0 返回查询记录数,
<0 表示查询出错
错误信息:存放于类的errmsg属性
*-- 查询雇员表
oDBSQLhelper=NEWOBJECT("MSSQLHelper","MSSQLHelper.prg")
nRow=oDBSQLhelper.SQLQuery("select * from Employees","Employees")
if nRow<0
?oDBSQLhelper.errmsg
endif
BROWSE
2、数据查询 GetSingle 返回单个值
参数:SQL语句
返回值:返回数据的第一行第一列数据,null 且 errmsg不为空说明查询出错。
*-- 查询雇员表记录数
oDBSQLhelper=NEWOBJECT("MSSQLHelper","MSSQLHelper.prg")
?oDBSQLhelper.GetSingle("select count(*) from Employees")
运行后,显示9 (雇员表有9条记录)
3、执行非查询SQL命令 ExecuteSQL方法
参数:SQL语句
返回值:>=0 返回影响记录数, <0 表示查询出错
*--插入或修改记录
*--返回影响的记录数
oDBSQLhelper=NEWOBJECT("MSSQLHelper","MSSQLHelper.prg")
?oDBSQLhelper.ExecuteSQL("update Employees set LastName='123' where EmployeeID=1")
运行后,返回值:1
查看雇员表
第一行的lastname 变成了“123”。
再把它变回原状
oDBSQLhelper=NEWOBJECT("MSSQLHelper","MSSQLHelper.prg")
?oDBSQLhelper.ExecuteSQL("update Employees set LastName='Davolio' where EmployeeID=1")
上一篇
已是最后文章
下一篇
已是最新文章