Wokawidgets Component Suite - Page 2-VBForums
Page 2 of 2 FirstFirst 12
Results 41 to 80 of 80

Thread: Wokawidgets Component Suite

  1. #41
    New Member
    Join Date
    Dec 2005
    Posts
    10

    Re: Wokawidgets Component Suite

    Quote Originally Posted by killl
    thx 1st for your great work!

    but I don't like all dll staff, so why i can't integrate "Asynchronous Web Download.vbg " into a single project?

    would you like to help ?

    when I put all file in that vbg into one project, IDE told me that "sckClosed " may be dim twice:

    i can find both in "Socket.cls" and "clsSocket.cls"

    is there any way to solve that?

    thanks!
    if you need to ask such a simple question and you don't have enough VB experience to be doing stuff like this.

  2. #42
    New Member
    Join Date
    Mar 2007
    Posts
    7

    Re: Wokawidgets Component Suite

    hi
    I have unloaded Wokawidgets Component Suite, and I have seen the client MSN.... I not to successful in adding AddContact function it in the clien msn.
    I not understend
    mobjMSN.AddContact(pobjcommand as command)

    '*******************************************************
    Public Sub AddContact(ByRef pobjCommand As Command)
    Dim strEmail As String
    Dim strDisplayName As String
    Dim lngListID As Long
    Dim lngGroupID As Long
    strEmail = pobjCommand.Param(1)
    strDisplayName = URLDecode(pobjCommand.Param(2))
    lngListID = pobjCommand.Param(3)
    If pobjCommand.ParamCount = 4 Then
    lngGroupID = pobjCommand.Param(4)
    End If
    mstrLastAddedContactKey = mobjContacts.Add(strEmail, strDisplayName, lngGroupID, lngListID).Key
    End Sub
    '********************************************************
    Please halp me
    Sorry for My Bad English i am from Italy
    Thank you for help

  3. #43

    Thread Starter
    Super Moderator Wokawidget's Avatar
    Join Date
    Nov 2001
    Location
    Headingly Occupation: Classified
    Posts
    9,633

    Re: Wokawidgets Component Suite

    This function should not be called by you.
    This is called when the MSN server sends a msg to the client with info of a group being added.

    I don't have the code in front of me, but if I'm not mistaken if you look at the UI code for adding a group, I think it calls:

    mobjGroups.AddGroup

    *I think*

    This function then sends a request off to the MSN servers, which in turn send a msg back, which is handled by that function you posted above.

    Woka

  4. #44
    New Member
    Join Date
    Mar 2007
    Posts
    7

    Re: Wokawidgets Component Suite

    thank you Wokawidget for answare me
    The function for create new Gruop is:

    Private Sub CreateNewGroup()
    Dim strDesc As String
    If GetDescription("New Group", "Description", strDesc) Then
    mobjMSN.Groups.Add strDesc
    End If
    End Sub

    This Function WORK ok....

    But for add new contact i try:

    mobjMSN.AddContact (pobjCommand As Command)

    This ---> pobjCommand As Command ----> I not understend

    This is Funciont for addcontats
    Public Sub AddContact(ByRef pobjCommand As Command)
    Dim strEmail As String
    Dim strDisplayName As String
    Dim lngListID As Long
    Dim lngGroupID As Long
    strEmail = pobjCommand.Param(1)
    strDisplayName = URLDecode(pobjCommand.Param(2))
    lngListID = pobjCommand.Param(3)
    If pobjCommand.ParamCount = 4 Then
    lngGroupID = pobjCommand.Param(4)
    End If
    mstrLastAddedContactKey = mobjContacts.Add(strEmail, strDisplayName, lngGroupID, lngListID).Key
    End Sub

    i not undertend for add new contact .....

    Thank you for help
    and sorry for my Bad english...

  5. #45

    Thread Starter
    Super Moderator Wokawidget's Avatar
    Join Date
    Nov 2001
    Location
    Headingly Occupation: Classified
    Posts
    9,633

    Re: Wokawidgets Component Suite

    Like I said, that AddContact function is for use with data returned from MSN server, and not for you as a UI developer to call.

    In fact, checking over ym code, I have not coded in the functionality to add contacts haha. I am a muppet.


    Woka

  6. #46

    Thread Starter
    Super Moderator Wokawidget's Avatar
    Join Date
    Nov 2001
    Location
    Headingly Occupation: Classified
    Posts
    9,633

    Re: Wokawidgets Component Suite

    i think the function you need to add to the contacts class would be something like:
    [vbcode]
    public sub AddNewContact(ByVal emailAddress As string)
    BadgerMessenger.Connection.SendCommand "ADC", "FL", "N=" & emailAddress, "F=" & emailAddress
    End sub
    [/vbcode]
    Then from your UI you would do:

    [vbcode]
    mobjBadgerMessenger.Contacts.AddNewContact("Woof@bones.com")
    [/vbcode]
    I haven't tested this as my VB6 box no longer had interweb access, but I think that's right.

    Steve

  7. #47
    New Member
    Join Date
    Mar 2007
    Posts
    7

    Re: Wokawidgets Component Suite

    hi woka
    thank you for answare me

    exist:

    mobjMSN.Contacts.Count
    .Item
    .MSNMessenger
    .NewEnum

    mobjMSN.Contacts.Add not exist in list

    but if i write mobjMSN.Contacts.Add(...................
    show
    mobjMSN.Contacts.Add(ByVal pstEmail As String, ByVal pstrNickname As String, ByVal plngGroupID As Long, ByVal plngListID As Long) as contact



    i try your code....

    thank you for answare me
    and sorry for my bad english
    .........

  8. #48
    New Member
    Join Date
    Mar 2007
    Posts
    7

    Re: Wokawidgets Component Suite

    ok my friend I have resolved with

    [vbcode]
    Public Sub AddNewContact(ByVal emailAddress As String)
    mobjConn.SendCommand "ADC", "FL", "N=" & emailAddress, "F=" & emailAddress
    End Sub
    [/vbcode]
    thank you very match

    for view new contact add in my list
    I disconnect and connects

  9. #49

  10. #50
    New Member
    Join Date
    Mar 2007
    Posts
    7

    Re: Wokawidgets Component Suite

    yes my friend

  11. #51
    New Member
    Join Date
    Mar 2007
    Posts
    7

    Re: Wokawidgets Component Suite

    My Friend this command is ok for Adding a contact in list

    public sub AddNewContact(ByVal emailAddress As string)
    BadgerMessenger.Connection.SendCommand "ADC", "FL", "N=" & emailAddress, "F=" & emailAddress
    End sub

    but for delete contact what is the command?

    do I think that not all the contacts I can be cancelled because it depends if the other contact has made the same thing, is true??

    thank you for you help
    and sorry for my bad english.....

  12. #52

    Thread Starter
    Super Moderator Wokawidget's Avatar
    Join Date
    Nov 2001
    Location
    Headingly Occupation: Classified
    Posts
    9,633

    Re: Wokawidgets Component Suite

    Code:
    public sub RemoveContact(ByVal emailAddress As string)
    BadgerMessenger.Connection.SendCommand "REM", "FL", emailAddress
    End sub
    However, I never wrote the full code to handle this
    This was never meant to be a full complete project.

    You need to look at the class BadgerMessenger, and the function HandleCommand.
    In there you will see a large Select Case statement and near the bottom there is:

    Case "REM"

    Ignore the comments under here, they are wrong.
    When the case is "REM" this means the svr send a msg to you that the removal of the contact was ok.
    You will need to add code here to remove the contact from the contacts list.

    I think it's pobjCommand.Param(3) that contains the email of the contact removed.

    WOka

  13. #53
    New Member
    Join Date
    Mar 2007
    Posts
    7

    Re: Wokawidgets Component Suite

    Thank you my Friend
    i try this command

    public sub RemoveContact(ByVal emailAddress As string)
    BadgerMessenger.Connection.SendCommand "REM", "FL", emailAddress
    End sub

    thank you

  14. #54
    Addicted Member
    Join Date
    Feb 2007
    Posts
    187

    Re: Wokawidgets Component Suite

    i'm using the XP Button part coding...

    but it gives me an error msg while i load an image for the XPButton from ImageList during run time...

    example:
    XPButton1.Picture = ImageList1.ListImages(1).Picture

    any guide on this?

  15. #55

  16. #56
    Addicted Member
    Join Date
    Feb 2007
    Posts
    187

    Re: Wokawidgets Component Suite

    Quote Originally Posted by Wokawidget
    An error msg would help
    but I am assuming it's because you haven't done:
    Code:
    Set XPButton1.Picture = ImageList1.ListImages(1).Picture
    Woof
    I tried adding the "Set" commad and it works... thanks

    May I know the reason why the "Set" command is needed also?

  17. #57

  18. #58
    Addicted Member
    Join Date
    Feb 2007
    Posts
    187

    Re: Wokawidgets Component Suite

    Quote Originally Posted by Wokawidget
    Beacuse thats what you use in VB when setting an object.
    Basic VB knowledge and coding here.

    Woka
    oh i see...

    thanks for the lesson

  19. #59
    Fanatic Member
    Join Date
    Jun 2001
    Location
    Oregon
    Posts
    643

    Re: Wokawidgets Component Suite

    Im trying to load up the msn messenger client, and im getting all kinds of errors!

    All of the references to the class modules in vbMSNMessenger dont work, so i put "vbMSNMessenger." without the quotes in front of it, and it passes those errors up, but now im getting errors on 'vbMSNStatusConstants'... How do i fix that one? I dont know where thats at?

  20. #60

    Thread Starter
    Super Moderator Wokawidget's Avatar
    Join Date
    Nov 2001
    Location
    Headingly Occupation: Classified
    Posts
    9,633

    Re: Wokawidgets Component Suite

    The errors are simply down to yourself not really knowing what you're doing when dealing with multi layers apps, that reference each other, in Visual Studio.

    Delete all the stuff you've done.
    Re-unzip the Messenger zip file.
    Then load the VPG file.

    Woka

  21. #61

    Thread Starter
    Super Moderator Wokawidget's Avatar
    Join Date
    Nov 2001
    Location
    Headingly Occupation: Classified
    Posts
    9,633

    Re: Wokawidgets Component Suite

    how many projects have you got open in VB? 1? The main MSN client I bet.
    Have you compiled the other 3-4 or so projects that the client uses? I bet not.
    If yes, then have you added a new referenc eto the compiled dll, and REMOVED the old project reference.

    Woka

  22. #62
    Fanatic Member
    Join Date
    Jun 2001
    Location
    Oregon
    Posts
    643

    Re: Wokawidgets Component Suite

    Quote Originally Posted by Wokawidget
    The errors are simply down to yourself not really knowing what you're doing when dealing with multi layers apps, that reference each other, in Visual Studio.

    Delete all the stuff you've done.
    Re-unzip the Messenger zip file.
    Then load the VPG file.

    Woka

    You are absolutely correct! Ive never dealt with multi layered apps, never even seen one until now.

    Ive fixed all the other issues except that one, i referenced all the others by putting in the project its using, but this one doesnt have one, so im kinda lost, is there a post # in here, or a thread you know of i could look at that could explain more on this so i can learn more about this, and get the MSN app working?

    Quote Originally Posted by Wokawidget
    how many projects have you got open in VB? 1? The main MSN client I bet.
    Have you compiled the other 3-4 or so projects that the client uses? I bet not.
    If yes, then have you added a new referenc eto the compiled dll, and REMOVED the old project reference.

    Woka
    i started with a new instance of VB6, and loaded the MSN Messenger Client.vpg file, but received error upon error, all the same thing, its all references.. As ive said, i fixed all of them except the ones that reference something outside of a class or layered project already within the group.

  23. #63

  24. #64
    Addicted Member
    Join Date
    Feb 2007
    Posts
    187

    Re: Wokawidgets Component Suite

    I have some question regarding the XP button...

    I don't know what is the reason:

    After I make the project group, I getting some error msg like "version 15.0 of ... \vbXPButton.ocx is not registered. The control will be upgraded to version 17.0".

    Althought I clicked OK, it still show me the same error msg next time when I open the project group

    Beside this, I'm using vbXPButton.ocx at another project, when I press F5 to run the project, I goes to IE with address "C:\Program Files\Microsoft Visual Studio\VB9\XPButton.html"... I have no idea on how to solve this...

    Any help please?

    Thanks

  25. #65

    Thread Starter
    Super Moderator Wokawidget's Avatar
    Join Date
    Nov 2001
    Location
    Headingly Occupation: Classified
    Posts
    9,633

    Re: Wokawidgets Component Suite

    VB9?

    VB6 = VS 6
    VB7 = VS 2001
    VB8 = VS 2003
    VB9 = VS 2005

    I think :s

    From that I am assuming that you are using a control built in VB6 in VS 2005?
    I am afraid I have never tested this, and I have no idea at all why F5 is redirecting you to vbXPButton.html...that's nothing to do with the code I wrote. Are you trying to use this in a web project at all????

    Woka

  26. #66
    Addicted Member
    Join Date
    Feb 2007
    Posts
    187

    Re: Wokawidgets Component Suite

    Quote Originally Posted by Wokawidget
    VB9?

    VB6 = VS 6
    VB7 = VS 2001
    VB8 = VS 2003
    VB9 = VS 2005

    I think :s

    From that I am assuming that you are using a control built in VB6 in VS 2005?
    I am afraid I have never tested this, and I have no idea at all why F5 is redirecting you to vbXPButton.html...that's nothing to do with the code I wrote. Are you trying to use this in a web project at all????

    Woka
    I'm using it in VB6.

    umm... is it I just use the vbXPButton.ocx, then add it in under Project -> References?

    or I need to create a vbg?

  27. #67
    PowerPoster
    Join Date
    May 2002
    Posts
    25,469

    Re: Wokawidgets Component Suite

    Check to make sure that your app is set as the startup... and not the control's project...

    -tg
    * I don't respond to private (PM) requests for help. It's not conducive to the general learning of others.*
    * I also don't respond to friend requests. Save a few bits and don't bother. I'll just end up rejecting anyways.*
    * How to get EFFECTIVE help: The Hitchhiker's Guide to Getting Help at VBF - Removing eels from your hovercraft *
    * How to Use Parameters * Create Disconnected ADO Recordset Clones * Set your VB6 ActiveX Compatibility * Get rid of those pesky VB Line Numbers * I swear I saved my data, where'd it run off to??? *

  28. #68

    Thread Starter
    Super Moderator Wokawidget's Avatar
    Join Date
    Nov 2001
    Location
    Headingly Occupation: Classified
    Posts
    9,633

    Re: Wokawidgets Component Suite

    Open up vbXPButton.vbp in VB6. Click build/compile.
    Then open your blank project and go to Components and browse to the newly compiled OCX.

    Regarding having a previous app using it and getting it to use the newly compiled version, without needing to recompile your app, you need to set binay compatibility on the build options for vbXPButton.vbp and point it at the old OCX. This keeps means the registered OCS keeps the same GUID.


    Woka

  29. #69
    Addicted Member
    Join Date
    Feb 2007
    Posts
    187

    Re: Wokawidgets Component Suite

    Quote Originally Posted by Wokawidget
    Open up vbXPButton.vbp in VB6. Click build/compile.
    Then open your blank project and go to Components and browse to the newly compiled OCX.

    Regarding having a previous app using it and getting it to use the newly compiled version, without needing to recompile your app, you need to set binay compatibility on the build options for vbXPButton.vbp and point it at the old OCX. This keeps means the registered OCS keeps the same GUID.


    Woka
    OK, let's said I compiled the ocx, then I put it inside "C:\Testing" folder, this folder will have my vb project files as well.

    Then I go to Components and browse to the OCX. Click apply & ok button.

    But when I move the whole folder "C:\Testing" to "D:\Testing", then I open the vb project again, the refering ocx file location changed

    sorry... can explain to me what are the differences between binay compatibility & project compatibility?

  30. #70

    Thread Starter
    Super Moderator Wokawidget's Avatar
    Join Date
    Nov 2001
    Location
    Headingly Occupation: Classified
    Posts
    9,633

    Re: Wokawidgets Component Suite

    Errrr....well the OCX gets registered in the registry with C:\Testing\vbXPButton.ocx

    Open up regedit and do a search for this.

    So when you move your folder and then run the exe it's going to check the registry and then look for the folder c:\Testing...which you have removed.

    Copying the folder is essentially as doing an app deployment manually...so you would also need to call RegSvr32 to register the OCX. Open a CMD prompt and type:

    RegSvr32 "D:\testing\vbXPButton.ocx"

    But this is a VERY bad idea. If you indend to move things around, or put them on a different machine then you really should use an installer for this as that's what they are designed for...copying the files, and then registering the ocx's and dlls.

    VB6 ships with the Package and Deployment wizard for this.

    Woka

  31. #71

    Thread Starter
    Super Moderator Wokawidget's Avatar
    Join Date
    Nov 2001
    Location
    Headingly Occupation: Classified
    Posts
    9,633

    Re: Wokawidgets Component Suite

    Just because a DLL or OCS has the same name, woof.dll, doesn't means it's the same thing, and each time you build it a new GUID is assigned to it for the registry.
    If you compile the OCX into a folder ..\BinCompat\vbXPButton.ocx and use this as the "base" ocx, and then set this OCX for binary compatibility, and then compile the OCX to a diff folder ..\ReleaseOCX\ then this one will be used by your PC, but when compiling it looks at ..\BinCompat\vbXPButton.ocx and uses the same GUID...so you can keep compiling the OCX and your EXE file will still run as the GUID stays the same in the registry.

    Woka

  32. #72

  33. #73
    PowerPoster
    Join Date
    May 2002
    Posts
    25,469

    Re: Wokawidgets Component Suite

    In my sig there's a short walkthrough on setting & using the compatibility, along with a brief description on why it works the way itdoes.

    -tg
    * I don't respond to private (PM) requests for help. It's not conducive to the general learning of others.*
    * I also don't respond to friend requests. Save a few bits and don't bother. I'll just end up rejecting anyways.*
    * How to get EFFECTIVE help: The Hitchhiker's Guide to Getting Help at VBF - Removing eels from your hovercraft *
    * How to Use Parameters * Create Disconnected ADO Recordset Clones * Set your VB6 ActiveX Compatibility * Get rid of those pesky VB Line Numbers * I swear I saved my data, where'd it run off to??? *

  34. #74
    Software Carpenter dee-u's Avatar
    Join Date
    Feb 2005
    Location
    Candon City, Ilocos Sur, Phils.
    Posts
    10,813

    Re: Wokawidgets Component Suite

    Hey Woka, the menu for your vbSysTray does not support sub-menus?
    Regards,


    As a gesture of gratitude please consider rating helpful posts. c",)

    Some stuffs: Mouse Hotkey | Compress file using SQL Server! | WPF - Rounded Combobox | WPF - Notify Icon and Balloon | NetVerser - a WPF chatting system

  35. #75

  36. #76
    Software Carpenter dee-u's Avatar
    Join Date
    Feb 2005
    Location
    Candon City, Ilocos Sur, Phils.
    Posts
    10,813

    Re: Wokawidgets Component Suite

    Quote Originally Posted by Wokawidget
    That's right. I don't think I added that functionality in.

    Woka
    Will you have time to add such functionality then?
    Regards,


    As a gesture of gratitude please consider rating helpful posts. c",)

    Some stuffs: Mouse Hotkey | Compress file using SQL Server! | WPF - Rounded Combobox | WPF - Notify Icon and Balloon | NetVerser - a WPF chatting system

  37. #77

    Thread Starter
    Super Moderator Wokawidget's Avatar
    Join Date
    Nov 2001
    Location
    Headingly Occupation: Classified
    Posts
    9,633

    Re: Wokawidgets Component Suite

    Hi,

    Sorry, I have no intention of modifying any of my VB6 code in the near future I am afraid. Very busy.
    I have supplied the source so I don't have to do things like this, which gives other developers free reign to add functionality of their choice. Why don't you code the functionality?

    Woka

  38. #78
    New Member
    Join Date
    Mar 2009
    Posts
    12

    Re: Wokawidgets Component Suite

    Newb
    im trying to copy it to my project,but i need to add something... like a reference?
    how do i copy the buttons? what do i need to do?

  39. #79

  40. #80
    New Member
    Join Date
    Mar 2009
    Posts
    12

    Re: Wokawidgets Component Suite

    i want to use the winXP buttons on your Zip file..
    how do i do it?

Page 2 of 2 FirstFirst 12

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Featured


Click Here to Expand Forum to Full Width

Survey posted by VBForums.