注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

宝贝小屋

生活 工作 学习

 
 
 

日志

 
 

运用VFP和SQL SERVER建立C/S学籍管理系统的研究与实践  

2010-01-16 15:02:15|  分类: 默认分类 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |
运用VFP和SQL SERVER建立C/S学籍管理系统的研究与实践
作者:方兵、董建钢、楼润玉
随着.......
 
二、用VFP/SQL SERVER做C/S系统的几个步骤
1、将VFP的数据升迁到SQL SERVER中
要利用现有的数据就必须要将原有的VFP数据进行升迁。VFP的数据库,可以直接用VFP自带的升迁向导转到SQL SERVER上,但必须把所有的表都放到数据库里,自由表不能直接升迁,而实际上升迁上去的又只是表,数据库本身不能转到SQL SERVER里。要把VFP数据升迁到SQL SERVER上,必须先在SQL SERVER里建立相应的数据库(注意SQL SERVER里的数据库名不要与VFP本地数据库名相同)。SQL SERVER的管理是通过ENTERPRISEMANAGER(EM)来进行的。通过它建立数据库,每个数据库里可以包含数据表,用户/用户群,视图,存储过程等等。改用SQL SERVER后,原来的VFP程序是需要进行修改,而且有的时候修改还是比较大,但笔者感觉用C/S写出来的程序反而比单机版更精简一些。
2、设置ODBC数据源和删除ODBC数据源
VFP和SQL SERVER的连接是通过ODBC或者OLEDB(ADO)来进行的。一般情况下可以打开控制面板的ODBC数据源进行设置。但我们希望能在程序里动态设置数据源,因为:①、可以不用去为每个用户的机器手动设置,②、为了数据的安全性,使用完后,把ODBC数据源删掉。
所以本文中只讨论用程序的方法设置ODBC数据源和删除ODBC数据源,利用控制面板的ODBC数据源进行设置的方法请参照VFP的相关资料。
*用 API 函数来设置和删除 ODBC 数据源。
*函数名字是 SQLConfigDataSource,其中第二项参数是数字(1-增加 2-修改 3-删除)
DECLARE INTEGER SQLConfigDataSource IN odbccp32 INTEGER, INTEGER, STRING, STRING
lnWindowHandle=0
lcODBCDriver='SQL Server' && DRIVER 类型
lcODBCName='sjy'   && 数据源名字
lcODBCDesc='hzddsjy' && 数据源描述
lcODBCServer='HZDD'     && SQL SERVER名字
lcODBCDatabase='sjy'   && 要连接SQL SERVER服务器的数据库名字
** 先试图修改已有的 ODBC,如果不存在,返回 0。
lreturn=SQLConfigDataSource(lnWindowHandle, 2, lcODBCDriver, ;
'DSN=' + lcODBCName + CHR(0) ;
+ 'Description=' + lcODBCDesc + CHR(0) ;
+ 'Server=' + lcODBCServer + CHR(0) ;
+ 'Database=' + lcODBCDatabase + CHR(0))
IF lreturn=0 && 不存在
   ** 添加新的 ODBC
   lreturn=SQLConfigDataSource(lnWindowHandle, 1, lcODBCDriver, ;
   'DSN=' + lcODBCName + CHR(0) ;
   + 'Description=' + lcODBCDesc + CHR(0) ;
   + 'Server=' + lcODBCServer + CHR(0) ;
   + 'Database=' + lcODBCDatabase + CHR(0))
   IF lreturn=0 &&失败
      MessageBox('添加ODBC数据源失败',16,'BUFFER')
   ENDIF
ENDIF
 
**删除ODBC数据源
**用完后,可以在表单DESTROY事件里删除ODBC。 如果不想重复设置参数,可以把这些参数加到表单作为属性。
DECLARE INTEGER SQLConfigDataSource IN odbccp32 INTEGER, INTEGER, STRING, STRING
lnWindowHandle=0
lcODBCDriver='SQL Server' && DRIVER 类型
lcODBCName='sjy'   && 数据源名字
lcODBCDesc='hzddsjy'   && 数据源描述
lcODBCServer='HZDD'    && SQL SERVER名字
lcODBCDatabase='sjy'   && 要连接SQL SERVER服务器的数据库名字
**先修改,或者其是否存在
lreturn=SQLConfigDataSource(lnWindowHandle, ;
   2, lcODBCDriver, ;
   'DSN=' + lcODBCName + CHR(0) ;
   + 'Description=' + lcODBCDesc + CHR(0) ;
   + 'Server=' + lcODBCServer + CHR(0) ;
   + 'Database=' + lcODBCDatabase + CHR(0))
