VFP中用SPT访问SQL Server数据库

最新推荐文章于 2021-01-19 17:14:17 发布
最新推荐文章于 2021-01-19 17:14:17 发布
阅读量192 收藏 1
点赞数
文章标签： 数据库
原文链接：http://www.cnblogs.com/junzhongxu/archive/2008/07/07/1237603.html
版权
VFP因它简单易学，可快速建立 应用软件而深受广大 程序员喜爱，但其数据库系统不安全也令广大用户非常头痛。随着MS SQL Server数据库系统的推广应用，其强大的安全性能普遍受到好评。笔者在长期的 编程实践中，发现利用VFP的SQL pass-through(SPT)技术结合MS SQL Server数据库系统，也能像VB、Delphi、PowerBuilder一样轻松开发出优秀的客户/ 服务器(C/S) 应用软件。现通过编写一个简单的通信录例子和广大VFP爱好者共同探讨。
　　


　　一、服务器端MS SQL Server数据库设计


　　1. 在MS SQL Server中建立名为“SFXT”的数据库。


　　2. 在SFXT数据库中建立名为“通信录”的数据表，表结构如下：


　　列名（字段名）　数据类型　　　长度
　　姓名 chr 8
　　生日 datetime 8
　　电话 chr 11
　　email chr 30
　　并将姓名设置为主键。


　　3. 在“SFXT”数据库中建立查询出所有记录的存储过程。 SP_SearchAll


　　CREATE PROCEDURE [SP_SearchAll]
　　AS
　　select * from 通信录 order by 姓名
　　return


　　4. 在“SFXT”数据库中建立插入新记录的存储过程 SP_InsertData。
　　CREATE PROCEDURE [SP_InsertData]
　　@name [char] (10)，
　　@birthday [datetime] ，
　　@telephone [char] (11)，
　　@email [char] (30)
　　AS
　　insert into 通信录(姓名，生日，电话，email) values (@name，@birthday，@telephone，@email)
　　return


　　二、客户端VFP的SQL pass-through技术设计


　　1. 建立如(^15020603b^)的VFP表单界面。


　　2. 建立名为“SFXT”的ODBC数据源连接MS SQL Server中的SFXT数据库。


　　可通过执行上面VFP表单的按钮“建立OBDC数据源”来完成；或者通过运行Windows控制面板中的“OBDC数据源”来完成。主要设置包括选择SQL Server驱动程序，通信协议，登录标识与密码等。


　　“建立OBDC数据源”按钮.CLICK事件：

　　*函数说明SQLSTRINGCONNECT([cConnectString])

　　*省略连接字符串cConnectString时显示""SQL数据源""对话框，可选择或新建数据源

　　sqlstringconnect()


　　3. 两种连接MS SQL Server数据源的方式。


　　使用现有数据源名称建立连接，“建立连接方式1”按钮.CLICK事件。
　　public vodbc,vuser,vpwd,vconn
　　vodbc='sfxt'　　 &&连接SQL SERVER数据库ODBC数据源名称
　　vuser='sa'　　　　　　　　　　 &&访问SQL SERVER数据库的登录用户名，sa为系统用户
　　vpwd='5213'　　　　 &&用户登录密码，为sa系统用户设置的密码
　　vconn=SQLCONNECT(vodbc, vuser,vpwd)
　　if vconn>0
　　messagebox('连接成功！',,'ODBC数据源')
　　else
　　messagebox('连接失败！',,'ODBC数据源')
　　endif
　　使用连接字符串建立数据源连接，“建立连接方式2”按钮.CLICK事件。
　　public vconn
　　vconn=SQLSTRINGCONNECT('dsn=sfxt:uid=sa:pwd=5213')
　　if vconn>0
　　messagebox('连接成功！'，，'ODBC数据源')
　　else
　　messagebox('连接失败！'，，'ODBC数据源')
　　endif


　　4. 数据源连接的主要参数设置，“活动连接属性设置”按钮.CLICK事件。

　　* 注：用函数sqlgetprop()可返回设置的参数值
　　sqlsetprop(vconn，""asynchronous""，.f.) &&取假值时为结果集同步返回： 取真值时为异步返回
　　sqlsetprop(vconn,""ConnectTimeOut"",15) &&连接超时等待秒数设置，可取值0至600
　　sqlsetprop(vconn,""IdleTimeout"",0)　　　　　　&&空闲超时间隔秒数，取值0为无限期超时等待
　　sqlsetprop(vconn,""Transactions"",1)　　　　 &&取值1时为自动处理远程事务：取值2时为手工处理


