Problem in creating partial replica MS ACCESS Version: 2003

[roypython]

Hello everyone.
Your help is very much appreciated.
I am using MS ACCESS 2003.
I am trying to create partial replica from the design master.
it all goes well until I try to set the filter using:
repPartial.Filters.Append "Customers",jrFilterTypeTable,"Customers.Regio n = 'CA' "
It throws an error:
"Invalid expression in the ReplicaFilter property".

The replica db, does contain "Customers" table, which has "Region" field.

The code, looks like:

dim repFull as new JRO.Replica
repFull.ActiveConnection = "C:\Program Files\Microsoft Office\OFFICE11\SAMPLES\northwind.mdb"
Call repFull.CreateReplica("C:\MY_REPLICA.mdb", "description", jrRepTypePartial)
 
Set repFull = Nothing
' open the partial replica in exclusive mode and apply filters
repPartial.ActiveConnection = "Data Source=C:\MY_REPLICA.mdb; Mode=Share Exclusive"
repPartial.Filters.Append "Customers", jrFilterTypeTable, "Customers.Region = 'CA' "
 
 

Thank you for you help.
Cheers
Roy

[ADezii]

Hello everyone.
Your help is very much appreciated.
I am using MS ACCESS 2003.
I am trying to create partial replica from the design master.
it all goes well until I try to set the filter using:
repPartial.Filters.Append "Customers",jrFilterTypeTable,"Customers.Regio n = 'CA' "
It throws an error:
"Invalid expression in the ReplicaFilter property".

The replica db, does contain "Customers" table, which has "Region" field.

The code, looks like:

dim repFull as new JRO.Replica
repFull.ActiveConnection = "C:\Program Files\Microsoft Office\OFFICE11\SAMPLES\northwind.mdb"
Call repFull.CreateReplica("C:\MY_REPLICA.mdb", "description", jrRepTypePartial)
 
Set repFull = Nothing
' open the partial replica in exclusive mode and apply filters
repPartial.ActiveConnection = "Data Source=C:\MY_REPLICA.mdb; Mode=Share Exclusive"
repPartial.Filters.Append "Customers", jrFilterTypeTable, "Customers.Region = 'CA' "
 
 

Thank you for you help.
Cheers
Roy

Are you missing the following Declaration?

Dim repPartial as New JRO.Replica

If Data Source and Mode are Named Arguments, wouldn't the syntax be:

repPartial.ActiveConnection = "Data Source:=C:\MY_REPLICA.mdb; Mode:=Share Exclusive"

[roypython]

Are you missing the following Declaration?

Dim repPartial as New JRO.Replica

If Data Source and Mode are Named Arguments, wouldn't the syntax be:

repPartial.ActiveConnection = "Data Source:=C:\MY_REPLICA.mdb; Mode:=Share Exclusive"

Thank you Adezii.
I'll try it and see what comes up.

[ADezii]

Thank you Adezii.
I'll try it and see what comes up.

You're welcome - hope it works for you.