Foros del Web » Programación para mayores de 30 ;) » .NET »

Visual Basic. Como leer respuesta de SP

Estas en el tema de Visual Basic. Como leer respuesta de SP en el foro de .NET en Foros del Web. Amigos: Tengo 1 Procedimiento almacenado en SQL SERVER 2000, el cual me responde si una Tabla existe o no existe (1 ó 0 ). En ...
  #1 (permalink)  
Antiguo 03/09/2010, 16:11
 
Fecha de Ingreso: julio-2010
Mensajes: 11
Antigüedad: 13 años, 9 meses
Puntos: 0
Sonrisa Visual Basic. Como leer respuesta de SP

Amigos:
Tengo 1 Procedimiento almacenado en SQL SERVER 2000, el cual me responde si una Tabla existe o no existe (1 ó 0 ).
En la consola de consulta de SQL escribo :
EXEC SP_VE_SI_HAY_TABLA @Nombre_Tabla='nombre_de_la _tabla'
y su resultado en pantalla es 1 ó 0.

LA PREGUNTA ES: como debo escribir el código de VB para conocer la respuesta de este SP dentro del programa VB y así poder ejecutar el código que sigue.

Quedaré muy agradecido de quien me pueda ayudar.
  #2 (permalink)  
Antiguo 04/09/2010, 07:33
Avatar de xjuanch0x  
Fecha de Ingreso: septiembre-2009
Mensajes: 125
Antigüedad: 14 años, 7 meses
Puntos: 1
Respuesta: Visual Basic. Como leer respuesta de SP

Esto te servirá
Código vb:
Ver original
  1. Public Function Consultar(ByVal newName As String, ByVal connString As String) As Boolean
  2.         Dim ExisteTabla As Boolean = False
  3.         Dim sql As String = " SP_VE_SI_HAY_TABLA"
  4.  
  5.  
  6.         Using conn As New SqlConnection(connString)
  7.             Dim cmd As New SqlCommand(sql, conn)
  8.             cmd.CommandType = CommandType.StoredProcedure
  9.             cmd.Parameters.Add("@Nombre_Tabla", SqlDbType.VarChar)
  10.             cmd.Parameters("@Nombre_Tabla").Value = newName  ''El nombre de tu tabla
  11.            Try
  12.                 conn.Open()
  13.                 ExisteTabla = Convert.ToBoolean(cmd.ExecuteScalar())
  14.             Catch ex As Exception
  15.                 MessageBox.Show(ex.Message)
  16.             End Try
  17.         End Using
  18.  
  19.         Return ExisteTabla
  20.     End Function
__________________
Juan David Torres Vasquez
[email protected]
Microsoft Certified Technology Specialist (MCTS)
DCE Platinum en Visual C# y VB.NET
  #3 (permalink)  
Antiguo 06/09/2010, 10:19
 
Fecha de Ingreso: julio-2010
Mensajes: 11
Antigüedad: 13 años, 9 meses
Puntos: 0
Respuesta: Visual Basic. Como leer respuesta de SP

xjuanch0x:

Quedo muy agradecido de tu respuesta por 2 motivos:
1) Tu disposición a colaborar con los menos favorecidos en dominar estas tecnologías
2) Por la calidad de tu respuesta. De hecho no la pude aplicar tal cual, (uso VB 6.0, todavía) pero adapté tu ejemplo y me funcionó totalmente.

Etiquetas: 2000, basic, server, sql, visual
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 16:15.