Preciso de um exemplo simples - SQl Server

[Scare_Crow 0]

Pessoal,

 

Essa dúvida é bem simples, mas estou pesquisando códigos na web há horas e nada funciona aqui. Please, um help !

 

Meu problema é o seguinte:

 

Tenho um banco de dados fora da minha rede, preciso acessar esse banco e inserir um registro nele.

Meu problema está em como estabelecer uma conexão com o banco e como enviar o comando SQL para incluir.

 

Bem simples mesmo, só para eu entender como se usa o ADO com SQL.

 

Data Source=myServerAddress;Initial Catalog=myDataBase;User Id=myUsername;Password=myPassword;

 

Essa é a string de conexão que estou tentando usar... lógico que no programa, vou substituir os parametros pelos verdadeiros.

Mas como eu utilizo essa string para conectar ?

 

O comando SQL que quero executar é também simples: Insert into Filmes (titulo) values ('Titulo inserido pelo VB')

 

Como disparo esse comando ?

 

Por favor, ajudem. Estou há horas nessa brincadeira e não saio do lugar... http://forum.imasters.com.br/public/style_emoticons/default/upset.gif

 

-=-

Scare_Crow

[Vitor Linares 0]

Scare_Crow,

 

se você estiver no vb2005 você pode usar o namespace sqlclient...

 

o code seria o seguinte

 

dim con as new sqlclient.sqlconnection()con.connectionstring = sua stringdim cmd as new sqlclient.sqlcommand()cmd.connection = concmd.commandtext = "insert into sua tabela (os campos q você qr inserir os dados) values (os valores)"cmd.executenonquery()

espero ter ajudado

 

qualquer coisa poste q eu te ajudo...

Vitor

[Scare_Crow 0]

se você estiver no vb2005 você pode usar o namespace sqlclient...

Obrigado pela resposta, Vitor.Estou usando o VB6, esse exemplo não funcionou na declaração de variaveis, deu o erro Expected: end of statment na linha Dim con as new sqlclient.sqlconnection()Abs-=-Scare_Crow

[Vitor Linares 0]

Scare_Crow,

 

no vb6 essa conexao eh feita por ADO da segiunte forma:

 

Private cnn As ADODB.ConnectionPrivate cmd As ADODB.CommandSet cnn = New ADODB.ConnectionSet cmd = New ADODB.Commandcnn.Open("Provider=SQLOLEDB;Initial Catalog=SEU_BANCO;Data Source=SEU_SERVIDOR; integrated security=SSPI; persist security info=True;UserId=SEU_USUARIO;Password=SUA_SENHA"cmd.ActiveConnection = cnncmd.Execute "insert into tabela values(valores)"cnn.Close()

estou sem o meu vb aqui pra conferir se naum tem nenhum erro... qualquer problema estarei por aqui...

 

PS: voce pode executar um commando diretamente pela conxão... basta fazer o seginte:

cnn.execute "seu comando aqui"

Abc

Vitor