vbxsql server

[Tiel 0]

Fiz um banco de dados em SQL SERVER porém gostaria de saber como faço para fazer a conexão do mesmo com o VB?Muito obrigado.Tiel

[allan_pedroni 0]

Olá amigo,

 

o seguinte código faz a devida conexão com o SQL SERVER usando Visual Basic

 

Public CnnRsS As New ADODB.RecordsetPublic CnnConexao As New ADODB.ConnectionPublic sub Conecta_Sql_Server()On Error GoTo psConectaSQLSERVERerr    CnnConexao.Open "Provider=MSDASQL; Driver={SQL Server};    Server=caminho_do_banco; Database=Nome_Banco_seu; Uid=nm_usuario_bd; Pwd=senha_usuario_bd"        Exit SubpsConectaSQLSERVERerr:    MsgBox Err.Description, vbCritical, "Error " & Err.Number    Exit SubEnd Sub