BCP & Revision 3

[UserLoser.]

I can't figure out what/why I can't support revision 3, I have 1 & 2 fine... What I'm doing right now (1 & 2 working fine, i want >=3!)

Code Select Expand


Public Function DoLoadPlugin(ByVal Plugin As String) As Boolean
Dim Interface As PluginInformation4
   Call GetMasterInterface(Interface)
   With Interface.Interface3.Interface2.Interface1
       .dwSize = Len(Interface.Interface3.Interface2)  '112
       .lpBotNetConnection = 0
       .PNetSendConnectionMessage = AddrFunction(AddressOf NetSendConnectionMessage)
       .PNetQueueMessage = AddrFunction(AddressOf NetQueueMessage)
       .PUIWriteString = AddrFunction(AddressOf PUIWriteString)
       .PUIWriteTimestamp = AddrFunction(AddressOf PUIWriteTimestamp)
       .PUISetColor = AddrFunction(AddressOf PUISetColor)
       .PNetQueueChatMessage = AddrFunction(AddressOf NetQueueChatMessage)
   End With
   With Interface.Interface3.Interface2
       .PSysProcessBotCommand = AddrFunction(AddressOf PSysProcessBotCommand)
   End With
   With Interface.Interface3
       .PNetResetAwayIdle = AddrFunction(AddressOf NetResetAwayIdle)
       .PRegGetRegistryPath = AddrFunction(AddressOf RegGetRegistryPath)
       .PGetMenuProc = AddrFunction(AddressOf GetMenuProc)
       .PSysIsService = AddrFunction(AddressOf SysIsService)
       .PUIGetWindow = AddrFunction(AddressOf UIGetWindow)
   End With
   Call SetMasterInterface(Interface)
   DoLoadPlugin = LoadPlugin(Plugin, Interface)
End Function


If I try doing dwSize = Len(Interface.Interface3), it crashes on LoadPlugin()

Yes the structs are correct -- I checked them atleast 3 times each.. Any ideas?

(This is way easy in C++, and can almost support BCPX -- I want more support on better VB client though)