VB.net 2010 视频教程 VB.net 2010 视频教程 python基础视频教程
SQL Server 2008 视频教程 c#入门经典教程 Visual Basic从门到精通视频教程
当前位置:
首页 > 编程开发 > c#教程 >

  • C#教程之C#教程之C#调用大漠插件，发送QQ和微信消息

本站最新发布   C#从入门到精通
试听地址  https://www.xin3721.com/eschool/CSharpxin3721/

 

大漠插件就不过多介绍了，不知道的请查下百度。主要是讲解C#怎么调用大漠插件。

大漠插件提供了COM版本，C#直接点击引用，添加即可。然后注册下大漠插件到系统文件夹，注册代码如下：

复制代码
 1 　　　　　static string AutoRegCom(string strCmd)
 2         {
 3             string rInfo;
 4             try
 5             {
 6                 Process myProcess = new Process();
 7                 ProcessStartInfo myProcessStartInfo = new ProcessStartInfo("cmd.exe");
 8                 myProcessStartInfo.UseShellExecute = false;
 9                 myProcessStartInfo.CreateNoWindow = true;
10                 myProcessStartInfo.RedirectStandardOutput = true;
11                 myProcess.StartInfo = myProcessStartInfo;
12                 myProcessStartInfo.Arguments = "/c " + strCmd;
13                 myProcess.Start();
14                 StreamReader myStreamReader = myProcess.StandardOutput;
15                 rInfo = myStreamReader.ReadToEnd();
16                 myProcess.Close();
17                 rInfo = strCmd + "\r\n" + rInfo;
18                 return rInfo;
19             }
20             catch (Exception ex)
21             {
22                 return ex.Message;
23             }
24         }
复制代码

调用方法：

1             //注册大漠
2             var regResult = AutoRegCom("regsvr32 -s dm.dll");

实例化大漠模块：

private static dmsoft _dmsoft = new dmsoft();

查找微信和QQ的聊天窗口，根据窗口类名来进行模糊查找，然后得到窗口句柄，根据窗口句柄得到窗口的标题、类名信息（QQ聊天窗口的类名是：TXGuiFoundation，微信的聊天窗口类名是：ChatWnd）：

复制代码
　　　　　　　var list = new List<int>();
            list.AddRange(_dmsoft.EnumWindow(0, "", "TXGuiFoundation", 18).Split(',').Where(x => !string.IsNullOrWhiteSpace(x)).Select(x => Convert.ToInt32(x)));
            list.AddRange(_dmsoft.EnumWindow(0, "", "ChatWnd", 18).Split(',').Where(x => !string.IsNullOrWhiteSpace(x)).Select(x => Convert.ToInt32(x)));
            windInfoBindingSource.DataSource = list.Select(x => new WindInfo()
            {
                Handle = x,
                ClassName = _dmsoft.GetWindowClass(x),
                Title = _dmsoft.GetWindowTitle(x),
            }).ToList();
复制代码

拿到窗口句柄剩下的事情就好办了。往窗口里面投递文本消息->模拟鼠标按键Enter发送消息。

复制代码
 1 　　　　　　　　　foreach (var windInfo in w.Where(x => x.Enable))
 2                 {
 3                     _dmsoft.BindWindowEx(windInfo.Handle, "gdi", "windows", "windows", "", 0);
 4                     Thread.Sleep(50);
 5                     _dmsoft.SetWindowState(windInfo.Handle, 1);
 6                     _dmsoft.SetWindowState(windInfo.Handle, 8);
 7                     Thread.Sleep(50);
 8                     _dmsoft.SendString2(windInfo.Handle, content);
 9                     Thread.Sleep(200);
10                     _dmsoft.KeyDown(13);
11                     _dmsoft.KeyUp(13);
12                     _dmsoft.SetWindowState(windInfo.Handle, 9);
13                     _dmsoft.SetWindowState(windInfo.Handle, 2);
14                     _dmsoft.UnBindWindow();
15                 }
复制代码

1、通过 BindWindowEx 方法绑定窗口

2、通过 SetWindowState 设置窗口为正常模拟并且设置窗口为激活状态（为了获取到输入焦点） 

3、SendString发送文本到窗口，因为目前窗口已经获取到输入焦点，所以直接投递文本即可

4、模拟按键 Enter ，Enter键在大漠模块里面的虚拟键代码是13，模拟进行按下和弹起的操作，因为大漠模块里面默认设置了按下和弹起操作的间隔时间，所以这里我们不需要再次设置。

5、通过 SetWindowState 设置窗口为取消激活状态，并且设置窗口最小化

6、解绑窗口

大漠插件从3.1235开始进行收费，我使用的是 3.1233 版本免费版的，大漠插件下载地址我也打包了，包含了官方的帮助文档：

链接: https://pan.baidu.com/s/1VJRdpl3scsLxbpxFAWZ_5A 提取码: mu25 


相关教程