PUBLIC ARRAY aRet(1) PUBLIC gnConnHandle STORE SQLCONNECT('SageLine50v8', 'manager','') TO gnConnHandle IF gnConnHandle <= 0 = MESSAGEBOX('Unable to connect to Sage database', 16, 'SQL Connect Error') *!* return .f. ELSE CLEAR ?SQLGETPROP(gnConnHandle,"DataSource") ?SQLGETPROP(gnConnHandle,"PacketSize") ?SQLGETPROP(gnConnHandle,"ConnectBusy") ?SQLGETPROP(gnConnHandle,"PacketSize") ?SQLGETPROP(gnConnHandle,"DispLogin") ?SQLGETPROP(gnConnHandle,"DispWarnings") ?SQLGETPROP(gnConnHandle,"UserId") ?SQLGETPROP(gnConnHandle,"WaitTime") ?SQLGETPROP(gnConnHandle,"PacketSize") ?SQLGETPROP(gnConnHandle,"PacketSize") ?SQLGETPROP(gnConnHandle,"ConnectString") ENDIF sqlreply = SQLTABLES(gnConnHandle) sqlreply = SQLEXEC(gnConnHandle, 'SELECT SALES_ORDER.* FROM SALES_ORDER SALES_ORDER', 'csrBarcode') sqlreply = SQLEXEC(gnConnHandle, 'SELECT * FROM SALES_ORDER', 'csrBarcode') sqlreply = SQLEXEC(gnConnHandle, 'SELECT FIXED_ASSET.ASSET_REF, FIXED_ASSET.DETAILS_1 FROM FIXED_ASSET FIXED_ASSET', 'csrBarcode') IF sqlreply=-1 ?AERROR(aRet) ?aRet(1,2) ELSE ?sqlreply ENDIF SQLDISCONNECT(nHandle)I am a bit lost. It works under MSQuery
Connectivity error: Unable to retrieve specific error information. Driver is probably out of resources>>
sqlreply = SQLEXEC(gnConnHandle, 'SELECT SALES_ORDER.* FROM SALES_ORDER SALES_ORDER', 'csrBarcode') >>IF sqlreply=-1 >> AERROR(aRet) >> ?aRet(1,2) >>ELSE >> ?sqlreply >>ENDIF>>