COMO INCLUIR ALTERAR E EXCLUIR DADOS EM BD PARADOX

FADSYSTEM 25/08/2006 11:06:37
#167230
Olá,

Estou tentando incluir dados em uma tabela de banco de dados paradox
pelo VB, ao tentar incluir vem a mensagem:
"Não é possível atualizar. O banco de dados ou o objeto é somente leitura."

Com o código abaixo consigo somente ler, porém não consigo inserir dados. Se alguém souber como solucionar esse problema, ficarei agradecido. [S52]

'Ref: Microsoft ActiveX Data Objects 2.7 Library
Dim con As New ADODB.Connection
Dim rs As New ADODB.Recordset

Private Sub Form_Load()
    'Abrir Pasta dos Dados
    con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Dados\;Extended properties=Paradox 5.x"
    'Abrir Banco de Dados
    rs.Open "teste.DB", con, adOpenDynamic, adLockPessimistic
End Sub


Private Sub Form_Unload(Cancel As Integer)
    rs.Close
    con.Close
    Set rs = Nothing
    Set con = Nothing
End Sub


Private Sub Command1_Click()
    'Exibir dados
    Text1.Text = rs.Fields(2)
End Sub


Private Sub Command2_Click()
    'Mover para o próximo dados
    rs.MoveNext
    Command1_Click
End Sub
USUARIO.EXCLUIDOS 25/08/2006 11:13:00
#167232
Amigo, eu costumo incluir dados no banco desta forma

con.Execute "Insert into SUA_TABELA (Campo1, Campo2) VALUES (Valor_do_Campo1, Valor_do_Campo2)"

desta forma funciona em qualquer banco sem problemas nenhum.
Tópico encerrado , respostas não são mais permitidas
Voltar