IF lreturn=1 &&ODBC存在,删除它
      lreturn=SQLConfigDataSource(lnWindowHandle, ;
      3, lcODBCDriver, ;
      'DSN=' + lcODBCName + CHR(0) ;
      + 'Description=' + lcODBCDesc + CHR(0) ;
      + 'Server=' + lcODBCServer + CHR(0) ;
      + 'Database=' + lcODBCDatabase + CHR(0))
      IF lreturn=0
         MessageBox('删除ODBC源失败,16,'BUFFER')
      ENDIF
ENDIF
CLEAR DLLS  && 清除DLL
 
3、从VFP连接到SQL SERVER
从VFP连接到SQL SERVER也有两种方法:程序的方法和在本地数据库中手工建立,本文仅讨论以程序的方法建立VFP到SQL SERVER的连接。
Open database hzddcj exclusive
*SQL连接的用户名与密码
MY_USERID="sjy"    &&SQL的用户名
MY_PASSWORD="sjy123"   && SQL的用户名
MY_DATASOURCE="sjy"    && 要连接SQL SERVER服务器的数据库名字
********创建远程数据连接
handle=sqlconnect(my_datasource,my_userid,my_password)
If handle<0
 Messagebox("未连接到数据服务器,退出!    ",0+48+0,"警告")
 Close all data
 Retu
Endif
sqldisconnect(handle)
Set database to "hzddcj"
**********建立“远程连接”
Create connection "远程数据" datasource &my_datasource userid &my_userid password &my_password
 
4、远程视图的建立和删除
远程视图的建立和删除也有两种方法:在本地数据库中手工建立和程序的方法,本文仅讨论以程序的方法建立和删除远程视图。
*建立远程视图
****此处本地数据库名以hzddcj为例:
Open database hzddcj exclusive
***建立远程视图,视图名为myview1
***假设SQL上的数据库中有ajbyc表,库结构为(学号,C,9;姓名,C,10;性别,C,2;专业名称,C,30):
Create sql view myview1 ;
 remote connection 远程数据  AS ;
 SELECT *;
 FROM ajbyc ajbyc;
 WHERE ajbyc.学号 = ?xh;
 order by ajbyc.学号
 
DBSetProp("myview1","view","tables",'ajbyc')
 
***删除远程视图
Close all database
Open database hzddcj exclusive &&打开本地数据库hzddcj
Set database to hzddcj
Myviewname=" myview1"
Delete view &myviewname
Pack database
Wait clear
 
通过以上四个步骤已经在VFP中用程序的方法建立了与SQL SERVER的连接,现在我们可以利用远程视图来编写学籍管理的C/S程序了。
 
三、VFP和SQL SERVER建立C/S学籍管理系统的优势
目前杭州电大学籍科已经用VFP和SQL SERVER建立C/S学籍管理的部分系统,并投入使用。在今年的毕业审核、毕业证书办理中发挥了巨大作用。在使用过程中,C/S的学籍管理系统显示出单机版不能比拟的优势:
1、支持多用户:
多个用户可以同时操作C/S学籍管理系统,解决多用户同时成绩录入、毕业审核等一系列单机版程序不能解决的问题。
2、支持远程操作:
可以远程操作C/S学籍管理系统,不仅支持多个不同科室通过校园网操作,理论上也支持各县电大通过宽带网操作。
3、高效的数据管理:
数据全部在服务器上,提高了数据管理的效率,不需要象单机版一样将数据进行传递。
4、数据安全性高:
SQL SERVER的数据安全性比较高,可以对用户权限进行限制。
5、系统简单灵活易维护;
用VFP和SQL SERVER建立C/S学籍管理系统程序简单,容易维护。
  评论这张
 
阅读(210)| 评论(0)
推荐 转载

历史上的今天

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017