ich bin XBase-Anfänger (aber mit etwas Clippererfahrungen) und möchte mich etwas in die neue Materie einarbeiten und möchte dazu auf einem Server mit ADS 8.1 eine ADT-Datei öffnen. Leider funktioniert schon das mit der Alaska ADS DatabaseEngine 1.90 mitgelieferte Beispiel bei mir nicht (XBASE 1.90):
Code: Alles auswählen
PROCEDURE DbeSys
IF ! DbeLoad( "ADSDBE" )
Alert( "Unable to load ADSDBE", {"Ok"} )
ENDIF
DbeSetDefault( "ADSDBE" )
RETURN
PROCEDURE Main
LOCAL cConnect := "DBE=ADSDBE;SERVER=\\LUNA\VOL1"
LOCAL oSession := DacSession():New( cConnect )
IF .NOT. oSession:isConnected()
Alert( "Unable to establish connection to ADS", {"Quit"} )
QUIT
ENDIF
SET DEFAULT TO "\\LUNA\VOL1"
USE CUSTUMER EXCLUSIVE
INDEX ON Upper( LastName+FirstName ) TAG Name TO Cust
USE CUSTUMER SHARED INDEX Cust
Browse()
oSession:disconnect()
RETURN
Kann mir jemdand sagen, woran es liegt bzw. ein geeignetes Beispiel zum einfachen Öffnen einer ADT-Datei via ADS zeigen?
Ich würde mich sehr freuen - vielen Dank.
Peter