TransactionScope Error   

Hello All

I am facing facing problem in TransactionScope.
I have two databases on different computers.  
Server1
Server2

Following is the code

'****Imports
Imports System
Imports System.Data
Imports System.Data.Sqlclient
Imports System.Transactions

'*****Delclaration
'*******Connection String and other declaration for  server1
    Dim con As New SqlConnection("Password=scroll!1234;Persist Security   
Info=True;User ID=sa;Initial Catalog=ImporterNew;Data Source=192.168.0.43")
    Dim da As New SqlDataAdapter("Select * from test", con)
    Dim ds As New DataSet
    Dim cmdbld As New SqlCommandBuilder


'*******Connection String and other declaration for  server2
    Dim ConnString As String = "Password=scroll!1234;Persist Security 
Info=True;User ID=sa;Initial Catalog=SExporterDB;Data Source=192.168.16.100"

    Dim PushTransaction_CmdInsert As New SqlCommand
    Dim PushTransaction_strsql As String = "insert into test 
values('fromVitalicaserver')"


'*****Method
Private sub do transaction

       '***Server 2 Connection 
        cmdbld.DataAdapter = da
        da.Fill(ds, "test")

        Using scope As New 
TransactionScope(TransactionScopeOption.RequiresNew)
           '***Server1 Connection
            Using PushTransaction_conserver As New SqlConnection(ConnString)

                PushTransaction_CmdInsert.Connection = 
PushTransaction_conserver
                PushTransaction_conserver.Open()
                PushTransaction_CmdInsert.CommandText = PushTransaction_strsql
               '**Inserting record on server2
                PushTransaction_CmdInsert.ExecuteNonQuery()
                PushTransaction_conserver.Close()

               '**updating record on server1
                ds.Tables(0).Rows(0).Item("Name") = "AgrofoyerUpdated"
                da.Update(ds, "test")
            End Using
            scope.Complete()
        End Using
End Sub

date: Tue, 26 Feb 2008 20:45:00 -0800   author:   Madhukar Bhalerao Madhukar