. , , ,

,,,

Win2000 — ,

̲Ͳ ²

ֲ Ͳ

. ..

-

-

-


..

___________

________________________

()_________________________()

__________________________()______________

2002

̲Ͳ ²

ֲ Ͳ

. ..

-

ޔ

. ()

______________________

____________________

 

 


_____________________________________________________

-

-

-

, :

__________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________

______________________________ ______________________________

, ,

______________________________ ______________________________

______________________________ ______________________________


1.   

2.    -

3.    ()

4.   

5.   

6.    ,


- . , , , . . , , , . , .

, , . , , , .

, , . . , , , , , , Microsoft, Windows 2000.

, Visual Basic, Active Directory Windows 2000. ADSI . .



, , .

- 25 , , . , :

- ;

-, ;

- ( , , );

-, , .

.

, , , , ( ), .

, Ѡ , :

;

;

-;

;

;

;

;

;

;

.

.


-

- , , . , , , , . , , , .

, , . , , . IBM- , Ethernet, Windows 2000 .

. IBM- , . , , . Ethernet , . ,


34.602 89 , .

-      : , - -, , , , .

2. , :

, .

, . , , , . , , , . .

.. .

, .

, , , , , .

, .

.

.

.
1 21.10.2002
, 25.10.2002
, 26.10.2002
27.10.2002
2 - 28.10.2002
3 () 5.11.2002
4 9.11.2002
5 12.11.2002
6 , 13.11.2002
,

, 25 , ( ) 1 , 2 , 28 , , 2 .

: Ethernet , , , , , , .

. 25 .. , 1 , , 2 .

- :

Asus I845 Socket 473 GHz 366 Hz+AC97+video
P IV 2.2 Hz
RDRAM 1024 Mb 800 MHz
2 Fast Ethernet 100 Mbit
. +4 SCSI HDD 40 Gb
I715 4 Mb
17 LG studioworks

.

:

PC-Partner I815e+video+AC97 ata66
Celeron 1100 bus 100 MHz
128 Mb
Fast Ethernet 100 Mbit
. HDD 20 Gb 5400
Samsung SyncMaster 550s

- .

:

PC-Partner I815e+video+AC97 ata66
Celeron 1100 bus 100 MHz
256 Mb
Fast Ethernet 100 Mbit
. HDD 20 Gb 5400
Samsung SyncMaster 550s

, , .

.

. .
150 0.45 . 67,5
100 0.70 . 70,0
- 30 0.30 . 9
200 0.25 . 50
. 300 .
: 496,5

. (2 , 3 , ).

() .

. .

. , , , .

.

, . 28 . - 2 .

, 2 16 , . , 30 , .

, , , . , ( ).

2. (Fast Ethernet) : , , .

, , , .

.

:

28 , ;

2 16 ;

250 ;

2 ;

RJ-45 70 . ( ).

.

,
4.400
4.200
50.000
(250 ) 175
1.500
175
700
500
61.650

497 . 62.147 .

,

, . - .

, , .

:

-      ;

-      ;

-      ;

-      ;

-      ( );

-      ( . .. );

-      ;

-      .

, , , , . , .

, .

, , , .

, . .

, . , . , , , . , DOS, Windows, OS/2 , MAC OS Linux, .

Windows 2000. . , , .

. : Windows 2000 Server, Windows 2000 Advanced Server, Windows 2000 Professional. , , .. Active Directory, .

TCP/IP .

, . . 3 . , , , , . , . , , 2 , , .


2 Windows 2000 Server

, , , , . , , , , .

Windows 2000. , Microsoft, , .

, NetBios () ; ; (); ; , - ; , ; , , ..

- Rational Rose 2000

Rational Rose - . ? : , . , , . Rational Rose, , , , . ,


2.1. - ( Rational Rose): .



- Visual Basic 6.0 ADSI

, , , . ADSI (property caching). ADSI iads, GetInfo SetInfo.

, , Visual Basic 6, Active DS Type Library, , Visual Studio, ProjectàReferences

2.3. Active DS Type Library

.

GetInfo , .

SetInfo. ADSI SetInfo IADs . , . Windows, , . ADSI , SetInfo. , , , . ADSI , , MS Visual Basic, Active DS Type Library. , .

ADSI IADsFileService, IADsFileServiceOperations IADsFileShare , IADsContainer, .

, . ( IADsCollection) IADsSession, , .

ADSI IADsPrintQueue IADsPrintQueueperations . IADsPrintJob IADsPrintJobOperations.

:

-      ;

-      ;

-      ;

-      .

. IADsFileService, IADsFileServiceOperations, IADsFileShare, IADsSession IADsContainer . . LanmanServer . , ADSI - . GetObject IADS c , , LanmanServer. , ADSI, API, Windows NT/2000. ComputerName, ComputerDomain, PrintQueueName , , API, ADSI.

. , , , . . IADsContaner IADsComputer, , , : Dim cont As IADsContainer

Dim contName As String

Dim computer As IADsComputer

contName = computerdomain

Set cont = GetObject(WinNT:// & contName)

cont.Filter = Array(Computer)

For Each computer In cont

cbo1.AddItem computer.Name

Next

, DIM, IADsContainer - ADSI, cont , ( IADsComputrer) computerdomain. . . , .

, ( ) , .

Dim ComputerName As String

Dim ComputerDomain As String

Dim PrintQueueName As String

Dim PrintQueue As IADsPrintQueue

ComputerDomain = Target_Computer_ Domain

ComputerName = Target_ter_Name

PrintQueueName = Target_Print_Queue

Set PrintQueue = GetObject(WinNT:// & ComputerDomain & / _

& ComputerName & / & PrintQueueName & , printqueue)

, Target_ter_Name, Target_Computer_Domain

Target_Print_Queue PrintQueue. , . , , PrintQueue IADsPrintQueueOperation : PrintQueue.Pause , ..

- . , , . .. , , ().

. , , , .. .

. . , Windows 2000, , , www.microsoft.com , . . . , , Visual Studio, . Visual Basic, , .

. , , , .. . . , - ( _, __ .), .. , . , .. F1 .

FIleUPR, . 2.1 , (frmbase). fileUPR.vbp , fileUPR.exe . 2.5 (frmbase). GetObject , . Click cmd_run . , ().

. , , . 2.6. . . , Click cmd_run.Click, . , , , , . , , .

2.5. (frmbase) fileUPR.

2.6. .

2.6. .

, , , . , fileUPR , , Windows . .

. , , , : Active Directory, . . ( ).

, , .. . , , 400 . , . , , Object required, ( \\MASTER), . ADSI . ( LAN Manager). Automation Error. , (, ). Type mismatch, Variable not default . , Visual Basic ActiveX. , , Visual Basic .

, , ListView (.Selected) (SubItem), .. SubItem(0), ( ). , , , :

-      Public;

-      , (, frmbase : frmRes.txt1.Text = cbo2.Text), cbo2.Text cbo2.

-      .

.. , . , ( ). , : , , , .

,

, , .

. , , .. . , , , - , Active Directory. , .. , . , .

. , , - ( ), , , . , . .

, , Visual Basic .


, , . , , , , .

, : Rational Rose 2000, Visio 2000, MS Visual Basic 6.0.

.

̲Ͳ ² ֲ Ͳ . .. - -

 

 

 

! , , , .
. , :