Codigo BS
Enviado por Margaritamolina1 • 4 de Febrero de 2015 • 991 Palabras (4 Páginas) • 121 Visitas
Imports Microsoft.VisualBasic
Imports System.Data.SqlClient
Public Class Centro
Private _id As Integer
Private _nom As String
Private _inves As String
Private _fecha As String
Private _facultad As String
Private strSQL As String
Private strcadenaconexion As String = ConfigurationManager.ConnectionStrings("strConexion").ConnectionString
Private objConn As SqlConnection
Private abjComando As SqlCommand
Public Property identificacion As Integer
Get
Return _id
End Get
Set(ByVal value As Integer)
_id = value
End Set
End Property
Public Property nombre As String
Get
Return _nom
End Get
Set(ByVal value As String)
_nom = value
End Set
End Property
Public Property investigador As String
Get
Return _inves
End Get
Set(ByVal value As String)
_inves = value
End Set
End Property
Public Property fecha As String
Get
Return _fecha
End Get
Set(ByVal value As String)
_fecha = value
End Set
End Property
Public Property facultad As String
Get
Return _facultad
End Get
Set(ByVal value As String)
_facultad = value
End Set
End Property
Private Sub conectar()
objConn = New SqlConnection(strcadenaconexion)
End Sub
Public Sub cerrar()
Objconn.Close()
...