要把VFP数据升迁到SQL SERVER上, 必须先在SQL SERVER里建立相应的数据库. SQL SERVER的管理是通过ENTERPRISE MANAGER (EM)来进行的. 通过它建立数据库, 每个数据库里可以包含 数据表,用户/用户群,视图,存储过程等等.

至于改用SQL SERVER后,原来的VFP程序是肯定需要修改的, 而且是比较大的改动.

***************
谈谈VFP和SQL SERVER搭配做C/S系统 (二) --动态设置ODBC连接

1。设置ODBC数据源

VFP和SQL SERVER的连接是通过ODBC或者OLE DB(ADO)来进行的。可以打开控制面板的ODBC数据源进行设置。但很多情况下，我们希望能在程序里动态设置数据源，一来可以不用去为每个用户的机器手动设置， 二来为了数据的安全性，使用完后，希望把ODBC数据源删掉。

下面的例子是用API函数来设置和删除ODBC数据源。
函数名字是 SQLConfigDataSource，其中第二项参数是数字(1-增加 2-修改 3-删除)

DECLARE INTEGER SQLConfigDataSource IN odbccp32 INTEGER, INTEGER, STRING, STRING

lnWindowHandle=0
lcODBCDriver=’SQL Server’ &&DRIVER类型
lcODBCName=’SharedData’&&数据源名字
lcODBCDesc=’Shared Data Source’ &&数据源描述
lcODBCServer=’DEVSQL’ &&SQL SERVER名字
lcODBCDatabase=’Shared’ &&要连接的数据库名字

**先试图修改已有的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

2。删除ODBC数据源

**用完后，可以在表单DESTROY事件里删除ODBC。 如果不想重复设置参数，可以把这些参数加到表单作为属性。

DECLARE INTEGER SQLConfigDataSource IN odbccp32 INTEGER, INTEGER, STRING, STRING

lnWindowHandle=0
lcODBCDriver=’SQL Server’
lcODBCName=’SharedData’
lcODBCDesc=’Shared Data Source’