Ayuda, conectar visual studio 2012 y sql server 2012

isroco

Bovino maduro
#1
Hola

Estoy aprendiendo a programar y quiero conectar una base de datos en sql server 2010 con un formulario echo en visual studio 2010.

Se que se puede hacer mediante código. Pero siendo Visual Studio, cual es el método visual que ofrece?

Alguien que me pueda orientar.
 

StuxNet

Bovino Milenario
#2
No Especificas en que Lenguaje Si Es Para C# !

Aqui Esta :
public static string cadcon = "Data Source =ElNombredeusuariodeSqlserver; DataBase=ElNombredetubaseDeDatos; Integrated Security = true";
public string consulta;
public SqlDataAdapter da;
public DataSet ds;
public DataTable dt;
public SqlCommand comand;
public SqlConnection con;

public coneccion(string cons)
{
consulta = cons;
da = new SqlDataAdapter(consulta, cadcon);
ds = new DataSet();
da.Fill(ds);
dt = new DataTable();
da.Fill(dt);
comand = new SqlCommand();
con = new SqlConnection(cadcon);
}

public DataTable muestradatos(string cons)
{
DataTable res = new DataTable();
da = new SqlDataAdapter(cons, cadcon);
da.Fill(res);
return res;
}

public void accion(string consul)
{
con.Open();
comand = new SqlCommand(consul, con);
comand.ExecuteNonQuery();
con.Close();
}
Para Visual Basic Net Aqui Bueno Es con Mysql pero es igual como Sqlserver
Imports MySql.Data.MySqlClient
Imports System
Imports System.Data
Imports System.Windows.Forms
Public Class Conexion
Public cnn As New MySqlConnection
Public cmd As MySqlCommand
Public da As MySqlDataAdapter
Public cb As MySqlCommandBuilder
Public ds As New DataSet
Public dt As New DataTable
Public dr As MySqlDataAdapter
Public dat As String

Public fila As DataRow

Function mostrar(ByVal tabla As String) As DataTable
conexion()
dt = New DataTable
Dim mysql As String = "select * from " + tabla
da = New MySqlDataAdapter(mysql, cnn)
da.Fill(dt)
Return dt

End Function

Public Sub conexion()
If Not cnn Is Nothing Then cnn.Close()

dat = String.Format("server=localhost;user=usuariodelservidordemysql;database=Elnombredetubasededatos")
Try
cnn = New MySqlConnection(dat)
cnn.Open()
'MsgBox("Correecto")
Catch ex As Exception
MsgBox("error" & ex.Message, MsgBoxStyle.Information, "Error")
End Try
End Sub
Public Sub procesos(ByVal cadena As String)
Try
Dim sql As String = cadena
cmd = New MySqlCommand(cadena, cnn)
cmd.ExecuteNonQuery()
MsgBox("Instruccion realizado con exito")

Catch ex As Exception

End Try


End Sub
'FUNCION DataSet





Public Function ds_consulta(ByVal cadena As String) As DataSet
Try
da = New MySqlDataAdapter(cadena, cnn) 'Se realiza la instancia y se genera la consulta.
da.Fill(ds) 'llenamos el dataset= una tabla en memoria
Catch ex As Exception
MsgBox("Error en la consulta", MsgBoxStyle.Information, "Error")
End Try
Return ds 'Se retorna el dataset
End Function
'FUNCION DataTable





Public Function dt_consulta(ByVal cadena As String) As DataTable
Try
da = New MySqlDataAdapter(cadena, cnn) 'Se realiza la instancia y se genera la consulta.
dt = New DataTable
cb = New MySqlCommandBuilder(da)

da.Fill(dt) 'llenamos el dataset= una tabla en memoria
Catch ex As Exception
MsgBox("Error en la consulta", MsgBoxStyle.Information, "Error")
End Try
Return dt 'Se retorna el dataset
End Function
End Class
 
Arriba