|
|
Postada em 27/09/2006 08:42 hs
Bom dia pessoal, Tenho um programa em vb ligado ao interbase e faço as conexões com o componete Adodc e instalei o firebird para fazer minha conexões. Meu Adodc na propriedade recorsource tem o código "SELECT * FROM NOMETABELA", e os textbox da tabela estão ligados a ele, como eu faço para colocar um botão de novo cadastro, porque os botões que eu ligo ao Adodc mostram os dados da tabela e onde eu coloco o código de insert se no campo recordsource esta fazendo um select??? |
|
|
|
|
|
|
|
Postada em 27/09/2006 09:57 hs
Resumindo a pergunta:
Como faço meu Adodc(Adodc é quase um data) fazer um insert na tabela e como eu coloco um botão de novo cadstro Quem souber responda ou dê uma dica diferente. Desde já grato |
|
|
|
Cardoso G
|
PATOS DE MINAS
MG - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 27/09/2006 15:17 hs
'gomes , eu acho mais pratico sem o adodc faço assim: conexao.execute "insert into tabela values(1,'sao paulo')" 'acho bem mais simples |
|
|
|
|
|
Postada em 27/09/2006 15:33 hs
è por que o unico modo que eu achei para ligar o vb no interbase6 foi usando um Adodc. Aí eu instalei o FireBird e ligo o Adodc no fire birde e ele me deixa conectar ao interbase Sabe outro jeito de conectar o interbase ao vb ou outro jeito de solucionar meu problema se souber mostra que será de grande ajuda. E muito obrigado pela dica. |
|
|
|
FIÃO
|
SÃO PAULO
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 27/09/2006 21:03 hs
Olá Gomes_L Espero q ajude... Flw
... FIÃO ... "Não há uma 2º chance para causar um boa 1º impressão"
|
|
|
|
Cardoso G
|
PATOS DE MINAS
MG - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 28/09/2006 08:00 hs
Gomes, eu conecto assim dim Conexao As ADODB.Connection
dim sCnx As String 'essa linha abaixo vc troca pela string de conexao do interbase, pq essa ai é do 'access sCnx = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "db1.mdb;Persist Security Info=False"
Set Conexao = New ADODB.Connection
Conexao.Open sCnx 'para desconectar vc usa os comandos abaixo Conexao.Close
Set Conexao = Nothing |
|
|
|
