admin管理员组

文章数量:1531792

2024年3月29日发(作者:)

/*

1、窗体引用两个timer控件,来控循环发送时间

2、调试环境

*/

using System;

using c;

using entModel;

using ;

using g;

using ;

using ;

using pServices;

using stics;

namespace Message

{

public partial class QQSendMessage : Form

{

[DllImport(" ")]

static extern IntPtr FindWindow(string lpClassName, string lpWindowName);

[DllImport(" ")]

static extern IntPtr GetDlgItem(IntPtr hDlg, int nIDDlgItem);

[DllImport(" ", SetLastError = true)]

public static extern IntPtr FindWindowEx(IntPtr parentHandle, int childAfter, string className,

int windowTitle);

[DllImport(" ", EntryPoint = "SendMessage ")]

static extern IntPtr SendMessage(IntPtr hWnd, uint Msg, int wParam, string lParam);

[DllImport(" ", CharSet = )]

public static extern IntPtr GetModuleHandle(string lpModuleName);

IntPtr hwndQQ;

IntPtr hwnd1;

IntPtr hwnd2;

IntPtr hwnd3;

IntPtr hwnd4;

public QQSendMessage()

{

InitializeComponent();

}

protected void MySendMessage()

{

string machinename = eName;//获得计算机名

Process[] processlist = cesses(machinename);//得到所有进程

foreach (Process p in processlist)//列举每个进程

{

if (ndowTitle != " ")//标题是否为空,不为空执行下面代码

{

if (ng().Substring(0, 1) == "与 ")//查看窗口标题第一个字是否是

“与”。如果是的,说明是QQ窗口

{

hwndQQ = FindWindow("#32770 ", ng());

hwnd1 = GetDlgItem(hwndQQ, 0);

hwnd2 = GetDlgItem(hwnd1, 0);

hwnd3 = GetDlgItem(hwnd2, 894);

SendMessage(hwnd3, 194, 0, );//向QQ输入框粘贴字符,

是要发送的文字信息

hwnd4 = GetDlgItem(hwnd1, 1);

SendMessage(hwnd4, 245, 0, ng(0));

}

}

}

}

///

/// 单个用户发送消息

///

///

///

protected void btnSend_Click(object sender, EventArgs e)

{

MySendMessage();//发送信息,向单个用户发送。

}

///

/// 循环发送消息

///

///

///

protected void btnSSend_Click(object sender, EventArgs e)

{

d = true;

}

///

/// 停止发送消息

///

///

///

protected void btnSStop_Click(object sender, EventArgs e)

{

d = false;

}

///

本文标签: 发送消息进程标题循环