 |
ActiveDelphi .: O site do programador Delphi! :.
|
| Exibir mensagem anterior :: Exibir próxima mensagem |
| Autor |
Mensagem |
joscru01 Novato

Registrado: Quarta-Feira, 1 de Julho de 2009 Mensagens: 87 Localização: Uiraúna-PB
|
Enviada: Ter Dez 15, 2009 2:00 am Assunto: conexão Firebird 2.1.7 |
|
|
Bom dia
Uso vb6 e estou migrando para Delhi 7, embora tenha comprado o Delphi 2005 porem ele ainda não chegou. e já mim arrependi pois já foi lançado o Delphi 2010 e vou ficar um bocado de versão atrás.
Bom vamos a duvida.
no vb para conectar ao firebird eu crio um arquivo que posso da qualquer nome, txt,dll,ini etc.
Obs. A maquina que instalo o banco de dados eu sempre coloco o nome do computador para SERVANT.
ao abrir o sistema pela primeira vez, a submain chama uma função que verifica o nome da máquina e cria o arquivo que montará a string de conexão.
Arquivo Config.dll
nome da máquina=SERVANT
IP da maquina Servidor=127.0.0.1
caminho do Banco de Dados=C:\Pastadosistema\Banco.FDB
Open "C:\PastadoSistema\Config.dll" For Input As #1
Do While Not EOF(1)
If VL = 0 Then
Line Input #1, Texto1
ElseIf VL = 1 Then
Line Input #1, Texto2
ElseIf VL = 2 Then
Line Input #1, Texto3
End If
VL = VL + 1
Loop
Close #1
Comc = Texto2 & ":" & Texto3
NMaq = Get_Computer_Name
For i = 1 To Len(NMaq)
CHAR1 = Asc(Mid(NMaq, i, 1))
If CHAR1 <> 0 Then
Char = Char & Mid(NMaq, i, 1)
End If
Next
NMaq = Char
If UCase(NMaq) <> "SERVANT" Then (Conexão rede)
Cnn.CursorLocation = adUseClient
Cnn.Open "Provider=IBOLE.PROVIDER;Data Source=" & Comc & ";User ID=" & "SYSDBA" & ";Password=" & "masterkey"
Principal = 1
Else
Comc = "LocalHost" & ":" & Texto3 (Conexão Local)
Cnn.CursorLocation = adUseClient
Cnn.Open "Provider=IBOLE.PROVIDER;Data Source=" & Comc & ";User ID=" & "SYSDBA" & ";Password=" & "masterkey"
Principal = 0
End If
Pergunto
1 - como eu faria para usar a mesma metodologia no Delphi 7
Fazer a conexão local ou em rede conforme o nome da maquina.
2 - Li em algum lugar que quando a extensão do BD é GDB significa que é Interbase e FDB Firebird, porem em 99% dos tutos,dicas etc. que falam que referem-se a firebird usam a extensão GDB.
Obrigado |
|
| Voltar ao Topo |
|
 |
adriano_servitec Colaborador

Registrado: Sexta-Feira, 30 de Janeiro de 2004 Mensagens: 17618
|
Enviada: Ter Dez 15, 2009 8:40 am Assunto: |
|
|
Bom dia, a extensão do banco não importa para o Fire, mais ele por padrão usa FDB.
Para configurar o acesso ao banco, depende do componente de acesso as tabelas, eu uso aqui o zeos, e não faço nada mais do que um arquivo INI
| Código: | [Conexao]
HostName=meuip
Port=3050
Database=C:\Pastadosistema\Banco.FDB
Password=masterkey
User=SYSDBA
Protocol=Firebird-2.0 |
Pronto só esta configuração ai no zeos ele ja sabe como conectar, outros componentes como dbx, ibx, muda algumas coisinhas, mais é praticamente a mesma coisa. Não tem segredo não. O que pode as vezes dar problema ao conectar é alguma falda de dll no system do windows. _________________ Jogo seu smartphone? Acesse o link e confira.
https://play.google.com/store/apps/details?id=br.com.couldsys.rockdrum
https://play.google.com/store/apps/details?id=br.com.couldsys.drumsetfree |
|
| Voltar ao Topo |
|
 |
|
|
Enviar Mensagens Novas: Proibido. Responder Tópicos Proibido Editar Mensagens: Proibido. Excluir Mensagens: Proibido. Votar em Enquetes: Proibido.
|
|