/* */

Friday, May 6, 2011

Re: Bls: [belajar-access] database replication



Public Sub CreateRep()
' microsoft Jet and Replication Objects 2.6 Library
   Dim repMaster As New JRO.Replica

    If (Dir("d:\temp\Replica of Northwind.mdb") <> "") Then Kill _
      ("D:\temp\Replica of Northwind.mdb")

    repMaster.ActiveConnection = "D:\temp\Northwind.mdb"
    If repMaster.ReplicaType = jrRepTypeNotReplicable Then
        Set repMaster.ActiveConnection = Nothing
        repMaster.MakeReplicable "D:\temp\Northwind.mdb", False

    End If

    If (Dir("d:\temp\myTestRep.mdb") <> "") Then Kill _
      ("d:\temp\myTestRep.mdb")

        repMaster.CreateReplica "d:\temp\myTestRep.mdb", "My Full Replica1", jrRepTypeFull, jrRepVisibilityGlobal
   
End Sub

'==

sekali dibuat replicate, maka replicate tak bisa non aktifkan .. mungkin ada cari nya  ? #-o

'====

--- In belajar-access@yahoogroups.com, imam safari <imam_safari_hidayat@...> wrote:
>
> wah sip banget pak CGSATU
> itukan syncronnya pakai klik biasa gimana kalau memakai tombol botton
> vba nya untuk menjalankan hal tersebut
>
> --- Pada Kam, 5/5/11, CGSATU cgsatu@... menulis:
>
> Dari: CGSATU cgsatu@...
> Judul: [belajar-access] database replication
> Kepada: belajar-access@yahoogroups.com
> Tanggal: Kamis, 5 Mei, 2011, 1:06 AM
>
>
>
>
>
>
>
>  
>
>
>
>
>
>
>
>
>
>  
> Malam-malam (atau sebenarnya sudah pagi ya..) gak bisa tidur, coba nulis mengenai Database Replication...silakan dinikmati....
>  
> http://mugi.or.id/blogs/elang/archive/2011/05/05/maintain-your-ms-access-database-and-application-with-replication.aspx
>  
> cgsatu
>



__._,_.___


SPAM IS PROHIBITED



Your email settings: Individual Email|Traditional
Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Daily Digest | Switch to Fully Featured
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe

__,_._,___

No comments:

Post a Comment