  CP

ConnVirtUser , IP-, , ID, _, 
  
   :
    0 -    
    1 - 32  MD5  
  :
    0 - 
    1 - 
  :
    cp.ConnVirtUser "User1", "N/A", "1234", "", 0, 0

DiscVirtUser 
  
  :
    cp.DiscVirtUser "User1"

JoinChannel _, , ____, ___
    
  :
    cp.JoinChannel "", "main", false, false

LeaveChannel _, 
   
  :
    cp.LeaveChannel "", "main"

SendMsg _, , , _
    
  :
    cp.SendMsg "", "main", "  ", false

SendImage _, , _
    
  :
    cp.SendImage "", "main", "C:\pic.jpg"

SendPrivateMsg _, _, , _
    
  :
    cp.SendPrivateMsg "", "Name", "  ", false

SendPrivateImage _, _, _
    
  :
    cp.SendPrivateImage "", "Name", "C:\pic.jpg"

SendUserMsg _, _, , _
  
  :
    cp.SendUserMsg "", "Name", "  ", false

SetTopic _, , 
  
  :
    cp.SetTopic "", "main", "  "

SetGreeting _, , 
  
  :
    cp.SetGreeting "", "main", "  "

RenameChannel _, , _
 
  :
    cp.RenameChannel "", "main", "main2"

DeleteChannel _, 
 () 
  :
    cp.DeleteChannel "", "main"

SetStatus _, 
 
  :
    cp.SetStatus "", " "

SetIcon _, _
 
  :
    0 - 
    1 - 
  :
    cp.SetIcon "", 1

SetActiveProcess _, _, 
     
  :
    cp.SetActiveProcess "", "000", 0

AcceptActivation _, _
   
  :
    cp.AcceptActivation "", "Name"

DeclineActivation _, _, 
   
  :
    cp.DeclineActivation "", "Name", ""

DeleteActivation _, _
     
  :
    cp.DeleteActivation "", "Name"

SetRestriction _, , , _, __, _, _, _
 
   :
    0 -    
    1 -   
    2 -    
    3 -    
    4 -     
    5 -     
   :
    0 - IP-
    1 -  IP- (   : 192.168.0.0-192.168.0.255)
    2 - ID 
    3 -   ( )
    4 -   ( IP-)
    5 -   ( ID )
    6 -   (   IP-)
    7 -   (   ID )
    8 -   ( IP-  ID )
    9 -   (   IP-,  ID )
  :
    cp.SetRestriction "", "main", "", "Name", 60, 2, 3, true
    cp.SetRestriction "", "", "", "192.168.0.0", 60, 0, 0, true

DelRestriction _, , ID_
 
  :
    cp.DelRestriction "", "", 1234

SetPassword _, _, , _
 
   :
    0 -    
    1 - 32  MD5  
  :
    cp.SetPassword "", "Name", "1234", false

DeleteAccount _, _
    
  :
    cp.DeleteAccount "", "Name"

AddBulletin _, , _, ID_, ____, _, __
 
  :
    cp.AddBulletin "", "", " ", 1234, 60, false, false

EditBulletin _, , _, ID_, ____, _, __
 
  :
    cp.EditBulletin "", "", " ", 1234, 60, false, false

DelBulletin _, ID_
 
  :
    cp.DelBulletin "", 1234

AddComment _, _, ID_
 
  :
    cp.AddComment "", " ", 1234

EditComment _, _, ID_
 
  :
    cp.EditComment "", " ", 1234

DelComment _, ID_
 
  :
    cp.DelComment "", 1234

InviteUser _, , _
     
  :
    cp.InviteUser "", "main", ""

StopPlugin
 
  :
    cp.StopPlugin

GetUsers
      
   :
    0 - 
    1 - IP-
    2 - 

       ,   
  :
    users = cp.GetUsers
    For i = 0 To UBound(users) Step 3
      name = users(i)
      ip = users(i+1)
      icon = users(i+2)
    Next

GetOnlineUsers
      
   :
    0 - 
    1 - IP-
    2 - 

       ,    
  :
    users = cp.GetOnlineUsers
    For i = 0 To UBound(users) Step 3
      name = users(i)
      ip = users(i+1)
      icon = users(i+2)
    Next

GetChannelUsers _, 
      ,      
   :
    0 - 
    1 - IP-
    2 - 

       ,    
  :
    users = cp.GetChannelUsers("", "main")
    For i = 0 To UBound(users) Step 3
      name = users(i)
      ip = users(i+1)
      icon = users(i+2)
    Next

GetCurrentChannels _
    ,      
   :
    0 -  
    1 -    
    2 -  

       ,  
  :
    ch = cp.GetCurrentChannels("")
    For i = 0 To UBound(ch) Step 3
      name = ch(i)
      users = ch(i+1)
      topic = ch(i+2)
    Next

GetChannels
     
   :
    0 -  
    1 -    
    2 -  

       ,   
  :
    ch = cp.GetChannels
    For i = 0 To UBound(ch) Step 3
      name = ch(i)
      users = ch(i+1)
      topic = ch(i+2)
    Next

