. , , ,

,,,

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): .

Active DS Type Library

ComputerDomain, ComputerName..

,

SEQ * ARABIC 1



- 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.

.

̲Ͳ ² ֲ Ͳ . .. - -

 

 

 

! , , , .
. , :