Visual Basic.NET - como puedo conectar visual basic 2010 con sql 2008 r2 mediante codigo

   
Vista:

como puedo conectar visual basic 2010 con sql 2008 r2 mediante codigo

Publicado por Richard richard_gm2007@hotmail.com (1 intervención) el 16/05/2013 04:18:22
Quiero conectar visual basic 2010 con sql 2008 r2 pero me sale error espero me puedan ayudar
este es mi codigo
CodeFile1.vb:

Imports System.Data.SqlClient

Module CodeFile1

Dim cadena As String = "server=RICHARD_GM-HP\SQLEXPRESS;initial Catalog=BDCINE;integrated Security=true"

Public cn As New SqlConnection(cadena)
End Module
CONEXION.vb :

Imports System.Data.SqlClient
Public Class CONEXION
Protected cnn As New SqlConnection
Protected Function conectado()
Try
cnn = New SqlConnection("DataSource (local);initial catalog=prueba ;integrated security=true")
cnn.Close()
Return True

Catch ex As Exception
MsgBox(ex.Message)
Return False

End Try

End Function
Protected Function desconectado()
Try
If cnn.State = ConnectionState.Open Then
cnn.Close()
Return True
Else
Return False


End If
Catch ex As Exception
MsgBox(ex.Message)
Return False


End Try
End Function
End Class
from ejemplo

Imports System.Data.SqlClient


Public Class ejemplo
Dim cmd As New SqlCommand
Dim dt As DataTable
Dim da As SqlDataAdapter
Public Sub mostrargrisha()
da = New SqlDataAdapter("select id_usuario,nombre,apellido,cargo,contraseña from usuario", cn)
dt = New DataTable
da.Fill(dt)
DataGridView1.DataSource = dt




End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
mostrargrisha()

End Sub


al ejecutar sale error:

No se puede abrir la base de datos "BDCINE" solicitada por el inicio de sesión. Error de inicio de sesión.
Error de inicio de sesión del usuario 'RICHARD_GM-HP\RICHARD_GM'.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder