Skip to content

How to send text to paltalk room using VB .Net?

Viewing 7 posts - 1 through 7 (of 7 total)
  • Author
    Posts
  • August 28, 2005 at 11:15 pm #189336
    Admin
    Administrator

    Well I was trying VB .net and u know I starting to like it so I trying to do some proggies in vb .net, but cant seem to figure how to send a messege to a paltalk room 🙂

    well if anyone has figure it out , plsssssssssss help me thanks 🙂

    August 29, 2005 at 2:57 am #189342
    Admin
    Administrator

    Dude….. fuck Visual Studio .NET man that is the worst programming language ever .NET you gotta install frameworks so if your going to make programs for the public to use i feel sorry for the people that use them. bad enough alot of them dont have the VB6 components now there going to have to download frameworks if any language use C++ or delphi atleast they have it built in. 8)

    August 29, 2005 at 1:15 pm #189341
    Departure
    Member

    Anyone using WindowsXP has already the VB6 runtime files, and anyone using WindowsXP SP2 and above would proberly have the netframework componates installed, there seems to be alot of software using these componates.

    August 29, 2005 at 2:09 pm #189340
    Admin
    Administrator

    Yeps, there a lot of soft now using frameworks, cause i be checking cnet downloads, and a lot of new software are using it, so eventually all windows should come with it.

    the reason i want to try vb .net one cause is esier then c++ and right now dont have enough time to learn c+ 🙂 and the other the form template you can make look great without adding extra components lol is beautiful lol

    the only bad thing is i cant make the send messege work 🙁

    I though i could have use the same api but not 🙄

    September 20, 2005 at 5:35 am #189339
    BattleStar-Galactica
    Member

     

    Public Declare Function FindWindow Lib "user32" Alias "FindWindowA"(ByVal lpClassName As String, ByVal lpWindowName As String) As Integer
Public Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA"(ByVal hwnd1 As Integer, ByVal hwnd2 As Integer, ByVal lpsz1 As String, ByVal lpsz2 As String) As Integer
Public Declare Function SendMessageByString Lib "user32" Alias "SendMessageA"(ByVal hwnd As Integer, ByVal wMsg As Integer, ByVal wParam As Integer, ByVal lParam As String) As Integer
Public Declare Function SendMessageLong Lib "user32" Alias "SendMessageA"(ByVal hwnd As Integer, ByVal wMsg As Integer, ByVal wParam As Integer, ByVal lParam As Integer) As Integer

mywindowclass = FindWindow("my window class", vbNullString)
wtlsplitterwindow = FindWindowEx(mywindowclass, 0&, "wtl_splitterwindow", vbNullString)
wtlsplitterwindow = FindWindowEx(wtlsplitterwindow, 0&, "wtl_splitterwindow", vbNullString)
wtlsplitterwindow = FindWindowEx(wtlsplitterwindow, 0&, "wtl_splitterwindow", vbNullString)
atlfe = FindWindowEx(wtlsplitterwindow, 0&, "ATL:004FE680", vbNullString)
atlaxwin = FindWindowEx(atlfe, 0&, "atlaxwin71", vbNullString)
X = FindWindowEx(atlaxwin, 0&, "#32770", vbNullString)
richedita = Module1.FindWindowEx(X, 0&, "richedit20a", vbNullString)
richedita = FindWindowEx(X, richedita, "richedit20a", vbNullString)
SendMessageByString(richedita, WM_SETTEXT, 0&, "your text")

SendMessageLong(richedita, WM_KEYDOWN, 13, 0&)

     

    that’s it send text to paltalk 8.1 with vb.net

    November 11, 2005 at 11:42 pm #189338
    method
    Member

    nanomachine007 thanks for posting this code. could u tell me how to run this project in visual studio .net 2003 ? i be happy if u tell me step by step what to do .Thanks

    August 27, 2010 at 6:54 am #189337
    jimmyng
    Member

    Got it work!!! Thank 😆 😆

  • Author
    Posts

Related

Viewing 7 posts - 1 through 7 (of 7 total)
  • You must be logged in to reply to this topic.