FiveTech Support Forums

No Postgres nao funciona, nao ?

Grato !

Como utilizar o comando SEEK?

I encontered a small problem with the append command if a table has been created with fields that do no accept null. I think this is due to RecordSet:Update() in the ADO_APPEND function. An error message is shown for each conflicting field. My tests a being done with MSSQL. Am I doing something wrong?

There was a recent fix to the underlying ADO class that allowed ctod(" ") to be stored as null on Ms Sql .. It was fixed since the release of xHarbour 99.71 and should be out in the next binary release.

If you need the fix .. e-mail me at lipkinrm29063@yahoo.com

Rick Lipkin
SC Dept of Health, USA

1.I try to edit ADO database to Tcbrowse(), but "CHAR" Transfer from dll.ch

USE (FILE_TH+"Test.mdb") VIA "ADORDD" TABLE "Tabla1" ALIAS ADO_DBF

DEFINE DIALOG oDlg RESOURCE "D_STAND_BROWSE" ;
TITLE "ADO DATABASE"

REDEFINE COLUMN BROWSE oBrw ID 201 OF oDlg ;
FONT oBR_FONT ;
MESSAGE "ADO DATABASE" ;
UPDATE

ADD COLUMN TO BROWSE oBrw DATA ADO_DBF->CHAR ;
HEADER "CHAR" SIZE 120
//DLL.CH transfer ADO_DBF->2
//#define CHAR 2

2. Can't Add ADORDD DATABASE

ADO_DBF->(DBAPPEND()) // Runtime error
ADO_DBF->CHAR := "ABCDES"
ADO_DBF->NUM := 1234
ADO_DBF->LOG := .T.
ADO_DBF->DATE := CTOD("2007/12/01")

error.log:

Error description: Error ADODB.Recordset/16389 E_FAIL: ADDNEW
Args:

Stack Calls
===========
Called from: win32ole.prg => TOLEAUTO:ADDNEW(0)
Called from: => ADO_APPEND(470)
Called from: => DBAPPEND(0)

Rick Lipkin wrote:There was a recent fix to the underlying ADO class that allowed ctod(" ") to be stored as null on Ms Sql .. It was fixed since the release of xHarbour 99.71 and should be out in the next binary release.

If you need the fix .. e-mail me at lipkinrm29063@yahoo.com

Rick Lipkin
SC Dept of Health, USA

Julio,

It means that ADO was not able to open your database with the connection details that you have provided

Antonio Linares wrote:Julio,

It means that ADO was not able to open your database with the connection details that you have provided

REQUEST ADORDD
rddSetDefault( "ADORDD" )

USE ADODB VIA "ADORDD" TABLE "users" MYSQL FROM "127.0.0.1" USER "adordd" PASSWORD "adordd"

browse()

USE

#include "adordd.ch"
#include "FiveWin.ch"

REQUEST ADORDD

function Main()

   USE testcto VIA "ADORDD" TABLE "TABLE1" MYSQL;
      FROM "localhost" USER "kuhnert" PASSWORD "kuhnert"

   Browse()

   USE

return nil

Application
===========
Path and name: D:\fw804\fwh\samples\adosql.exe (32 bits)
Size: 1,508,864 bytes
Time from start: 0 hours 0 mins 0 secs
Error occurred at: 08/26/08, 12:20:51
Error description: Error ADORDD/1003 Argument error

Stack Calls
===========
Called from: => UR_SUPER_ADDFIELD(0)
Called from: adordd.prg => ADO_OPEN(294)
Called from: => DBUSEAREA(0)
Called from: adosql.prg => MAIN(9)

System
======
CPU type: Intel(R) Pentium(R) 4 CPU 2.60GHz 2600 Mhz
Hardware memory: 767 megs

Free System resources: 90 %
GDI resources: 90 %
User resources: 90 %

Compiler version: xHarbour build 1.1.0 Intl. (SimpLex)
Windows version: 5.1, Build 2600 Service Pack 1

Windows total applications running: 0

Variables in use
================
Procedure Type Value
==========================
UR_SUPER_ADDFIELD
Param 1: N 1
Param 2: A Len: 5
Local 1: U
Local 2: N 0
ADO_OPEN
Param 1: N 1
Param 2: A Len: 8
Local 1: A Len: 14
Local 2: C "testcto"
Local 3: A Len: 5
Local 4: U
Local 5: U
Local 6: O Class: TOLEAUTO
Local 7: N 2
Local 8: N 1
DBUSEAREA
Param 1: L .F.
Param 2: C "ADORDD"
Param 3: C "testcto"
Param 4: U
Param 5: U
Param 6: L .F.
MAIN

Linked RDDs
===========
DBF
DBFFPT
DBFBLOB
DBFNTX
ADORDD

DataBases in use
================

Classes in use:
===============
1 HASHENTRY
2 HBCLASS
3 TOLEAUTO
4 ERROR
5 HBOBJECT
6 TREG32

Memory Analysis
===============
119 Static variables

Dynamic memory consume:
Actual Value: 0 bytes
Highest Value: 0 bytes

Gilbert,

Try it with "127.0.0.1" instead of "localhost"

Antonio,

same error message...

Hello Antonio,

What is the status of this project.

Can we assume that we can use it with no restrictions.

Greetings,

Willy.