VFP 愛用者社區

zzbdyx · 註冊時間: 2004-02-04 文章: 37 第 1 樓

我在vfp8中有一定義連接到SQL的程序如下﹕
PUBLIC con
con=0
sqlsetprop(0,"displogin",3) &&設置環境為：從不顯示ODBC登陸對話框
IF USED("vt_conn")
SELECT vt_conn
ELSE
USE vt_conn IN 0
ENDIF
driver_temp=ALLTRIM(vt_conn.conn_fs)
server_temp=ALLTRIM(vt_conn.SERVER)
uid_temp=ALLTRIM(vt_conn.USER)
pwd_temp=ALLTRIM(vt_conn.PASSWORD)
database_temp=ALLTRIM(vt_conn.DATABASE)
USE IN vt_conn
connect_temp="driver="+driver_temp+";server="+server_temp+";uid="+uid_temp+";pwd="+pwd_temp+";database="+database_temp
con=SQLSTRINGCONNECT(connect_temp)
IF con>0
MESSAGEBOX("連接后台SQL數據庫成功﹗﹗",64,"system")
ELSE
MESSAGEBOX("連接后台SQL數據庫失敗﹗﹗",16,"system")
ENDIF

說明﹕vt_conn表中有一筆記錄標明了SQL的相關參數
**************
但不知道怎么回事﹐在后面用SPT技朮調用con時卻總是成功和不成功交替出現!比方﹕
n1=sqlexec(con,"select * from _phycs","temp_table")
結果n1返回小于等于零的一個數(不成功）﹐再執行一次又返回大于零的數（成功）﹐再執行又返回不成功﹗
但是程序編譯后運行又正常﹗﹗

請高手指點啊﹗因調試程序總不會每次編譯后來調試啊﹗

garfield · Site Admin 註冊時間: 2003-01-30 文章: 2160 第 2 樓

又是緊急求助
可以改成有意義的主題嗎

zzbdyx · 註冊時間: 2004-02-04 文章: 37 第 3 樓

我暈﹗
不會不要亂說﹗
本來就是請求幫助啊﹗

syntech · 發表於: 星期二十二月 27, 2005 3:40 pm 文章主題:

"可以改成有意義的主題嗎?"

反正我遇到標題不明確的,都自動採取不理會的態度.

fschern · 註冊時間: 2003-10-12 文章: 34 第 5 樓

sqlexec()=>返回值0為執行中,1為成功,-1才是失敗
您所稱n1<=0,n1是0還是-1??

SQLSTRINGCONNECT()函數之前加入下列指令:
=SQLSETPROP(0,"DispWarnings",.T.)

可將連接odbc的錯誤訊息顯示出來。