　　5. “执行存储过程查询数据”按钮.CLICK事件。

　　*函数说明SQLEXEC(nConnectionHandle, [cSQLCommand， [CursorName]])
　　*nConnectionHandle　　 当前数据源活动连接句柄
　　*cSQLCommand　　执行SQL SERVER存储过程的SQL语句表达式
　　*CursorName　　　　返回执行结果临时表的名称
　　sqlexec(vconn,""execute SP_SearchAll"",""我的通信录"")
　　browse


　　6. “执行SQL语句查询数据” 按钮.CLICK事件。

　　*函数说明SQLEXEC(nConnectionHandle, [cSQLCommand, [CursorName]])
　　*nConnectionHandle　　 当前数据源活动连接句柄
　　*cSQLCommand　　需发送SQL语句表达式
　　*CursorName　　　　返回执行结果临时表的名称
　　SQLEXEC(vconn, 'SELECT * FROM 通信录', '我的通信录')
　　browse


　　7. “向存储过程传替参数插入新记录” 按钮.CLICK事件。

　　local vname,vbirthday,vtelephone,vemail,vsql
　　*随机产生新记录举例
　　vname = '姓名'+sys(3)　　　　　　　　　　 &&姓名
　　vbirthday = dtoc(date()-int(rand()*10000))　　　　 &&生日
　　vtelephone = sys(3)　　　　　　　　　　　　 &&电话
　　vemail = sys(3)+'@hotmail.com'　　　　　　　　 &&电子邮箱
　　*将传递到存储过程的参数转换成字符串，并加引号形成SQL语句。
　　vsql=""execute SP_InsertData ""+""'""+vname+""','""+vbirthday+""','""+vtelephone+""','""+vemail+""'""
　　if sqlexec(vconn，vsql)>0　　　　 &&发送SQL语句
　　messagebox('插入新记录成功！'，，'信息')
　　else
　　messagebox('插入新记录不成功！'，，'信息')
　　endi
　　sqlexec(vconn，""execute SP_SearchAll""，""我的通信录"")
　　browse


　　8. “设置当前表的属性修改数据” 按钮.CLICK事件。
 
　　* 注：用函数cursorgetprop()可返回设置的参数值
　　cursorsetprop('BatchUpdateCount',100)　　 &&发送到缓冲表的远程数据源的更新指令的数目
　　cursorsetprop('Buffering',3)　　　　 &&设置当前表为开放式行缓冲
　　cursorsetprop('FetchSize',-1)　　　　&&从远程表中提取全部查询记录
　　cursorsetprop('KeyFieldList','姓名')　　　　&&指定远程表的主关键字段
　　cursorsetprop('SendUpdates',.t.)　　　　 &&当前缓冲表更改内容时发送SQL语句更新远程表
　　cursorsetprop('Tables','通信录')　　　　 &&指定连接的远程表名
　　*本地缓冲表与远程表字段对应关系
　　cursorsetprop('UpdateNameList','姓名 通信录.姓名,生日 通信录.生日,电话 通信录.电话,email 通信录.email')
　　*指定可更新字段列表
　　cursorsetprop('UpdatableFieldList','姓名,生日,电话,email')
　　cursorsetprop('UpdateType',1)　　　　 &&远程表更新方式，替换方式
　　cursorsetprop('WhereType',3)　　　　&&更新SQL语句中where子句包含主关键字与被修改过的字段


　　browse　　&&修改缓冲表数据，移动记录指针后，自动发送SQL语句更新远程表


　　9. “断开指向数据源的连接” 按钮.CLICK事件。

　　sqldisconnect(vconn)


　　10.“关闭” 按钮.CLICK事件。

　　thisform.release


　　以上我们利用VFP的SQL pass-through技术编写了一个简单的通信录管理程序，实现对SQL Server数据库中数据的插入、查询、修改等基本功能，是一个典型的客户/服务器(C/S)结构的应用程序。希望对读者今后开发软件有所帮助。

转载于:https://www.cnblogs.com/junzhongxu/archive/2008/07/07/1237603.html

