Sanjay - please see response below to your other thread.
Cheers,
Paul Ibison SQL Server MVP, www.replicationanswers.com .

Following commands from VB6 are working with SNAPSHOP and TRANSACTIONAL
replication.
But it does not work with MERGE.
Pls help !

Option Explicit
Const DB_AUTHENTICATION = 0
Const NT_AUTHENTICATION = 1
Const TRANSACTIONAL = 1
Const ANONYMOUS = 2
Const PULL = 1
Const FILETRANSFERFTP = 1
Const TCPIP_SOCKETS = 1


Dim objSQLDist, objNetwork
Set objSQLDist = CreateObject("SQLDistribution.SQLDistribution.2")
'Set objNetwork = Wscript.CreateObject("Wscript.Network")
objSQLDist.Publication = mPublication


objSQLDist.Publisher = mPublisherName
objSQLDist.PublisherAddress = mPublisherAddress
objSQLDist.PublisherNetwork = TCPIP_SOCKETS
objSQLDist.PublisherDatabase = mPublisherDatabase
objSQLDist.PublisherSecurityMode = DB_AUTHENTICATION
objSQLDist.PublisherLogin = mPublisherLogin
objSQLDist.PublisherPassword = mPublisherPassword
objSQLDist.FileTransferType = PULL
objSQLDist.Subscriber = mSubscriberName
objSQLDist.SubscriptionType = ANONYMOUS
objSQLDist.SubscriberSecurityMode = DB_AUTHENTICATION
objSQLDist.SubscriberLogin = mSubscriberLogin
objSQLDist.SubscriberPassword = mSubscriberPassword
objSQLDist.SubscriberDatabase = mSubscriberDatabase

objSQLDist.Initialize
objSQLDist.Run