GetChannelInfo 
      
   :
    0 -  
    1 -   ,  
    2 -      
    3 - 
    4 -   
    5 -   
    6 -   
    7 -    
    :
    0 -  
    1 -   
    2 -  
    3 -  
    4 -  
    5 -   
    :
    0 -  
    1 -    
    :
    0 -   
    1 -     
     :
    0 -    
    1 -      
  :
    info = cp.GetChannelInfo("main")

GetUserInfo 
      
   :
    0 - IP-
    1 -   IP-
    2 - ID 
    3 -  
    4 - 
    5 -  
    6 -    
    7 -    
    8 -  
  :
    info = cp.GetUserInfo("Name")

GetActList
      
   :
    0 - 
    1 -   
    2 - 
    3 - IP-
    4 - ID 
    5 - 
    6 -   ,  
    7 -  

       ,    
  :
    0 -  
    1 - 
    2 - 
  :
    list = cp.GetActList
    For i = 0 To UBound(list) Step 8
      ...
    Next

GetRestList
    
   :
    0 - ID 
    1 -     
    2 -      
    3 -  
    4 -  
    5 - IP-
    6 -  IP-
    7 - ID 
    8 -  
    9 - 
    10 -   
    11 - 

       ,  
  :
    list = cp.GetRestList
    For i = 0 To UBound(list) Step 12
      ...
    Next

GetBulletinsCat 
      
   :
    0 - ID 
    1 -  
    2 -  

       ,  
  :
    cat = cp.GetBulletinsCat("Name")
    For i = 0 To UBound(cat) Step 3
      ...
    Next

GetBulletins ID_
    
   :
    0 - ID 
    1 -     
    2 -  
    3 -  
    4 -  

       ,  
  :
    bull = cp.GetBulletins(1234)
    For i = 0 To UBound(bull) Step 5
      ...
    Next

GetBulletin ID_
        
   :
    0 -     
    1 -     
    2 -  
    3 -  
    4 -  
    5 -     
    6 -     
    7 -    
       :
        0 -  
        1 -  

           ,   
    8 -  
    9 -   
       :
        0 - ID 
        1 -     
        2 -   
        3 -  

           ,  
  :
    bull = cp.GetBulletin(1234)

GetUserIP 
 IP-  
  :
    cp.GetUserIP("Name")

GetUserID 
 ID   
  :
    cp.GetUserID("Name")

IsHiddenIP 
   IP- (0 - , 1 - )
  :
    cp.IsHiddenIP("Name")

GetPassword 
   
  :
    cp.GetPassword("Name")

GetRights , _, 
     (0 -   , 1 -  )
   :
    0 -  
    1 -   
    2 -    
    3 -   
    4 -   
    5 -   
    6 -   
    7 -  IP-
    8 -    
  :
    cp.GetRights("Name", 4, "")

GetMaxImgSize 
      ()
       -    "&priv"
    -     
  :
    cp.GetMaxImgSize("main")

GetMaxImgRes 
      ()
       -    "&priv"
    -     
  :
    cp.GetMaxImgRes("main")

SetValue , 
   (       )
  :
    cp.SetValue "1", "test"

GetValue 
  
  :
    v = cp.GetValue("1")

DelValue 
  
  :
    cp.DelValue "1"

EventUserName
    
  :
    cp.EventUserName

EventUserIP
 IP-   
  :
    cp.EventUserIP

EventUserIcon
     (0 - , 1 - , 2 - )
  :
    cp.EventUserIcon

EventChannel
  
  :
    cp.EventChannel

EventText
    ( / / )
  :
    cp.EventText

EventID
 ID //
  :
    cp.EventID

EventIdentType
   ( / )
   :
    0 - IP-
    1 -  IP-
    2 - ID 
    3 -   ( )
    4 -   ( IP-)
    5 -   ( ID )
    6 -   (   IP-)
    7 -   (   ID )
    8 -   ( IP-  ID )
    9 -   (   IP-,  ID )
  :
    cp.EventIdentType

EventRestType
   ( / )
   :
    0 -    
    1 -   
    2 -    
    3 -    
    4 -     
    5 -     
  :
    cp.EventRestType

EventCompID
 ID  ( / )
  :
    cp.EventCompID

EventIPRange
  IP- ( / )
  :
    cp.EventIPRange

EventMdr
   ,   ( / )
  :
    cp.EventMdr

EventDelMdr
   ,   (  )
  :
    cp.EventDelMdr

VirtUserName
   ,    
  :
    cp.VirtUserName

VirtUserIP
 IP-  ,    
  :
    cp.VirtUserIP

VirtUserIcon
   ,     (0 - , 1 - )
  :
    cp.VirtUserIcon

PlugDataDir
       
  :
    cp.PlugDataDir

CommDir
    
  :
    cp.CommDir



  "_"    (""),       ,    .


   :

  :
file = "C:\text.txt"
Set fso = CreateObject("Scripting.FileSystemObject")
'    ,   
Set f = fso.OpenTextFile(file, 1, False, -1)
' 
f.SkipLine
'  
f.Skip 6
'    
line = f.ReadLine
'  
chars = f.Read(6)
'   
text = f.ReadAll
f.Close

  :
file = "C:\text.txt"
Set fso = CreateObject("Scripting.FileSystemObject")
'       ,   
Set f = fso.OpenTextFile(file, 8, True, -1)
' 
f.Write "text"
'   
f.WriteLine "text"
'   
f.WriteBlankLines 2 
f.Close