Ante todo Buenas Tardes Antonio (AHF), estoy haciendo pruebas con ADORDD y he logrado conectarme a la BBDD
pero cuando intento hacer USE de una tabla sencilla para probar da el [color=#FF0000:35ruemcw]siguiente error marcado en rojo[/color:35ruemcw]
Entorno de desarrollo
FWH 16.03
Harbour 3.2
adordd de fecha 08/12/2015
MySQL 5.3
He probado a compilar/linkar con los dos (ADORDD Y TRYADORDD) con el mismo resultado, varias pruebas comentando y descomentando líneas, conectarse parece que se conecta pero da el error UR_SUPER_ADDFIELD( 0 ),
alguna idea de que puedo esta haciendo mal ¿?
PRG = \
Obras32.PRG \
[color=#FF0000:35ruemcw]adordd.PRG \
tryadordd.PRG \[/color:35ruemcw]
Programa
------------------
#include "FiveWin.ch"
#include "adordd.ch"
...
...
...
//
REQUEST ADORDD
RddRegister( "ADORDD",1 )
RddSetDefault( "ADORDD" )
SET ADO DEFAULT RECNO FIELD TO "ID"
// SET ADO TEMPORAY NAMES INDEX LIST TO {"TMP","TEMP"}
// SET ADO FIELDRECNO TABLES LIST TO {{"EMPRESA","ID"}}
// SET AUTOPEN OFF
// SET ADO FORCE LOCK OFF
SET ADO DEFAULT DATABASE TO "EMPRE01" SERVER TO "localhost" ENGINE TO "MYSQL" USER TO "root" PASSWORD TO "1234"
/*
SET ADODBF TABLES INDEX LIST TO { ;
{"EMPRESA",{"EMPRESA","NUMEMP_000"} }, {"APUNTES" ,{"APUIND01","AP_OBRA+DTOS(AP_FECHA)"}} }
*/
Try
SET ADO DEFAULT DATABASE TO "EMPRE01" SERVER TO "localhost" ENGINE TO "MYSQL" USER TO "root" PASSWORD TO "1234"
// Alert ("BBDD MySql ABIERTA")
Catch oErr
Alert ("No puedo abrir MySql")
End
Alert ("Antes de Browse")
[color=#FF0000:35ruemcw] USE "EMPRESA" alias Empre SHARED NEW[/color:35ruemcw]
Alert ("Despues de Browse")
------------------
===========
Path and name: D:\OBRAS32\Obras32.exe (32 bits)
Size: 3,751,936 bytes
Compiler version: Harbour 3.2.0dev (r1601050904)
FiveWin Version: FWH 16.03
Windows version: 6.2, Build 9200
Time from start: 0 hours 0 mins 1 secs
Error occurred at: 04/13/16, 18:29:20
Error description: Error ADORDD/1003 Argument error
Stack Calls
===========
Called from: => [color=#FF0000:35ruemcw]UR_SUPER_ADDFIELD( 0 )[/color:35ruemcw]
Called from: .\SOURCE\adordd.PRG => ADO_OPEN( 0 )
Called from: => DBUSEAREA( 0 )
Called from: .\SOURCE\Obras32.PRG => MAIN( 0 )
System
======
CPU type: AMD Turion(tm) 64 X2 Mobile Technology TL-60 2000 Mhz
Hardware memory: 3839 megs
Free System resources: 90 %
GDI resources: 90 %
User resources: 90 %
Windows total applications running: 5
1 ,
2 , C:\WINDOWS\WinSxS\x86_microsoft.windows.common-controls_6595b64144ccf1df_6.0.10240.16384_none_3bccb
3 , D:\OBRAS32\Obras32.exe
4 DDE Server Window, C:\WINDOWS\SYSTEM32\OLE32.DLL
5 GDI+ Window, C:\WINDOWS\WinSxS\x86_microsoft.windows.gdiplus_6595b64144ccf1df_1.1.10240.16603_none_d15a3826af6dc
Variables in use
================
Procedure Type Value
==========================
UR_SUPER_ADDFIELD
Param 1: O Class: ERROR
ADO_OPEN
Param 1: N 1
Param 2: A Len: 7
Local 1: U NIL
Local 2: U ???:U
DBUSEAREA
Param 1: N 1
Param 2: A Len: 8
Local 1: A Len: 42
Local 2: U NIL
Local 3: A Len: 7
Local 4: U NIL
Local 5: U NIL
Local 6: O Class: TOLEAUTO
Local 7: N 16
Local 8: N 1
MAIN
Param 1: L .T.
Param 2: U NIL
Param 3: C "EMPRESA"
Param 4: C "Empre"
Param 5: L .T.
Param 6: L .F.
Linked RDDs
===========
DBF
DBFFPT
DBFBLOB
DBFCDX
DBFNTX
ADORDD
DataBases in use
================
Classes in use:
===============
1 ERROR
2 HBCLASS
3 HBOBJECT
4 TINI
5 WIN_OLEAUTO
6 TOLEAUTO
7 TFONT
8 TWINDOW
9 TDIALOG
10 TBRUSH
11 TCONTROL
12 TICON
13 TMULTIGET
14 TBUTTON
15 TRECT
16 TREG32
Memory Analysis
===============
1809 Static variables
Dynamic memory consume:
Actual Value: 0 bytes
Highest Value: 0 bytes
↧