none
Esta operacion no se admite en el cliente de prueba datatable (wcf) RRS feed

  • Pregunta

  • Hola, gracias por esta gran comunidad a la cual admiro mucho, espero me puedan ayudar muy gentilmente.

    Soy novato en esto de los wcf, pero voy a mudar mi aplicación a Metro de windows 8, y necesito interactuar con SQLServer. He leido mucho pero no he entendido como adaptarlo a mi problema.

    Hice mas o menos este servicio:

    <ServiceContract()>
    Public Interface IService1
    
        <OperationContract()>
        Sub Constructor(ByVal Servidor_SqlServer As String, ByVal Nombre_BaseDatos As String, ByVal Usuario_Login As String, ByVal Usuario_Password As String)
    
        <OperationContract()>
        Function Conectar() As Boolean
    
        <OperationContract()>
        Sub TraerTabla(ByRef DataTable_A_Llenar As DataTable, ByVal Consulta As String)
    .....
    
    End Interface
    Public Class Service1
        Implements IService1
    
    
        Property MyServer As String
        Property NombreDB As String
        ......
        Property Consulta As String
    
    
    
        Public Sub New()
        End Sub
    
    
        Public Sub Constructor(ByVal Servidor_SqlServer As String, ByVal Nombre_BaseDatos As String, ByVal Usuario_Login As String, ByVal Usuario_Password As String) Implements IService1.Constructor
    
            Me.MyServer = Servidor_SqlServer
            Me.NombreDB = Nombre_BaseDatos
            Me.Usuario_Id = Usuario_Login
            Me.Usuario_Pass = Usuario_Password
            .....
        End Sub
    
    
        Public Function Conectar() As Boolean Implements IService1.Conectar
            ............
    
        End Function
    
    
        Public Sub TraerTabla(ByRef DataTable_A_Llenar As DataTable, ByVal Consulta As String) Implements IService1.TraerTabla
    
            Dim Adapt As New SqlDataAdapter(Consulta, Me.Conex)
    
            Try
                Me.Conectar()
                Adapt.Fill(DataTable_A_Llenar)
                Me.Desconectar()
            Catch ex As Exception
                MsgBox("No se pudieron traer los datos." & ex.Message & vbCrLf & Consulta)
            End Try
    
        End Sub
    

    Me sale el error que puse en el titulo de esta pregunta, ya he leido sobre datamember pero no sé como implementarlo.

    Otra pregunta sino es mucha molestia, ¿el servicio estará corriendo sobre todas las computadoras de mi red o solo en el servidor?, ¿Está bien hecho?:

            Dim proxy As Service1Client = New Service1Client
            Await proxy.ConstructorAsync("JOSETH-PC", "Olimpiadas", "princ", "123")
            Await proxy.ConectarAsync()
    

    ¿Los datos del servicio se modifican por computador o todos los computadores acceden a las mismas propiedades?, por ejemplo, si con un cpu llamo:

    Await proxy.ConectarAsync("123") 'Cambia la propiedad de la conexion

    ¿También cambió para otra cpu?

    Gracias, espero me puedan explicar y disculpen la molestia.

    jueves, 9 de agosto de 2012 14:46