Click here to Skip to main content
16,006,348 members
Home / Discussions / Visual Basic
   

Visual Basic

 
GeneralRe: Progress bar Pin
MikeUPMC3-Apr-06 10:29
MikeUPMC3-Apr-06 10:29 
AnswerRe: Progress bar Pin
MohammadAmiry4-Apr-06 1:23
MohammadAmiry4-Apr-06 1:23 
QuestionReceiving Net Send within application textbox Pin
sharmaabhishek30-Mar-06 8:19
sharmaabhishek30-Mar-06 8:19 
AnswerRe: Receiving Net Send within application textbox Pin
Eric Dahlvang31-Mar-06 3:17
Eric Dahlvang31-Mar-06 3:17 
GeneralRe: Receiving Net Send within application textbox Pin
sharmaabhishek1-Apr-06 13:08
sharmaabhishek1-Apr-06 13:08 
GeneralRe: Receiving Net Send within application textbox Pin
Eric Dahlvang3-Apr-06 4:56
Eric Dahlvang3-Apr-06 4:56 
GeneralRe: Receiving Net Send within application textbox Pin
sharmaabhishek5-Apr-06 11:59
sharmaabhishek5-Apr-06 11:59 
GeneralRe: Receiving Net Send within application textbox Pin
Eric Dahlvang6-Apr-06 11:01
Eric Dahlvang6-Apr-06 11:01 
I tried the old code...no luck.

I was on Win2000 at the time. No idea why it isn't working now...I'm on XP. Shouldn't matter though.

If you feel up to it, check out the sb_StartHook procedure, and the WndProc function. You will see code written that is intended to intercept the messages from the Messenger Service (and it worked fine for me a few years ago):

Private Sub sb_StartHook()<br />
'************************************************************************<br />
'The following code will start the hooking.<br />
'************************************************************************<br />
    'Used for Hooking START<br />
    uRegMsg = RegisterWindowMessage(ByVal "SHELLHOOK")<br />
    Call RegisterShellHook(hwnd, RSH_REGISTER) ' Or RSH_REGISTER_TASKMAN Or RSH_REGISTER_PROGMAN)<br />
    OldProc = GetWindowLong(hwnd, GWL_WNDPROC)<br />
    SetWindowLong hwnd, GWL_WNDPROC, AddressOf WndProc<br />
End Sub


In WndProc you'll find:
<br />
If wMsg = uRegMsg Then<br />
Select Case wParam<br />
Case HSHELL_WINDOWCREATED<br />
If GetWndText(lParam) = "Messenger Service " Then<br />
                    <br />
  ShowWindow lParam, SW_HIDE<br />
                    <br />
  'Get Window Text.<br />
  strData = String(1000, vbNullChar)<br />
                        <br />
  'Get Child Window handle with type Static (Label).<br />
  hWndChild = FindWindowEx(lParam, 0&, "Static", vbNullString)<br />
                    <br />
  'Get the text of the Child Window (Label).<br />
  retHwnd = GetWindowText(hWndChild, strData, intDataLength)<br />
                    <br />
  'Destroy the wondow.<br />
  'PostMessage lParam, WM_KEYDOWN, VK_RETURN, &H1&<br />
  PostMessage lParam, WM_CLOSE, 0&, &H1&<br />
<br />
  ...etc...


Sorry it didn't work out. Maybe you can modify this code to work. I just don't have time right now.

----------
There go my people. I must find out where they are going so I can lead them.
- Alexander Ledru-Rollin

QuestionEncryption & Drag/Drop Pin
kenexcelon30-Mar-06 5:35
kenexcelon30-Mar-06 5:35 
AnswerRe: Encryption & Drag/Drop Pin
MohammadAmiry30-Mar-06 14:31
MohammadAmiry30-Mar-06 14:31 
Questionvb Activate a Notification Area App Menu Pin
chabdesign30-Mar-06 5:16
chabdesign30-Mar-06 5:16 
QuestionWeb Chat Pin
Sharper8330-Mar-06 3:16
Sharper8330-Mar-06 3:16 
AnswerRe: Web Chat Pin
J4amieC30-Mar-06 3:19
J4amieC30-Mar-06 3:19 
AnswerRe: Web Chat Pin
IBetNoBodyWillHaveThisNameOrAlias30-Mar-06 4:53
IBetNoBodyWillHaveThisNameOrAlias30-Mar-06 4:53 
QuestionJoining Arrays Together Pin
directred30-Mar-06 2:34
directred30-Mar-06 2:34 
AnswerRe: Joining Arrays Together Pin
J4amieC30-Mar-06 3:20
J4amieC30-Mar-06 3:20 
QuestionAccessing file properties in VB6 Pin
Captain Trips30-Mar-06 1:21
Captain Trips30-Mar-06 1:21 
AnswerRe: Accessing file properties in VB6 Pin
Captain Trips30-Mar-06 1:27
Captain Trips30-Mar-06 1:27 
QuestionHow to create and open connection string in vb.Net Pin
Murtuza Husain Miyan Patel30-Mar-06 0:35
professionalMurtuza Husain Miyan Patel30-Mar-06 0:35 
AnswerRe: How to create and open connection string in vb.Net Pin
SVb.net30-Mar-06 12:38
SVb.net30-Mar-06 12:38 
QuestionINHERITED FORM Pin
Greeky30-Mar-06 0:33
Greeky30-Mar-06 0:33 
AnswerRe: INHERITED FORM Pin
Greeky30-Mar-06 1:39
Greeky30-Mar-06 1:39 
Questionscan folder in visual basic 6.0 Pin
bony_baba30-Mar-06 0:21
bony_baba30-Mar-06 0:21 
AnswerRe: scan folder in visual basic 6.0 Pin
Joshua Quick30-Mar-06 13:57
Joshua Quick30-Mar-06 13:57 
Questionexport the dataset to excel using vb.net Pin
kewalkkhanna29-Mar-06 23:26
kewalkkhanna29-Mar-06 23:26 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.