Existe uma forma de eu tentar me conectar no \\dados\sef e o delphi me retornar 
se
conseguiu ou nao encontrar este local ?
Pois ai eu poderia fazer um esquema para o usuário digitar o usuario e a senha
e passar como parametro no esquema que vc me mandou abaixo !!!

Mas desde ja antecipo meus agradecimentos
Anderson

----- Mensagem original ----
De: BandaLemuel <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Segunda-feira, 3 de Setembro de 2007 15:49:41
Assunto: Re: [delphi-br] Forçar Autenticação na Rede









  


    
            

        Tente assim.... Mapeando uma Unidade



Winexec ( pchar( 'net use <Unidade> \\dados\sef /USER:<USuario> <senha> ) , 
SW_HIDE );



Onde Unidade é a Letra da Unidade. Exemplo : F:

        Usuario = nome do Usuario na rede e a senha a senha do Usuario que vc 
esta usandp para conectar ....segue o comando inteiro



Winexec ( pchar( 'net use F: \\dados\sef /USER:Administrador 123456 ) , SW_HIDE 
);



ai vc verifica  



if FileExists(' F:\teste. exe') then

            



Espero ter ajudado...



Wesley

        



----- Original Message ----- 

  From: Edu Nicácio 

  To: [EMAIL PROTECTED] os.com.br 

  Sent: Monday, September 03, 2007 3:08 PM

  Subject: Re: [delphi-br] Forçar Autenticação na Rede



Dê uma procurada pelo comando NET SHARE no help do Windows.



Você pode usar um script de inicialização, que, quando executado, mapeia os 
diretórios remotos em unidades locais, utilizando usuário e senha.



Simples assim.



Abraço.



------------ --------- --------- --------- --------- --------- -

  Atenciosamente:



Eduardo Cláudio Nicácio

  Analista de Sistemas Pleno

  Fábrica 02 - CTIS

  Tel.: (11) 3150-6841

  eduardo.nicacio@ ctis.com. br



----- Original Message ----- 

  From: Anderson Furtilho 

  To: [EMAIL PROTECTED] os.com.br 

  Sent: Monday, September 03, 2007 10:36 AM

  Subject: [delphi-br] Forçar Autenticação na Rede



Saudações amigos da lista!



Amigos, atualmente eu faço assim 



if FileExists(' \\dados\sef\ teste.exe' ) then

  ;



Caso o usuario ja tenha entrado no windows explorer acessado esta pasta e 
digitado seu usuario e senha

  ai funciona legal.

  Mas quando o usuario liga o computador e ja roda meu programa o comando assim 
nao funfa, pois ainda

  nao foi digitado o usuario e senha para abrir a conexão nesta pasta.



Existe uma forma de forçar o usuario a se conectar nesta pasta acima e digitar 
seu usuario e senha ?



Se algum amigo ja passou por este problema puder dar uma dica, ficarei 
agradecido!



Um forte abraço a todos



Anderson



Flickr agora em português. Você clica, todo mundo vê.

  http://www.flickr. com.br/



[As partes desta mensagem que não continham texto foram removidas]



------------ --------- --------- --------- --------- --------- -



No virus found in this incoming message.

  Checked by AVG Free Edition. 

  Version: 7.5.484 / Virus Database: 269.13.3/986 - Release Date: 3/9/2007 09:31



[As partes desta mensagem que não continham texto foram removidas]





    
  

    
    




<!--

#ygrp-mkp{
border:1px solid #d8d8d8;font-family:Arial;margin:14px 0px;padding:0px 14px;}
#ygrp-mkp hr{
border:1px solid #d8d8d8;}
#ygrp-mkp #hd{
color:#628c2a;font-size:85%;font-weight:bold;line-height:122%;margin:10px 0px;}
#ygrp-mkp #ads{
margin-bottom:10px;}
#ygrp-mkp .ad{
padding:0 0;}
#ygrp-mkp .ad a{
color:#0000ff;text-decoration:none;}
-->



<!--

#ygrp-sponsor #ygrp-lc{
font-family:Arial;}
#ygrp-sponsor #ygrp-lc #hd{
margin:10px 0px;font-weight:bold;font-size:78%;line-height:122%;}
#ygrp-sponsor #ygrp-lc .ad{
margin-bottom:10px;padding:0 0;}
-->



<!--

#ygrp-mlmsg {font-size:13px;font-family:arial, helvetica, clean, sans-serif;}
#ygrp-mlmsg table {font-size:inherit;font:100%;}
#ygrp-mlmsg select, input, textarea {font:99% arial, helvetica, clean, 
sans-serif;}
#ygrp-mlmsg pre, code {font:115% monospace;}
#ygrp-mlmsg * {line-height:1.22em;}
#ygrp-text{
font-family:Georgia;
}
#ygrp-text p{
margin:0 0 1em 0;}
#ygrp-tpmsgs{
font-family:Arial;
clear:both;}
#ygrp-vitnav{
padding-top:10px;font-family:Verdana;font-size:77%;margin:0;}
#ygrp-vitnav a{
padding:0 1px;}
#ygrp-actbar{
clear:both;margin:25px 0;white-space:nowrap;color:#666;text-align:right;}
#ygrp-actbar .left{
float:left;white-space:nowrap;}
.bld{font-weight:bold;}
#ygrp-grft{
font-family:Verdana;font-size:77%;padding:15px 0;}
#ygrp-ft{
font-family:verdana;font-size:77%;border-top:1px solid #666;
padding:5px 0;
}
#ygrp-mlmsg #logo{
padding-bottom:10px;}

#ygrp-vital{
background-color:#e0ecee;margin-bottom:20px;padding:2px 0 8px 8px;}
#ygrp-vital #vithd{
font-size:77%;font-family:Verdana;font-weight:bold;color:#333;text-transform:uppercase;}
#ygrp-vital ul{
padding:0;margin:2px 0;}
#ygrp-vital ul li{
list-style-type:none;clear:both;border:1px solid #e0ecee;
}
#ygrp-vital ul li .ct{
font-weight:bold;color:#ff7900;float:right;width:2em;text-align:right;padding-right:.5em;}
#ygrp-vital ul li .cat{
font-weight:bold;}
#ygrp-vital a{
text-decoration:none;}

#ygrp-vital a:hover{
text-decoration:underline;}

#ygrp-sponsor #hd{
color:#999;font-size:77%;}
#ygrp-sponsor #ov{
padding:6px 13px;background-color:#e0ecee;margin-bottom:20px;}
#ygrp-sponsor #ov ul{
padding:0 0 0 8px;margin:0;}
#ygrp-sponsor #ov li{
list-style-type:square;padding:6px 0;font-size:77%;}
#ygrp-sponsor #ov li a{
text-decoration:none;font-size:130%;}
#ygrp-sponsor #nc{
background-color:#eee;margin-bottom:20px;padding:0 8px;}
#ygrp-sponsor .ad{
padding:8px 0;}
#ygrp-sponsor .ad #hd1{
font-family:Arial;font-weight:bold;color:#628c2a;font-size:100%;line-height:122%;}
#ygrp-sponsor .ad a{
text-decoration:none;}
#ygrp-sponsor .ad a:hover{
text-decoration:underline;}
#ygrp-sponsor .ad p{
margin:0;}
o{font-size:0;}
.MsoNormal{
margin:0 0 0 0;}
#ygrp-text tt{
font-size:120%;}
blockquote{margin:0 0 0 4px;}
.replbq{margin:4;}
-->








      Flickr agora em português. Você clica, todo mundo vê.
http://www.flickr.com.br/

[As partes desta mensagem que não continham texto foram removidas]

Responder a