심은진 wrote:

> 폴더나 드라이브 공유시키는 방법좀 알려주세요

> 게시판을 뒤적여 봐도 제가 이해할수 있는게 없는것 같아요 ㅜ.ㅠ;

>

> 간단한 소스나 설명을 부탁드립니다.



안녕하세요..김동원 입니다.

아래에 예제를 만들어 올립니다.

자세한 내용은 도움말을 참조하세요..

자세하게 설명이 나와 있더군요.

즐거운 하루되세요..



procedure TForm1.Button1Click(Sender: TObject);

begin

if( WNetAddConnection( PChar('PIII450C'),

PChar('wjdghks'), PChar('F:'))

<> NO_ERROR ) then

ShowMessage('드라이브연결성공')

else

ShowMessage('드라이브연결실패');

end;



{

함수형식

DWORD WNetAddConnection(

LPTSTR lpRemoteName, // 네트워크드라이브명

LPTSTR lpPassword, // 패스워드

LPTSTR lpLocalName // 로컬드라이브명

);

}