SOBRE FIREBIRD

ARCADYUM 04/09/2010 12:30:02
#352201
Pessoal,
Tentei todas as formas e sugestões que me foram postadas aqui no fórum e eoutras situações na Internet. Porém nada funcionou.
Por favor alguém poderia me ajudar com as seguintes dúvidas?

Como criar um banco de dados Firebird? Qual ferramenta usar para a criação de um banco com terminação .FDB?
Qual a melhor forma de conectar a base de dados criada? Através de alguma DLL ou Driver ODBC?
Um exemplo de código que deve ser usado para conectar a base de Dados.
Obrigado desde já pela atenção.
TECLA 04/09/2010 14:33:58
#352207
Citação:

Como criar um banco de dados Firebird? Qual ferramenta usar para a criação de um banco com terminação .FDB?


Use o IBEXPERT.
Este artigo responde as duas primeiras questões.

Citação:

Qual a melhor forma de conectar a base de dados criada? Através de alguma DLL ou Driver ODBC?


Já experimentei as duas formas, a que NUNCA me deu problema foi o DRIVER ODBC.
Recomendo!

Citação:

Um exemplo de código que deve ser usado para conectar a base de Dados.


DRIVER=Firebird/InterBase(r) driver; 
UID=SYSDBA; 
PWD=masterkey; 
DBNAME=172.17.2.10:C:\sys\sys.fdb;
ARCADYUM 04/09/2010 21:12:56
#352236
Tecla,
Obrigado pelas informações. Agora estou com um outro problema. Tentei inserir uma informação no banco criado e ocorreu o seguinte erro:
Unexpected end of comand

utilizo a seguinte estrutura para inserir informações

cadastro.Open [Ô]SELECT * FROM BANCO[Ô], NOME_BANCO, adOpenStatic, adLockOptimistic
With cadastro
.AddNew
.Fields(0).Value = TXT_CODIGO.TEXT
.Fields(1).Value = TXT_BANCO.TEXT
.Fields(2).Value = Format(Date, [Ô]dd/mm/yy[Ô])
.Fields(3).Value = Format(Date, [Ô]dd/mm/yy[Ô])
.Update
End With

O erro ocorre exatamente quando chega no . Update
Poderia me informar o que está sendo feito errado??
Aguardando retorno.
TECLA 04/09/2010 23:04:07
#352245
Para inserir o registro, utilize a instrução INSERT INTO...
RPMARQUES 17/10/2010 15:59:09
#355295
tecla...como ficaria o exemplo acima usando o INSERT INTO....to tentando e ñ to conseguindo....


abração a todos...
MOREIRA 17/10/2010 16:08:59
#355296
veja se te ajuda...

Sql = [Ô]Insert Into Tbl_Produto (Descricao, Tamanho, Quant, Vlr_Venda, Obs)[Ô]
Sql = Sql & [Ô]Values ([Ô]
Sql = Sql & [Ô][ô][Ô] & TxtDescricao.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & TxtTamanho.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & TxtQtd_Estoque.Text & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Replace(CDbl(TxtVlr_Venda.Text), [Ô],[Ô], [Ô].[Ô]) & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & TxtObs.Text & [Ô][ô])[Ô]
Conexao.Execute Sql
MsgBox ([Ô]Dados Gravado com Sucesso[Ô]), vbExclamation, [Ô]ATENÇAO[Ô]
RPMARQUES 17/10/2010 16:43:57
#355299
ele ta me dando a mensagem...
INVALID USE OF PROPERTY

se quiserem...posso posta os arquivos....
MOREIRA 17/10/2010 18:02:41
#355303
poste ai , que estas fazendo...
Tópico encerrado , respostas não são mais permitidas
Voltar