weixin_30287169
关注
  • 0
    点赞
  • 踩
  • 1
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
学习使用master.dbo.spt_values表
01-16 1650
如果要生成的临时表中有个连续的数字列，或者连续的日期列，如下所示： 2012-1-1 2012-1-2 2012-1-3 ... ... 可以这样写： declare @begin datetime,@end datetimeset @begin='2012-1-1'set @end='2012-1-5' declare @days intset @days=DATEDIF...
VFP数据库系统开发实例(附图)(1).doc
03-11
VFP基本数据库系统开发实例（附图） 西南大学计信院 导学 在Visual Foxpro中开发一个应用系统应该包括需求分析、项目创建、模块设计、运行调试、保存 发布到建立帮助等，下面介绍如何把各个模块集成起来，并创建一个应用程序。 11.1 系统需求分析 传统的学生成绩管理方法不仅浪效率低，而且由于管理不规范容易导致各种错误的 发生。因此实现一个智能化、系统化的公共计算机成绩管理系统是十分必要和不可缺少 的。它将大大减轻管理者的劳动强度，降低出错率，提高管理的效率。该系统可以实现 如下功能： 1. 数据需求 通过调查，总结出该应用程序对数据的需求大致有如下这些： (1) 学生信息 包括学号，姓名，性别，出生日期，系科，备注，照片 (2) 管理员信息 包括用户名，密码，管理员姓名，权限，说明信息 (3) 学生成绩信息 主要包括学号, 课程编号，平时成绩，笔试成绩，上机成绩，总评成绩，审核否 (4) 课程信息 包括课程编号，课程名称 2. 功能需求 功能分析的任务是了解用户对数据的处理方法和输出格式。 (1) 基本数据录入 基本数据包括学生信息、管理员信息、学生成绩休息和课程信息等。要求系统能够 录入这些数据，并且可以进行修改。在数据录入和修改过程中应保持数据的参照完整性 。 (2) 查询 能够查询出学生成绩，和补考人员名单等。 (3) 学生和管理员信息的维护 要求能够根据需要对学生和管理员信息进行维护修改等。 (4)成绩的审核 根据学生的总评成绩审核学生的计算机成绩是否通过。 (5) 打印输出 打印学生成绩表和补考人员名单等。 11.2 系统设计 1. 程序总体结构设计 在开始程序设计之前，首先应该将程序的总体结构以层次图的形式表示出来，便于 对程序分层设计和实现。图1所示为公共计算机成绩管理系统的功能模块图。 图1公共计算机成绩管理系统功能模块 2. 数据库逻辑设计 进行数据库设计的依据有三个：第一是在进行系统调查时由成绩管理员提供的各种 处理数据；第二是功能设计结果；第三是数据库设计规范化理论。数据库设计是系统设 计的一项基本工作，其效果的好坏，对后续设计、调试、使用、维护等工作关系极大， 因此，一定要高度重视这一部分工作。当然，我们不能简单地将数据库设计理解为在计 算机上用可视化的方法建立表的过程，其主要工作是建立一种完整、规范的数据模型以 支持整个应用系统对数据的要求。 根据对实际情况进行分析建立关系模型 1) 学生信息表（学号，姓名，性别，出生日期，系科，备注，照片） 2) 管理人员信息表（用户名，密码，管理员姓名，权限，说明信息） 3) 学生成绩表（学号, 课程编号，平时成绩，笔试成绩，上机成绩，总评成绩，审核否） 4) 补考名单表（学号，姓名, 总评成绩，补考成绩） 5) 课程表（课程编号，课程名称） 11.3 创建项目 Visual Foxpro推荐在项目管理器中开发应用程序，因为项目管理器会为开发工作带来很多方便 。在项目管理器中创建一个项目后，应用程序就具备了一个开发框架，然后在这个框架 中，再利用项目管理器所提供的强大功能，按照需求来实现应用程序的设计。 用户可以启动Visual Foxpro，选择【文件】"【新建】命令，在打开的对话框中，选择"项目"单选按钮，然后 单击"新建文件"按钮，接着在"创建"对话框中，输入项目文件名并确定项目路径（本例 使用的路径为D:\公共计算机成绩管理系统），然后单击"保存"按钮，即可启动项目管理 器。 一个完整的应用程序，即使规模不大，也会涉及到多种类型文件，如dbc数据库、d bf表以及菜单、表单、报表、位图等。为了以后的修改、维护工作方便进行，就需要把 这些文件放在不同的文件夹中便于管理维护，例如一般把dbc数据库文件、dbf表文件和 cdx索引文件放在DATE目录，表单、报表、标签等放在FORMS目录等。 11.4数据库的物理设计 a) 数据库名为公共计算机成绩管理.dbc b) 数据表 i. 学生信息表.dbf 学号/C/10,姓名/C/10,性别/L/1,出生日期/D/8,系科/C/30,备注/M/4,照片/G/4 ii. 管理人员信息表.dbf 用户名/C/10,密码/C/10,管理员姓名/C/10,权限/C/4,说明信息/C/20 iii. 学生成绩表. dbf学号/C/10, 课程编号/C/2，平时成绩/N/6/2,笔试成绩/N/6/2，上机成绩/N/6/2,总评成绩/N/6/2,审 核否/L/1 iv. 补考名单表 学号/C/10，姓名/C/10, 总评成绩/N/6/2，补考成绩/N/6/2 v. 课程表 课程编号/C/2，课程名称/C/14 图2 公共计算机成绩管理数据库及其表结构 11.5界面设计 1) 创建启动表单 下面设计应用程序的封面，主要由一个
Sql Server统计报表案例
weixin_30245867的博客
06-01 297
场景：查询人员指定年月工作量信息 USE [Test] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO ALTER procedure [dbo].[GetWorkLoadMain] @year int, @month int, @UserId varchar(50) as begin declare ...
用VFP远程视图访问SQL Server数据库.pdf
最新发布
01-04
用VFP远程视图访问SQL Server数据库.pdf
用VFP备份和恢复SQLServer数据库的方法.doc
06-08
用VFP备份和恢复SQLServer数据库的方法
用VFP备份和恢复SQL Server数据库的方法.pdf
01-04
用VFP备份和恢复SQL Server数据库的方法.pdf
基于VFP的远程SQL Server数据库报表的设计.pdf
09-19
基于VFP的远程SQL Server数据库报表的设计.pdf
用VFP创建SQL Server 数据库
05-05
用VFP创建SQL Server 数据库的代码。
VFP数据库系统开发实例(附图)
04-26
VFP数据库系统开发实例
灵活利用配置表，制作报表
Jerry Chou's Space
09-28 1218
create or replace procedure zhou_test as  sSql       varchar(2000);  TABLE_NAME varchar(60);  V_col_name varchar(60);  V_col_SQL  varchar(1000);  -----根据我的配置表走  CURSOR sv_col IS    select col_name, co
锐浪报表
rund11的专栏
03-07 8400
一直以来，锐浪报表做的不错，尤其是适用于国内的状况。加上不是很满意rdlc的功能，查遍网络，很少有这方面的介绍。所以整理常用功能，以备使用。水平有限，大家根据自身情况来学习。 套打技巧 扫描原件电子版作为报表背景 在报表上面依据背景画出控件位置 根据字段可以设计数据库和报表的连接进行自动大批量打印 多表头 详见官方
使用SPT建立SQL数据库
hylang的专栏
02-25 600
*****************************************        使用SPT建立SQL数据库  **          1.0   2003.06.07            **　　雅狐论坛 www.yafox.com  ****************************
vfp spt连接mysql_VFP中用SPT访问SQL Server数据库_mysql
weixin_29391349的博客
01-19 595
VFP因它简单易学，可快速建立应用软件而深受广大程序员喜爱，但其数据库系统不安全也令广大用户非常头痛。随着MS SQL Server数据库系统的推广应用，其强大的安全性能普遍受到好评。笔者在长期的编程实践中，发现利用VFP的SQL pass-through(SPT)技术结合MS SQL Server数据库系统，也能像VB、Delphi、PowerBuilder一样轻松开发出优秀的客户/服务器(C/...
vfp数据库sql命令
05-25
VFP（Visual FoxPro）是一种关系型数据库管理系统，它基于SQL（Structured Query Language）语言，可以使用SQL命令来操作数据库。以下是一些常用的SQL命令： 1. SELECT：用于从一个或多个表中检索数据。 2. INSERT...

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值