La Web del Programador: Comunidad de Programadores
 
    Pregunta:  37854 - COMO CONECTAR UNA BASE DE DATOS EN SQL Y VB.NET
Autor:  Carlos Ramos
La Verdad es que necesito algo de ayuda en cuanto al procedimiento que se debe seguir para conectar una base de datos en SQL Server a VB.NET. Si alguien aqui me escribe alguna referencia de como hacerlo les agradeceria mucho.

  Respuesta:  Fredy Huaman
Mira primero crea un modulo y coloca este codigo.
'Claro q tendras q colocar imports system.data.sqlclient
asi podras acceder a las conexiones.

Imports System.Data.SqlClient
Module iniciar

Friend con As SqlConnection
Friend cmd As SqlCommand
Friend da As SqlDataAdapter
Friend dr As SqlDataReader
Friend ds As DataSet

Friend Sub consulta(ByVal sql As String, ByVal tabla As String)
Try
con = New SqlConnection("Data Source=.; integrated security=true; initial catalog=Compraventa")
cmd = New SqlCommand(sql, con)
da = New SqlDataAdapter(cmd)
ds = New DataSet()
da.Fill(ds, tabla)
Catch ex As SqlException
MsgBox(ex.Message)
Finally
con.Close()
End Try

End Sub
End Module

Luego ya teniendo el procedimiento consulta ya podras llamar en el proyecto " call consulta(sql,tabla) "

ejemplo:
call consulta("select * from cliente","cliente")

y cargas el Dataset ds con la propiedad tables, asi:

listbox.datasource=ds.tables("cliente")

espero q te siirva.

Fredy

  Respuesta:  JP ferlito
yo me inclinaria por el primer caso, utilizar SQLConnection ya que es propio de .NET y no utilizar ADOS y esas cosas asi utilizas lo nuevo y no usas lo viejo en un entorno nuevo...

  Respuesta:  Victor Arredondo
Tira este código a tu pagina te deberá crear un boton y un datagrid
revisa el codigo en el evento load de la pagina generò el string de conexiòn y en el encabezado genéro las variables de conexión dudas escribeme

Public Class Tabla
Inherits System.Web.UI.Page
Protected WithEvents DataGrid1 As System.Web.UI.WebControls.DataGrid
Protected WithEvents Button1 As System.Web.UI.WebControls.Button
Protected WithEvents Button2 As System.Web.UI.WebControls.Button
Protected WithEvents TxtCod As System.Web.UI.WebControls.TextBox
Public SqlConn As New SqlClient.SqlConnection()
Public da As SqlClient.SqlDataAdapter
Public dar As SqlClient.SqlDataReader
Public ds As New DataSet()

#Region " Web Form Designer Generated Code "

'This call is required by the Web Form Designer.
Private Sub InitializeComponent()

End Sub

#End Region

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
SqlConn.Open()
da = New SqlClient.SqlDataAdapter("Select dg_nombre_usuario, dg_apellidos_usuario from tb_usuarios a where dc_usuario = " & TxtCod.Text, SqlConn)
da.Fill(ds, "Tb_Usuarios")
DataGrid1.DataSource() = ds.Tables("Tb_Usuarios")
DataGrid1.DataBind()
SqlConn.Close()
End Sub

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
SqlConn.ConnectionString = "data source=172.16.9.2;initial catalog=PRUEBATM;password=sqlver70;persist security info=True;user id=sa;workstation id=W2K-VARREDONDO;packet size=4096"
End Sub
End Class

  Respuesta:  Alvaro Cortez
Elije la opcion de menu "tools", y selecciona la opion de esta "conectar a base de datos", te aparecera un wizard donde te pregunta el origen de los datos, ya se sqlserver, access,....., seleccionas la base de datos y terminas. Te va a crear una conexion, revisa sus propiedades y la ruta de conexion copiala, agrega el componente ado.net a tu proyecto, y declara una variable que será la cual te permitira conectarte a la base de datos. EJ:

public Conexion_DB as new adodb.conexion

luego en el Load de tu formulario principal coloca:

conexion.coneccionstring="ruta de la base de datos" aqui es donde tienes que pegar la ruta
conexion.open

y eso es todo

suerte

  Respuesta:  Jose Samper
Usa el objeto ADO.net, esto te permite conectar tu base de datos con VB.net