主题:[原创]如何將VFP的ODBC裝在用戶機上?
GEORGECHIN
[专家分:440] 发布于 2010-02-04 10:34:00
請教一下,如何將VFP的ODBC驅動裝在用戶機上.
PS:我目前裝了VFP9.0,網上下載的,不知是哪種版本,裝上之后,在電腦的控制臺里發現其VFP的ODBC並沒有裝上.但裝VFP6.0時,會自動將VFP的ODBC裝入.(記得之前裝上OFFICE也會自動裝上,但我今天把OFFICE 2003重新完全安裝,還是沒有VFP的ODBC驅動)
回复列表 (共17个回复)
沙发
jianzho [专家分:7560] 发布于 2010-02-04 12:51:00
给你一个现成的例子吧:
DECLARE INTEGER SQLConfigDataSource IN odbccp32 INTEGER, INTEGER, STRING, STRING
lnWindowHandle=0
lcODBCDriver='SQL Server' &&DRIVER类型
lcODBCName='SharedData' &&数据源名字
lcODBCDesc='Shared Data Source' &&数据源描述
lcODBCServer=myserver &&SQL SERVER名字
lcODBCDatabase=mydbo &&要连接的数据库名字
**先试图修改已有的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
USE IN mypath
mycnt=SQLConnect("SharedData",MyUser,MyPassword)
自动动手做做,看能搞定么?
板凳
GEORGECHIN [专家分:440] 发布于 2010-02-05 19:01:00
看了您給的答案,思路是清晰了,但是我翻遍了我所有的VFP工具書,都沒有找到SQLConfigDataSource()這個自定義函數的用法.不知能否詳細講解一下這個函數的使用方法?
3 楼
GEORGECHIN [专家分:440] 发布于 2010-02-08 15:42:00
[quote]给你一个现成的例子吧:
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
[/quote]
lreturn已經返回1了,但控制臺的ODBC還是和之前一樣且我的連接SQLCONNECT()還是返回非正數的值!
4 楼
jianzho [专家分:7560] 发布于 2010-02-10 09:48:00
API函数啊!
5 楼
GEORGECHIN [专家分:440] 发布于 2010-02-10 18:20:00
[quote]
API函数啊![/quote]
LRETURN已經可以返回1了,可是接下來要如何讓SQLCONNECT()返回1呢?
6 楼
GEORGECHIN [专家分:440] 发布于 2010-03-19 08:49:00
貼子沉下去了,有沒有同道可以給我具體一點啊?
7 楼
GEORGECHIN [专家分:440] 发布于 2010-03-25 00:22:00
英雄多出手吧!!!!
8 楼
菜鸭 [专家分:5120] 发布于 2010-03-25 07:40:00
你新增一个应该就行了
系统里有没有相应的odbc要看该对话框的"驱动程式"选项卡
9 楼
GEORGECHIN [专家分:440] 发布于 2010-03-25 16:32:00
如果僅裝上VFP9.0,其在控制面板上不讓手工增加VFP的ODBC,但如果裝上VFP6.0,則會自動裝上VFP的ODBC
10 楼
红狐 [专家分:60] 发布于 2010-03-25 19:53:00
发了一个邮件到您的邮箱,您看能不能解决您问题,如果能解决,吱一声,我也算是多了一个知识。
我来回复