adicionar registro no bd

[acma88 0]

olá pessoal ... sou iniciante em vb6 e preciso de uma ajuda.quero adicionar registros a uma tabela do meu banco de dadosestou ultilizando o Adodc. Estou ultilizando somente esse comando para adicionar e esta dando Run time error '424' Object Required(rs.Users.Adodc1.AddNew) onde 'Users' é o nome da minha tabela.qual outro comando posso ultilizar? POr favor me ajudem.Obrigado

[dark_devil 0]

Boas acma88,

 

Voce tambem pode adicionar dados da seguinte maneira:

 

Private Sub Command1_Click()

 

 

Set registo = New ADODB.Connection

registo.CursorLocation = adUseClient

registo.Mode = adModeShareDenyNone

 

registo.Open g_str_ConnectionString

 

str_SQL = "Insert into T_alunos (Nome,Turma) values ('" & Text1 & "','" & text2 & "')"

 

registo.Execute str_SQL

 

MsgBox "Valores Inseridos Com Sucesso", vbInformation

 

 

End Sub

 

Para que este codigo funcione tem que adicionar um Modulo ao programa que é o seguinte:

 

Public Const g_str_ConnectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=LOCAL_DA_BASE_DADOS;Persist Security Info=False"

 

Espero ter ajudado....

[Luizgrs 0]

Eu considero o método de conexão ao BD mostrado pelo dark_devil melhor, mas caso você queira continuar com o ADODC a maneira correta de fazer é assim:

Adodc1.Recordset.AddNew

A tabela Users já tem que ter sido escolhida RecordSource.

[acma88 0]

valeuw pelas dicas .. mto agradecido .. deu certo sim da maneira que dark_devil mostrou .. agradeço tbem a dica dada por Luizgrs tbemvlw pela atenção !