Dada sigo teniendo errores que no se como solucionar el código que tengo ahora es el siguiente y me da que estoy haciendolo mal. Muchas gracias y perdonar por ser tan pesado con este tema.
y los errores siguen siendo los siguientes:
Cita: tipo System.Data.Sqlclient.SqlDataReader no tiene ningún constructor
Cita: 'Fill' no es un miembro de System.Data.SqlClient.SqlDataReader
Código PHP:
Imports Microsoft.VisualBasic
Imports System.Data.SqlClient
Imports System.Data.Sql
Public Class Cconexion
Public con As SqlConnection
Sub abrir()
If IsNothing(con) Then
con = New SqlConnection(ConfigurationManager.ConnectionStrings("ConnectionString").ConnectionString)
con.Open()
End If
End Sub
Public Function ejecutar(ByVal orden As String) As Integer
abrir()
Dim cmd As New SqlCommand(orden, con)
Return cmd.ExecuteNonQuery
End Function
Public Function consultar(ByVal orden As String) As SqlDataReader
abrir()
Dim cmd As New SqlCommand(orden, con)
Return cmd.ExecuteReader
End Function
Public Function escalar(ByVal orden As String) As Object
abrir()
Dim cmd As New SqlCommand(orden, con)
Return cmd.ExecuteScalar
End Function
Public Function consulta2(ByVal orden As String) As SqlDataReader
abrir()
Dim cmd As New SqlCommand(orden, con)
Return cmd.ExecuteReader
End Function
Public Function ConsulTabla(ByVal orden As String) As Data.DataTable
abrir()
Dim oTabla As New Data.DataTable
Dim cmd As New SqlCommand(orden, con)
Dim oRead As New SqlDataReader(cmd)
oRead.fill(oTabla)
Return oTabla.Copy()
End Function
End Class