ERRO QUANDO TENTO GRAVAR DADOS NUM BANCO SQL

USUARIO.EXCLUIDOS 22/08/2006 18:35:26
#166566

Olá quando tento gravar dados num banco sql ele da o seguinte erro:
Quando clico no botão novo o programa diz que a "operação não é possivel pois o objeto está fechado", só que já fiz a conexão direitinho.

con.Open "Provider=SQLOLEDB.1;User ID=usuário;Password=senha;Persist Security Info=True;Initial Catalog=database;Data Source=endereço do banco SQL"

BOTÃO NOVO
tbsql.MoveLast
Txtcod = tbsql("cod") + 1
Txtcod.Enabled = False

Txtnome.SetFocus
tbsql.AddNew
acao = "inclu"


E outro erro é que quando clico no botão gravar ele diz que "O item não pode ser encontrado na coleção correspondente ao nome ou ao ordinal solicitado".

BOTAO GRAVAR
Da erro na primeira linha:
tbsql("cod") = Txtcod.Text
tbsql("nome") = Txtnome.Text
tbsql("rg") = Txtrg.Text
tbsql("nasc") = Txtnasc.Text
tbsql("cpf") = Txtcpf.Text
tbsql("end") = Txtend.Text
tbsql("cep") = txtcep.Text
tbsql("irmaos") = Cboirmaos.Text
tbsql("civil") = Cbocivil.Text
tbsql("tel") = Txttel.Text
tbsql("comercial") = Txtcom.Text
tbsql("cel") = Txtcel.Text
tbsql.Update