Thread View: borland.public.intrabuilder.data.bde
1 messages
1 total messages
Started by Lallemant christophe
Mon, 23 Feb 1998 00:00
Borland : Is someone able to use ACCESS 97 with Intrabuilder ?
Author: Lallemant christophe
Date: Mon, 23 Feb 1998 00:00
Date: Mon, 23 Feb 1998 00:00
305 lines
7137 bytes
7137 bytes
I am using Intrabuilder 1.5 on Windows NT 4.0.
When I use MS ACCESS 97 with intrabuilder using ODBC, it doesn't work.
Is is possible to use ACCESS 97 and how ?
I can't do an index using intrabuilder and the fields I created with
Intrabuilder only have one property : required.
Does someone use ODBC, NT4.0 and ACCESS97 with Intrabuilder ?
An other example of my problems using Intrabuilder and ACCESS :
My form has different pages, one to see the records, an other to
update or creat records. When I save the record (On Save), the query
is not refreshed; to see the new record, I must refresh the query with
Requery().
My Access Driver is ODBCJT32.dll 3.50.342800.
My problems are the same using IODBC32.dll Intrabuilder 1.5 or 1.0.
Thanks for help.
Here's the code of my example (it works well with DBASE but not with
ACCESS) :
// {End Header} Ne pas supprimer ce commentaire//
// G�n�r� le 23/02/98
//
var f = new essai3Form();
f.open();
class essai3Form extends Form {
with (this) {
onServerLoad = class::Form_onServerLoad;
height = 14;
left = 22.5;
top = 0;
width = 59.625;
title = "Table1";
}
with (this.testbdd1 = new Database()){
left = 47;
top = 0;
databaseName = "TESTBDD";
active = true;
}
with (this.table11 = new Query()){
left = 41;
top = 0;
database = parent.testbdd1;
sql = "SELECT * FROM Table1";
active = true;
}
with (this.table11.rowset) {
canEdit = class::Form_canEdit;
onAbandon = class::Form_onAbandon;
onAppend = class::Form_onAppend;
onEdit = class::Form_onEdit;
onSave = class::Form_onSave;
autoEdit = false;
}
with (this.html1 = new HTML(this)){
height = 1;
left = 1.125;
top = 3;
width = 14;
color = "0x233ffe";
fontName = "Arial";
fontBold = true;
text = "C1";
pageno = 0;
}
with (this.text1 = new Text(this)){
left = 16;
top = 3;
width = 26;
dataLink = parent.table11.rowset.fields["c1"];
pageno = 0;
}
with (this.html2 = new HTML(this)){
height = 1;
left = 1.125;
top = 4;
width = 14;
color = "0x233ffe";
fontName = "Arial";
fontBold = true;
text = "C2";
pageno = 0;
}
with (this.text2 = new Text(this)){
left = 16;
top = 4;
width = 26;
dataLink = parent.table11.rowset.fields["c2"];
pageno = 0;
}
with (this.html3 = new HTML(this)){
height = 1;
left = 1.125;
top = 5;
width = 14;
color = "0x233ffe";
fontName = "Arial";
fontBold = true;
text = "C3";
pageno = 0;
}
with (this.text3 = new Text(this)){
left = 16;
top = 5;
width = 26;
dataLink = parent.table11.rowset.fields["c3"];
pageno = 0;
}
with (this.button1 = new Button(this)){
onServerClick = {;form.rowset.first()};
left = 1;
top = 8;
width = 13;
text = "Premier";
}
with (this.button2 = new Button(this)){
onServerClick = {;if (!form.rowset.next(-1))
form.rowset.next();};
left = 15;
top = 8;
width = 13;
text = "Pr�c�dent";
}
with (this.button3 = new Button(this)){
onServerClick = {;if (!form.rowset.next())
form.rowset.next(-1);};
left = 29;
top = 8;
width = 13;
text = "Suivant";
}
with (this.button4 = new Button(this)){
onServerClick = {;form.rowset.last()};
left = 43;
top = 8;
width = 13;
text = "Dernier";
}
with (this.button5 = new Button(this)){
onServerClick = {;form.rowset.beginAppend()};
left = 1;
top = 10;
width = 13;
text = "Ajouter";
}
with (this.button6 = new Button(this)){
onServerClick = {;form.rowset.delete();if (form.rowset.endOfSet)
form.rowset.next(-1);};
left = 15;
top = 10;
width = 13;
text = "Supprimer";
}
with (this.button7 = new Button(this)){
onServerClick = {;form.rowset.save()};
left = 29;
top = 10;
width = 13;
text = "Enregistrer";
pageno = 2;
}
with (this.button8 = new Button(this)){
onServerClick = {;form.rowset.abandon()};
left = 1;
top = 12;
width = 13;
text = "Abandonner";
pageno = 2;
}
with (this.button9 = new Button(this)){
onServerClick = {;form.rowset.beginEdit()};
left = 15;
top = 12;
width = 13;
text = "Modifier";
}
with (this.TITLE = new HTML(this)){
height = 2;
width = 39;
color = "blue";
fontName = "Arial";
fontBold = true;
text = '<H1><Font Size="+4">T</Font>able1</H1>';
pageno = 0;
}
with (this.html4 = new HTML(this)){
height = 1;
left = 8;
top = 9;
width = 26;
color = "0x233ffe";
fontName = "Arial";
fontBold = true;
text = "ERREUR";
pageno = 3;
}
with (this.button10 = new Button(this)){
onServerClick = class::button10_onServerClick;
left = 24;
top = 10;
width = 14;
text = "OK";
pageno = 3;
}
with (this.button11 = new Button(this)){
onServerClick = class::button11_onServerClick;
left = 18;
top = 8;
width = 22;
text = "Ajouter premi�re ligne";
pageno = 4;
}
this.rowset = this.table11.rowset;
function button10_onServerClick()
{
this.parent.pageno=1;
}
function button11_onServerClick()
{
this.form.rowset.beginAppend();
this.parent.pageno=2;
}
function Form_canEdit()
{
var lRet=this.lockRow();
if (!lRet) {
this.parent.parent.pageno=3;
}
return lRet;
}
function Form_onEdit()
{
this.parent.parent.pageno=2;
}
function Form_onSave()
{
this.unlock();
this.parent.parent.pageno=1;
this.parent.requery(); // ???????????????
}
function Form_onAbandon()
{
this.unlock();
if (this.parent.rowset.endOfSet)
{
this.parent.parent.pageno=4;
}
else
{
this.parent.parent.pageno=1;
}
}
function Form_onAppend()
{
this.parent.parent.pageno=2;
}
function Form_onServerLoad()
{
if (this.rowset.endOfSet)
{
this.pageno=4;
}
}
}
Thread Navigation
This is a paginated view of messages in the thread with full content displayed inline.
Messages are displayed in chronological order, with the original post highlighted in green.
Use pagination controls to navigate through all messages in large threads.
Back to All Threads