Fórum Como descobrir o caminho da unidade de rede Windows? #268629
15/02/2005
0
Olá pessoal, tudo blz?
Escrevi uma aplicação em Delphi 7 utilizando o banco de dados MSSQL 2000. Em uma das etapas do programa, eu invoco o comando ´bulk insert´ do MSSQL, que carrega um arquivo texto para uma determinada tabela do banco de dados. E um dos parâmetros deste comando é o caminho onde está salvo este arquivo. Descobri que se o arquivo estiver salvo em uma unidade de rede, por exemplo F:, ele não executa o comando, mas se eu indicar que este F: é na realidade \\servidor\pasta aí funciona!
A minha dúvida é: como faço para descobrir no Delphi qual é o caminho que está mapeado para uma determinada unidade de rede?
Obrigado pelas dicas! :-)
Escrevi uma aplicação em Delphi 7 utilizando o banco de dados MSSQL 2000. Em uma das etapas do programa, eu invoco o comando ´bulk insert´ do MSSQL, que carrega um arquivo texto para uma determinada tabela do banco de dados. E um dos parâmetros deste comando é o caminho onde está salvo este arquivo. Descobri que se o arquivo estiver salvo em uma unidade de rede, por exemplo F:, ele não executa o comando, mas se eu indicar que este F: é na realidade \\servidor\pasta aí funciona!
A minha dúvida é: como faço para descobrir no Delphi qual é o caminho que está mapeado para uma determinada unidade de rede?
Obrigado pelas dicas! :-)
Jorgeolimpia
Curtir tópico
+ 0
Responder
Posts
15/02/2005
Serrano
utilize esta função WNetGetConnection escontra-se na mpr.dll
wfunction TfrmConfigurarServidor.BuscaCaminho(Letra:String) : String;
var caminho: String;
tamanho: Cardinal;
begin
SetLength(caminho,255);
tamanho:=255;
if WNetGetConnection(PChar(Letra + ´:´),PChar(caminho),tamanho) = NO_ERROR then
BuscaCaminho:=caminho
else
BuscaCaminho:=´´;
end;
wfunction TfrmConfigurarServidor.BuscaCaminho(Letra:String) : String;
var caminho: String;
tamanho: Cardinal;
begin
SetLength(caminho,255);
tamanho:=255;
if WNetGetConnection(PChar(Letra + ´:´),PChar(caminho),tamanho) = NO_ERROR then
BuscaCaminho:=caminho
else
BuscaCaminho:=´´;
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)