How to join 2 different database files?

[rosli bakar]

I'm quite new to VB and need help urgently . I have 2 Access database files
which need to connected/join to each other.

Database file 1 is in c:\dha\ABC.mdb
table: LogAlarm
Work Week | Alarm Address

Database file 2 is in c:\tmt\machine.mdb
table: Alarm
Alarm Address | Alarm Description.

I've got database1 connected to a dbgrid as data1.
I would like to know how to connect it to 2nd database file in order to get
query result as below:

Alarm Address | Alarm Description.

The code I used and didn't really work is as below.

Data1.DatabaseName = "c:\dha\ABC.mdb"

sql= " select LogAlarm.[Alarm Address] , t2.[Alarm Description]"
sql= sql & "from LogAlarm, [Select 'Alarm Address', ' Alarm Description'
from Alarm in 'c:\tmt\machine.mdb]. as t2"
sql= sql & " where LogAlarm.[Alarm Address]=t2.[Alarm Address]
Data1.RecordSource = sql
Data1.Refresh

please help ......rgds rosli

[Tom van Stiphout]

On Fri, 30 Sep 2005 09:01:36 +0800, "rosli bakar"
<ro*********@intel.com> wrote:

When you say "dbgrid" I'm thinking you're in a .NET application?
Anyway, it may be better to link a table from db1 to db2 (File / Get
external data / Link table), and then create a query in db1 that
performs the join.
The IN clause you're currently using works in a pure Access
environment, but when called from outside of that, your mileage may
vary.

-Tom.

I'm quite new to VB and need help urgently . I have 2 Access database files
which need to connected/join to each other.

Database file 1 is in c:\dha\ABC.mdb
table: LogAlarm
Work Week | Alarm Address

Database file 2 is in c:\tmt\machine.mdb
table: Alarm
Alarm Address | Alarm Description.

I've got database1 connected to a dbgrid as data1.
I would like to know how to connect it to 2nd database file in order to get
query result as below:

Alarm Address | Alarm Description.

The code I used and didn't really work is as below.

Data1.DatabaseName = "c:\dha\ABC.mdb"

sql= " select LogAlarm.[Alarm Address] , t2.[Alarm Description]"
sql= sql & "from LogAlarm, [Select 'Alarm Address', ' Alarm Description'
from Alarm in 'c:\tmt\machine.mdb]. as t2"
sql= sql & " where LogAlarm.[Alarm Address]=t2.[Alarm Address]
Data1.RecordSource = sql
Data1.Refresh

please help ......rgds rosli

[Dag Sunde]

"rosli bakar" <ro*********@intel.com> wrote in message
news:dh**********@news01.intel.com...

I'm quite new to VB and need help urgently . I have 2 Access database
files which need to connected/join to each other.

Database file 1 is in c:\dha\ABC.mdb
table: LogAlarm
Work Week | Alarm Address

Database file 2 is in c:\tmt\machine.mdb
table: Alarm
Alarm Address | Alarm Description.

I've got database1 connected to a dbgrid as data1.
I would like to know how to connect it to 2nd database file in order to
get query result as below:

Alarm Address | Alarm Description.

The code I used and didn't really work is as below.

Data1.DatabaseName = "c:\dha\ABC.mdb"

sql= " select LogAlarm.[Alarm Address] , t2.[Alarm Description]"
sql= sql & "from LogAlarm, [Select 'Alarm Address', ' Alarm Description'
from Alarm in 'c:\tmt\machine.mdb]. as t2"
sql= sql & " where LogAlarm.[Alarm Address]=t2.[Alarm Address]
Data1.RecordSource = sql
Data1.Refresh

Create a 3rd Access-db, use "link tables" to link in each
table from the two other dbs. (or link one table into the
other db).

Now you can JOIN between tables in two different dbs

--
Dag.

[z]

> Database file 1 is in c:\dha\ABC.mdb

table: LogAlarm
Work Week | Alarm Address

Database file 2 is in c:\tmt\machine.mdb
table: Alarm
Alarm Address | Alarm Description.

I've got database1 connected to a dbgrid as data1.
I would like to know how to connect it to 2nd database file in order to get query result as below:

Try this:

sql= " select LogAlarm.[Alarm Address] , Alarm.[Alarm Description]"
sql= sql & "from LogAlarm, [c:\tmt\machine.mdb].alarm"
sql= sql & " where LogAlarm.[Alarm Address]=Alarm.[Alarm Address]
Data1.Databasename="c:\dma\abc.mdb"
Data1.RecordSource = sql
Data1.Refresh

lp
Zoran

[rosli bakar]

Zoran,

Thanks a lots man....the code works fine now.

rgds rosli
"z" <zo************@vz.htnet.hr> wrote in message
news:dh**********@ss405.t-com.hr...

Database file 1 is in c:\dha\ABC.mdb
table: LogAlarm
Work Week | Alarm Address

Database file 2 is in c:\tmt\machine.mdb
table: Alarm
Alarm Address | Alarm Description.

I've got database1 connected to a dbgrid as data1.
I would like to know how to connect it to 2nd database file in order to

get

query result as below:

Try this:

sql= " select LogAlarm.[Alarm Address] , Alarm.[Alarm Description]"
sql= sql & "from LogAlarm, [c:\tmt\machine.mdb].alarm"
sql= sql & " where LogAlarm.[Alarm Address]=Alarm.[Alarm Address]
Data1.Databasename="c:\dma\abc.mdb"
Data1.RecordSource = sql
Data1.Refresh

lp
Zoran

[rosli bakar]

"z" <zo************@vz.htnet.hr> wrote in message
news:dh**********@ss405.t-com.hr...

Database file 1 is in c:\dha\ABC.mdb
table: LogAlarm
Work Week | Alarm Address

Database file 2 is in c:\tmt\machine.mdb
table: Alarm
Alarm Address | Alarm Description.

I've got database1 connected to a dbgrid as data1.
I would like to know how to connect it to 2nd database file in order to

get

query result as below:

Try this:

sql= " select LogAlarm.[Alarm Address] , Alarm.[Alarm Description]"
sql= sql & "from LogAlarm, [c:\tmt\machine.mdb].alarm"
sql= sql & " where LogAlarm.[Alarm Address]=Alarm.[Alarm Address]
Data1.Databasename="c:\dma\abc.mdb"
Data1.RecordSource = sql
Data1.Refresh

lp
Zoran

It worked fine on above code but when I tried to add another field list and
grouping in the query as below, I would get error
"You tried to execute a query that doesn't include the specified expression
Description as part of an aggregate function. (Error 3122)"

SQL = "Select LogAlarm.[Alarm Address] As Error_Code,"
SQL = SQL & " COUNT(logAlarm.[Alarm Address]) as Freq,"
SQL = SQL & " alarm.[Alarm Description] as Description"
SQL = SQL & " from LogAlarm, [c:\tmt\machine.mdb].alarm"
SQL = SQL & " where logAlarm.[Alarm Address]=alarm.[Alarm Address]"
SQL = SQL & " group by LogAlarm.[Alarm Address]"
SQL = SQL & " order by COUNT(logAlarm.[Alarm Address]) DESC"

please help....rosli