手把手教你学vfp+sql的cs系统.pdfVIP

手把手教你学vfp+sql2000的c/s系统 一、基本准备 1、安装SQL个人版+SP4； 2、安装VFP9+SP1+汉化。 （看自己中意汉化否） 3、会做一点单机版的项目。 二、准备实施 1、启动SQL企业管理器，选择当前服务器，新建一数据库，命名 cj， 在该库下建一表，字段为 字段名 类型 宽度 编号 C 6 姓名 C 8 职务 C 10 股室 C 10 电话 C 11 将编号设为主键，保存，命名为 人员表； 三、实施过程 1、新建一项目，名自己定。 2、新建一程序，用来连接服务器，并将服务器上的数据下载到客户端。 （因为用到的表比较小，可以整个下载下来，如果表比较大，最好是有选 择地下载需要用到的记录） 程序思路如下： 先定义一个连接串nhandle，并使用用户名密码连接相应的数据库，测 试连接是否成功。如果成功，则下载表到本地临时表 （好象是视图？弄不 明白，先当它是表），命名为gh，如果不成功，则提示连接失败，并提示 再次连接否。 连接成功并下载好表后，设置表与服务器表的相应更新。 （此设置可 以为另一种形式，等做好这种形式后可试试另一种） 程序如下： public nhandle 定义连接串名 nhandle sqlstringconnect(driver sql server;server cjc101 0;uid sa;pwd aa;database cj) 我的连接类型是 SQL SERVER，服 务器是cjc1010，用户名是sa,密码是aa,数据库是cj if nhandle0 MESSAGEBOX(连接成功！！！) sqlexec(nhandle,select 编号,姓名,职务,股室,电 话 from 人员表 order by 编号,gh) 将服务器中的 ‘人员 表’表中的数据读到 gh 表中 sele gh cursorsetprop(tables,人员表,gh) 设置临时表的更新 目标表 cursorsetprop(keyfieldlist,编号,gh) 设置临时表的 关键字 cursorsetprop(updatablefieldlist,编号,姓名,职务,股室,电 话,gh)设置临时表的更新字段 cursorsetprop(updatenamelist,编号 人员表.编号,姓名 人 员表.姓名,职务 人员表.职务,股室 人员表.股室,电话 人员表.电话 ,gh) 用gh 中的相应字段更新人员表 cursorsetprop(sendupdates,.t.,gh)设置为可更新 cursorsetprop(wheretype,2) cursorsetprop(buffering,5)设置表缓冲 * do form 表单1 else if messagebox(数据库连接失败，是否继续连接？,48+4,连接 失败提示) 6 回答是 return else quit endif endif 3、建一表单，用来操作下载到本地的临时表gh并更新服务器表。 A、在表单中放一表格grid1 B、在表单的init里写上 SELECT gh thisform.grid1.RecordSource gh 将表格的数据源设置为表 gh **********如果想表格好看点，最好能定义一下表格各列的宽度 *thisform.grid1.colunm1.width 40 C、在表单中放新增，删除，保存到服务器，清空服务器数据四个按钮 新增按钮：反正是临时表，直接在表格里新增，以图快。你可以用文 本框，这样可以控制是否有重复记录，输入是否符合要求等。至于如何才 能达到你的要求，就看你自己的了。 新增按钮的click 过程代码： SELECT gh APPEND BLANK thisform.grid1.SetFocus