Ver Mensaje Individual
  #1 (permalink)  
Antiguo 11/07/2012, 21:01
Avatar de Sumerio
Sumerio
 
Fecha de Ingreso: octubre-2009
Mensajes: 195
Antigüedad: 12 años, 7 meses
Puntos: 6
Pregunta Como separar este metodo en tres capas

Hola, le quiero consultar este problemilla que tengo, todo mi formulario funciona bien, solo que tengo un metodo que se llama MostrarCodigo():

Código:
Dim cn As New SqlConnection("server=CASA-PC;database=SICVAST;integrated security=SSPI")

Sub MostrarCodigo()
        cn.Open()
        Using da As New SqlDataAdapter("UltimoCodigoProd", cn)
            da.SelectCommand.CommandType = CommandType.StoredProcedure
            Dim ncodigo As String = da.SelectCommand.ExecuteScalar

            txtCodProducto.Text = "P" & (Microsoft.VisualBasic.Right(ncodigo, 3) + 1).ToString("000")
        End Using
        cn.Close()
    End Sub
Lo que hace es mostrar el codigo del producto nuevo a registrar, pero el problema es que lo tengo en una capa, lo que tengo que hacer es tenerlo en tres capas, pero nose como hacerlo a causa que tengo que capturar lo me envia el procedimiento ("UltimoCodigoProd") que me da el ultimo codigo, y en esta capa capturarlo por txtCodProducto y castearlo y sumarle uno.