监控网源码
VC-摄像头控制SDK源码
#include <windows.h>
#include <stdio.h>
#include <vfw.h>
#pragma comment(lib,"vfw32.lib")
HWND ghWndCap ; //捕获窗的句柄
CAPDRIVERCAPS gCapDriverCaps ; //视频驱动器的能力
CAPSTATUS gCapStatus ; //捕获窗的状态
char szCaptureFile[] = "MYCAP.AVI";
char gachBuffer[20];
LRESULT CALLBACK WndProc(HWND,UINT,WPARAM,LPARAM);
LRESULT CALLBACK StatusCallbackProc(HWND hWnd,int nID,LPSTR lpStatusText)
{
if(!ghWndCap)return FALSE;//获得捕获窗的状态
capGetStatus(ghWndCap,&gCapStatus,sizeof(CAPSTATUS));//更新捕获窗的大小
SetWindowPos(ghWndCap,NULL,0,0,gCapStatus.uiImageWidth,gCapStatus.uiImageHeight,SWP_NOZORDER|SWP_NOMOVE);
if(nID==0){//清除旧的状态信息
SetWindowText(ghWndCap,(LPSTR)"hello");
return (LRESULT)TRUE;
}//显示状态ID和状态文本
wsprintf(gachBuffer,"Status# %d: %s",nID,lpStatusText);
SetWindowText(ghWndCap,(LPSTR)gachBuffer);
return (LRESULT)TRUE;
}
LRESULT CALLBACK ErrorCallbackProc(HWND hWnd,int nErrID,LPSTR lpErrorText)
{
if(!ghWndCap)return FALSE;
if(nErrID==0)return TRUE;//清除旧的错误
wsprintf(gachBuffer,"Error# %d",nErrID);//显示错误标识和文本
MessageBox(hWnd, lpErrorText, gachBuffer,MB_OK | MB_ICONEXCLAMATION);
return (LRESULT) TRUE;
}
LRESULT CALLBACK FrameCallbackProc(HWND hWnd,LPVIDEOHDR lpVHdr)
{
FILE *fp;
fp=fopen("caram.dat","w");
if(!ghWndCap)return FALSE;//假设fp为一打开的.dat文件指针
fwrite(lpVHdr->lpData,1,lpVHdr->dwBufferLength,fp);
return (LRESULT)TRUE;
}
int WINAPI WinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,PSTR szCmdLine,int iCmdShow)
{
static TCHAR szAppName[]=TEXT("HelloWin");
HWND hwnd;
MSG msg;
WNDCLASS wndclass;
wndclass.style=CS_HREDRAW|CS_VREDRAW;
wndclass.lpfnWndProc=WndProc;
wndclass.cbClsExtra=0;
wndclass.cbWndExtra=0;
wndclass.hInstance=hInstance;
wndclass.hIcon=LoadIcon(NULL,IDI_APPLICATION);
wndclass.hCursor=LoadCursor(NULL,IDC_ARROW);
wndclass.hbrBackground=(HBRUSH)GetStockObject(WHITE_BRUSH);
wndclass.lpszMenuName=NULL;
wndclass.lpszClassName=szAppName;
if(!RegisterClass(&wndclass))
{
MessageBox(NULL,TEXT("This program requires WindowsNT!"),szAppName,MB_ICONERROR);
return 0;
}
hwnd=CreateWindow(szAppName,TEXT("The Hello Program"),WS_OVERLAPPEDWINDOW,CW_USEDEFAULT,CW_USEDEFAULT,CW_USEDEFAULT,CW_USEDEFAULT,NULL,NULL,hInstance,NULL);
ShowWindow(hwnd,iCmdShow);
UpdateWindow(hwnd);
while(GetMessage(&msg,NULL,0,0))
{
TranslateMessage(&msg);
DispatchMessage(&msg);
}
return msg.wParam;
}
LRESULT CALLBACK WndProc(HWND hwnd,UINT message,WPARAM wParam,LPARAM lParam)
{
HDC hdc;
PAINTSTRUCT ps;
RECT rect;
switch(message)
{
case WM_CREATE:
{
ghWndCap=capCreateCaptureWindow((LPSTR)"Capture Window",WS_CHILD|WS_VISIBLE,0,0,300,240,(HWND)hwnd,(int)0);
capSetCallbackOnError(ghWndCap,(FARPROC)ErrorCallbackProc);
capSetCallbackOnStatus(ghWndCap,(FARPROC)StatusCallbackProc);
capSetCallbackOnFrame(ghWndCap,(FARPROC)FrameCallbackProc);
capDriverConnect(ghWndCap,0); // 将捕获窗同驱动器连接
//获得驱动器的能力,相关的信息放在结构变量gCapDriverCaps中
capDriverGetCaps(ghWndCap,&gCapDriverCaps,sizeof(CAPDRIVERCAPS));
capPreviewRate(ghWndCap, 66); // 设置Preview模式的显示速率
capPreview(ghWndCap, TRUE); //启动Preview模式
if(gCapDriverCaps.fHasOverlay) //检查驱动器是否有叠加能力
capOverlay(ghWndCap,TRUE); //启动Overlay模式
if(gCapDriverCaps.fHasDlgVideoSource)capDlgVideoSource(ghWndCap); //Video source 对话框
if(gCapDriverCaps.fHasDlgVideoFormat)capDlgVideoFormat(ghWndCap); // Video format 对话框
if(gCapDriverCaps.fHasDlgVideoDisplay)capDlgVideoDisplay(ghWndCap); // Video display 对话框
capFileSetCaptureFile( ghWndCap, szCaptureFile); //指定捕获文件名
capFileAlloc(ghWndCap, (1024L * 1024L * 5)); //为捕获文件分配存储空间
capCaptureSequence(ghWndCap); //开始捕获视频序列
capGrabFrame(ghWndCap); //捕获单帧图像
}
return 0;
case WM_PAINT:
hdc=BeginPaint(hwnd,&ps);
GetClientRect(hwnd,&rect);
DrawText(hdc,TEXT("Hello,Windows98!"),-1,&rect,DT_SINGLELINE|DT_CENTER|DT_VCENTER);
EndPaint(hwnd,&ps);
return 0;
case WM_DESTROY:
{
capSetCallbackOnStatus(ghWndCap,NULL);
capSetCallbackOnError(ghWndCap,NULL);
capSetCallbackOnFrame(ghWndCap,NULL);
capCaptureAbort(ghWndCap);//停止捕获
capDriverDisconnect(ghWndCap); //将捕获窗同驱动器断开
PostQuitMessage(0);
}
return 0;
}
return DefWindowProc(hwnd,message,wParam,lParam);
}
B. 易语言服务器端怎么连接客户端的摄像头！最好有一个简单的源码 就连接一个摄像头
所用组件和支持库、变量：
一、接收端程序编写
1.支持库：视频聊天支持库
2.接送端全局变量及组件
全局变量 音频输出设备, 文本型
组件 多媒体播放器 说明：播放接收到的视频图像
组件服务器说明：接收视频数据
组件时钟 说明：用于检测接收远程数据库速度
组件标签 说明：显示接收远程数据数据速度
组件 窗口1 说明：设置输出音频
组件多媒体设备枚举器 说明：获取音频设备
组件组合框 说明：列出音频设备
3.接收视频窗口设置-启动窗口 
.版本2
.支持库eChat
.程序集窗口程序集2
.程序集变量视频输入设备数组,视频输入设备,,"0"
.程序集变量音频输入设备数组,音频输入设备,,"0"
.子程序_窗口1_创建完毕
.局部变量n,整数型
视频输入设备数组＝多媒体设备枚举器1.取视频输入设备列表()
音频输入设备数组＝多媒体设备枚举器1.取音频输入设备列表()
.计次循环首(取数组成员数(视频输入设备数组),n)
组合框_视频输入.加入项目(视频输入设备数组[n].设备名称,)
.计次循环尾()
组合框_视频输入.现行选中项＝0
.计次循环首(取数组成员数(音频输入设备数组),n)
组合框_音频输入.加入项目(音频输入设备数组[n].设备名称,)
.计次循环尾()
组合框_音频输入.现行选中项＝0
.子程序_按钮1_被单击
视频输入设备＝视频输入设备数组[组合框_视频输入.现行选中项＋1].设备路径
音频输入设备＝音频输入设备数组[组合框_音频输入.现行选中项＋1].设备标识
销毁()
发送端设置完成。
C. 怎么把局域网内的网络监控实时录像开放到外网上。 最好有源码
网络监控 录像机有 ip地址 可以在路由器上做映射 到公网上面
电脑安装监控软件就可以看
D. 如何利用python自动监控网站并发送邮件告警
1、监控网站
监控网站其实就是去爬网页的源码，每次对比或检查网页源码特定位置的html代码是否有变化即可，具体可以用
fromurllibimportrequest
page=request.urlopen("网址")
html=page.read()
就可以获取网页源码；
2、发送高警
建议别用邮件，邮件发多几次就会认为你的发件箱有发垃圾邮件的嫌疑。用 喵提醒 ，是个公众号，可以免费发提醒到手机上。调用方法也和监控网页代码类似，具体自己看喵提醒的教程。
E. 公司的源代码应该怎么保护，防止泄密呢
推荐使用域之盾系统，域之盾系统安装方便点点鼠标即可完成安装部署，操作简单 功能全面，可针对日常办公/文字编辑/图纸编辑/图片编辑进行一键透明加密，比如在域之盾管控端设置好针对WORD文件加密以后，客户端上的word文档会自动加密，加密以后的文件任何形式的非法外发拷贝传输 打开都是乱码 装有域之盾客户端的电脑设备之间可以无障碍传阅，也可以设置外发文件的生命周期，最大打开次数 最长打开天数 多方面保护数据安全不被泄密 域之盾系统的桌面管理功能支持实时画面，屏幕录像，微信QQ 钉钉 聊天记录 网页浏览 网址搜索记录等 可有效帮企业监督员工上网行为，适合企业使用
1. 透明加解密
系统根据管理策略对相应文件进行加密，用户访问需要连接到服务器，按权限访问，越权访问会受限，通过共享、离线和外发管理可以实现更多的访问控制。
2. 泄密控制
对打开加密文档的应用程序进行打印、内存窃取、拖拽和剪贴板等操作管控，用户不能主动或被动地泄漏机密数据。
3. 审批管理
支持共享、离线和外发文档，管理员可以按照实际工作需求，配置是否对这些操作进行强制审批。用户在执行加密文档的共享、离线和外发等操作时，将视管理员的权限许可，可能需要经过审批管理员审批。
4. 离线文档管理
对于员工外出无法接入网络的情况可采用系统的离线管理功能。通过此功能授权指定用户可以在一定时间内不接入网络仍可轻松访问加密数据，而该用户相应的安全策略仍然生效，相应数据仍然受控，文档权限也与联网使用一样。
5. 外发文档管理
本功能主要是解决数据二次泄密的威胁，目的是让发出的文档仍然受控。通过此功能对 需要发出的文件进行审批和授权后，使用者不必安装加密客户端即可轻松访问受控文件，且可对文件的操作权限及生命周期予以管控。
6. 审计管理
对加密文档的常规操作，进行详细且有效的审计。对离线用户，联网后会自动上传相关日志到服务器。
7. 自我保护
通过在操作系统的驱动层对系统自身进行自我保护，保障客户端不被非法破坏，并且始终运行在安全可信状态。即使客户端被意外破坏，客户端计算机里的加密文档也不会丢失或泄漏。
F. 易语言监控屏幕得视频源码，就是电脑上面网页播放视频，如果视频暂停了就自动点击继续播放，源码要怎么写
给你一个思路，如果你的网页不动，用 鼠标_记位 这个函数（包含在“精易模块.ec”中）记录继续播放按钮的坐标，再用 鼠标_归位 还原 鼠标位置，至于点击，用模拟按键即可。
G. 易语言怎么通过源码监控竞店实时销量
创建源码。
首先创建一个子程序，为了体现你用的方法ScriptControl对象。在易语言中，创建ScriptControl对象方法ScriptControl，创建ScriptControl，写属性ScriptControl，数值方法最后，通过通用方法返回获取相应的数值。