Alaska Software Inc. - Error with dsDbServer in Xclass.
Username: Password:
AuthorTopic: Error with dsDbServer in Xclass.
César Calvo Error with dsDbServer in Xclass.
on Thu, 21 Mar 2013 22:26:42 +0100
Hi,

Can you tell me what is this error and how resolve the matter?

Thanks,
César.

 ---  CREACION DE TABLA DE CAMBIOS V  --- 

DbeSetDefault("DELDBE")

DbeInfo( COMPONENT_DATA, DELDBE_FIELD_TOKEN, "©" )
DbeInfo( COMPONENT_DATA, DELDBE_DELIMITER_TOKEN, "©" )

cImp := ""

cCon1 := 'DBQ='  + ::cDir + "DATOS.accdb" + ';Driver={Microsoft Access 
Driver (*.mdb, *.accdb)};UID=admin;'

oCon1 := SQLConnection():new()

IF !oCon1:driverConnect(nil, cCon1)

   Infobox("No conectado a " + ::cDir + "DATOS.accdb" )

   ELSE

   oStmt1 := oCon1:NewStatement()
   oStmt1:DisplayErrors := .f.
   oStmt1:SQLString := 'DROP TABLE CAMBIOS_V'
   oStmt1:Execute()

   oStmt1:DisplayErrors := .t.
   oStmt1:SQLString := 'CREATE TABLE CAMBIOS_V ( T TEXT (01), MPR TEXT (03), 
MDE TEXT (03), TCA NUMERIC, FVA TEXT(10) )'
   oStmt1:Execute()

   oStmt1:destroy()

ENDIF

oCur1 := oCon1:Cursor('SELECT * FROM CAMBIOS_V')
oCur1:execute()

cFIL := ::cDir + "CAMBIOS_V.TXT"

oSrv := dsDbServer():new(cFIL,.F.,.F.,.T.,"DELDBE")


error.docx