Ajuda Simples Bd

[Guest Phil]

Olá,

Estou fazendo um trabalho de escola e travei num erro simples. Abaixo segue uma rotina para inclusão de dados numa tabela no Access, utilizando ADO connection.

Dim Inf As Database

Dim inf_tabela As Recordset

Private Sub Command1_Click()

inf_tabela.nome = Text1.Text 'quando o usuario clica, nome dele é armazenado na tabela "inf_tabela", no campo "nome"

inf_tabela.Update

End Sub

Private Sub Form_Load()

Set Inf = OpenDatabase("Inf.mdb")

Set inf_tabela = Inf.OpenRecordset("inf_tabela", dbOpenTable)

End Sub

Acontece o seguinte erro:

User -defined type not defined

Gostaria de uma ajuda, se por acaso preciso adiconar alguma referencia para adicionar ADO connection, ou mais algum comando.

Muito Obrigado.

Phil

[Graymalkin]

Você falou sobre ADO, mas na verdade está utilizando DAO. E a atribuição de valor a um campo está errada (deveria ser ! no lugar do .).

Abraços,

Graymalkin

[Guest Phil]

Muito Obrigado,

Mas agora vai outra duvida sobre ADO( ADO mesmo )

Uso está rotina para inclusão de dados.

Dim conexao As New ADODB.Connection
Dim inf_tabela As New ADODB.Recordset
Dim Nper As String
Dim sql as String

sql = "Insert Into inf_tabela(NomePers) Values(" & Nper & ")"

conexao.Execute (sql)

'cria a conexao com o banco de dados via ADO
 conexao.Open "Provider = Microsoft.Jet.OLEDB.4.0;Data Source =" & App.Path & "\inf.mdb"

mas ela só ne permite incluir numeros, quando vou incluir texto aparece o seguinte erro.

Nenhum valor foi fornecido para os paremetros necessarios!

Peço Mais uma a vez a colaboração.

Obrigado. Valeu...

[Graymalkin]

Os textos devem vir entre aspas simples. Exemplo:

INSERT INTO tabela (Código, Nome) VALUES (100001, 'Phil')

Certo? ;)

Graymalkin

[Guest Visitante]

VALEU MESMO...

OBRIGADO...