Dear all,
Please apologize the misaligned code of aodrdd.prg but I only realize it now with Lucas.
Im using NotePad++ and although code is perfectly aligned there it seems thats not the case with MED that most of you are using.
As soon as I can I will passed it through MED to get it all aligned and Ill posted.
CASE aWAData[ WA_ENGINE ] == "MSSQL"
aWAData[ WA_CONNECTION ]:Open( "Provider=SQLOLEDB;" + ;
"server=" + aWAData[ WA_SERVER ] + ;
";database=" + t_cDataSource + ;
iif(empty(aWAData[ WA_USERNAME ]),";Trusted_Connection=yes",;
";uid=" + aWAData[ WA_USERNAME ] + ;
";pwd=" + aWAData[ WA_PASSWORD ] ))Antonio, for MSSQL should on line ~464 the [WA_ENGINE] "MSSQL" to be and not "SQL"!! And if the authentification to the DB without a password but with windows-authentification the text "Trusted_Connection=yes" should be used.
New adordd version at https://github.com/AHFERREIRA/adordd.git
The code is aligned and clean.
Please read carefully readme to set your app to use adordd.
And please dont forget donate to the humanitarian organization 20 Euros.
New adordd English manual at https://github.com/AHFERREIRA/adordd.git
CASE aWAData[ WA_ENGINE ] == "SQL" CASE aWAData[ WA_ENGINE ] == "MSSQL" CASE cEngine == "MSSQL"
oCn:Open( "Provider=SQLOLEDB;" + ;
"server=" + cServer + ;
";database=" + cDB + ;
iif(empty(cUser),";Trusted_Connection=yes",;
";uid=" + cUser + ;
";pwd=" + cPass ))Gunther,
Done!
Thanks.
.....
SET ADODBF TABLES INDEX LIST TO { {"CCRTBL",{"CCRTBL1","TBL_RMNO"},;
{"CCRTBL2","UPPER(TBL_LAST)"}}, ;
{"CCRGST",{"CCRGST1","GST_INTNO"}} ;
}
SET ADO TABLES INDEX LIST TO { {"CCRTBL",{"CCRTBL1","TBL_RMNO"}, ;
{"CCRTBL2","TBL_LAST"}}, ;
{"CCRGST",{"CCRGST1","GST_INTNO"}} ;
}
cSTime := time()
USE ccrgst ALIAS 'gst' NEW SHARED
cETime := time()
MsgInfo('Open Time : '+cSTime+' - '+cETime+' Reccount() : '+Str(gst->(Reccount())) )Dutch,
I would say thats normal.
The problem is when we use a table we read all records to ADO if we are using adUseClient as :CursorLocation.
With the index the time is doubled because ADORDD first issues a query SELECT * FROM... and then when you SE INDEX it issues another SELECT * FROM ORDER BY.
So 2 queries that read all records.
In these cases either you can set the query SELECT * FROM WHERE condition only to read the records you need might be only a few hundred but this will break code compatibility.
Other alternative try to use adUseServer together with CacheSize and the property Maximum Opens Rows.
CacheSize := 100
Maximum Opens Rows := 170
You will need to change the setup of MySql ODBC driver to enable dynamic cursors.
I dont know how ADORDD will behave because it might loose the :AbsolutePositon property but you can try it.
We will have to study this alternative in a next version.
May be Rao could help us with his knowledge of SQL ad ADO.
Besides that is it working ok?
1) Function and Command to open/read/write, relation, dbsetfilter(), ordsetfocus(), dbseek() is working well.
2) open record with relation is quite slow. I think the point is JOIN table is the key. Because 'CCRGST' table (guest details) no need to open all records but only the records which related with main table 'CCRTBL' (reservation details).
Is it correct?
How do I join 2 table with ADORDD?
Thanks.
Hello,
Set relation works the same way as in DBFCDX.
Try at adordd.prg to comment out all cache settings. I am using ADORDD in a WAN scenario via Internet and speed is very good.
2) open record with relation is quite slow. I think the point is JOIN table is the key. Because 'CCRGST' table (guest details) no need to open all records but only the records which related with main table 'CCRTBL' (reservation details).
Is it correct?
How do I join 2 table with ADORDD?
lucasdebeltran wrote:Hello,
Set relation works the same way as in DBFCDX.
Try at adordd.prg to comment out all cache settings. I am using ADORDD in a WAN scenario via Internet and speed is very good.
30.000 records so far.
AHF wrote:
What do you mean open record ?
