DIFERENCIAR ACESSO EM DB SE LOCAL OU SERVIDOR ?!

USUARIO.EXCLUIDOS 11/12/2006 14:50:00
#189309
Olá Pessoal,

Seguinte... Preciso informar o usuário se ele esta acessando
o banco de dados na máquina local ou no servidor.

Alguem teria alguma ideia ?

Pensei em algo tipo "app." mas o usuário pode escolher ou mudar o local(pasta) onde o banco
está... aí o "app." não serve.

O caminho do banco eu carrego em uma string aí eu precisaria diferenciar :

strCaminho = "C/qualquer_pasta/Pasta_x"

de

strCaminho = "F/servidor/pastA_Y"

ou

strCaminho = "G/servidor/pastA_Y"

ou

strCaminho = "H/servidor/pastA_Y"

ou

strCaminho = "../servidor/pastA_Y"

ou qualquer outra maquina que não seja a maquina local


Agradeço

Qualquer ajuda

JGD1
ALMARTI 11/12/2006 14:59:17
#189313
Coloque o path em um arquivo .ini. No site á vários exemplos no site
USUARIO.EXCLUIDOS 11/12/2006 14:59:34
#189314
Você só precisa informar ao usuário qual o caminho do BD que ele tá usando?
Eu armazeno o caminho como uma string (ou em um BD) e faço aparecer o caminho do BD na statusbar.
Não sei se é isso que vc precisa.
USUARIO.EXCLUIDOS 11/12/2006 15:11:37
#189321

é mais o menos isso... Tenho o caninho em uma string mas posso coloca-lo em um ini.... e o usuário "PODE" escolher o local do DB.
USUARIO.EXCLUIDOS 11/12/2006 16:43:45
#189352

O que não estou conseguindo é comparar ou validar a string :

Se local Ex: "C:\Pasta\..."
Se servidor Ex "\\Servidor\"

if strCaminho = "C:\Pasta\..." then
Local
else
rede..
end if


Mas não tá virando...


HUGOSSOUZA 11/12/2006 18:23:21
#189374 Resposta escolhida
vc pode tentar assim mas o problema são as unidades de rede.
ele vai identificar como Local.
Vou ver se acho alguma outra coisa e posto depois.

If Left(App.Path, 2) = "\\" Then
MsgBox "Rede"
Else
MsgBox "Local"
End If
Tópico encerrado , respostas não são mais permitidas
Voltar