ACESSO A O BANCO DE DAODS SQL SERVER.
Pessoal bom dia !
Como faço para acessar um banco de dados sql sever?
Como faço para acessar um banco de dados sql sever?
eu uso asim:
dim StringCon As String = [Ô]PROVIDER=sqloledb;SERVER=.\SQLEXPRESS;DATABASE=seubanco;UID=SA;PWD=suasenha[Ô]
Dim cnDB As New System.Data.OleDb.OleDbConnection(StringCon)
Dim cSQLCOMANDO As String = [Ô]INSERT INTO Usuarios (STATUS) VALUES([ô]N[ô])[Ô]
Dim oCMD As New OleDb.OleDbCommand(cSQLCOMANDO, cnDB)
cnDB.Open()
oCMD.ExecuteNonQuery()
[ô]// Cria um novo Command, para obter o novo valor do campo
oCMD = New OleDbCommand([Ô]SELECT @@IDENTITY[Ô], cnDB)
[ô]// Obtém o valor que foi atribuÃdo ao campo autonumeração
TextBox1.Text = Convert.ToInt32(oCMD.ExecuteScalar())
cnDB.Close()
uso assim para gerar um novo codigo no sql
dim StringCon As String = [Ô]PROVIDER=sqloledb;SERVER=.\SQLEXPRESS;DATABASE=seubanco;UID=SA;PWD=suasenha[Ô]
Dim cnDB As New System.Data.OleDb.OleDbConnection(StringCon)
Dim cSQLCOMANDO As String = [Ô]INSERT INTO Usuarios (STATUS) VALUES([ô]N[ô])[Ô]
Dim oCMD As New OleDb.OleDbCommand(cSQLCOMANDO, cnDB)
cnDB.Open()
oCMD.ExecuteNonQuery()
[ô]// Cria um novo Command, para obter o novo valor do campo
oCMD = New OleDbCommand([Ô]SELECT @@IDENTITY[Ô], cnDB)
[ô]// Obtém o valor que foi atribuÃdo ao campo autonumeração
TextBox1.Text = Convert.ToInt32(oCMD.ExecuteScalar())
cnDB.Close()
uso assim para gerar um novo codigo no sql
Faça seu login para responder