亲测可用 2022-11-14 10:00:18
最新在线可用rtsp服务器测试视频码流地址
2022-11-14 乱云飞 评论(0) 浏览(334) 标签: RTSP地址 在线RTSP 视频流
rtsp://wowzaec2demo.streamlock.net/vod/mp4:BigBuckBunny_115k.mp4
获取本机IP，并把本机IP写入配置文件
2022-11-14 乱云飞 评论(0) 浏览(384) 标签: VB源码 获取本机IP地址 复制内容到剪切板
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set Shell = WScript.CreateObject("WScript.Shell")
Set IPConfigSet = objWMIService.ExecQuery _
("Select IPAddress from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")
For Each IPConfig in IPConfigSet
If Not IsNull(IPConfig.IPAddress) Then
For i=LBound(IPConfig.IPAddress) to LBound(IPConfig.IPAddress)
strCopy= "http://" & IPConfig.IPAddress(i) & ":8000/onvif/device_service" '///
rtspip= IPConfig.IPAddress(i) '///
Call SetClipboardText(strCopy) '///
msgbox strCopy,vbOKOnly,"EZsoft" '///
Next
End If
Next
Sub SetClipboardText(Text) '写入信息到剪切板
Dim wsh
Set wsh = CreateObject("WScript.Shell")
wsh.Run "mshta vbscript:ClipboardData.SetData("&chr(34)&"text"&chr(34)&"," &Chr(34)& Text &Chr(34)& ")(close)",0,True
set wsh=Nothing
End Sub
'替换文本：把IP写入onvif.ini配置文件 20221114
set fso = createobject("scripting.filesystemobject")
'读取文件
set stream = fso.opentextfile("onvif.ini",1)
content = stream.readall()
call stream.close()
'替换字符串
content = replace(content,"wwwns.tpddns.cn",rtspip)
'保存文件
set stream = fso.opentextfile("onvif.ini",2)
call stream.write(content)
call stream.close()
一建建筑实务真题解析
一建建筑实务真题解析
https://v.wantiku.com/jianzao1/jianzhu1/Chapter/40278
https://www.bilibili.com/video/BV16f4y1Z7uJ
二建建筑实务真题解析
https://v.wantiku.com/jianzao2/jianzhu2/Chapter/54211
【不忘初心】 Windows10 22H2 (19045.2130) X64 无更新[深度纯净精简版][1.17G](2022.10.12)
链接: https://pan.baidu.com/s/1-VpDDXJexUoavgoDRqbGXQ?pwd=in72
提取码: in72
收藏一张透明背景的图片，后期有用。
2022-10-20 乱云飞 评论(0) 浏览(347) 标签: 虚拟老婆
ONVIF虚拟监控摄像机V34版本下载
批处理解决win7、win10、 win11安装软件乱码
2022-10-13 乱云飞 评论(0) 浏览(345) 标签: 系统乱码 软件乱码 修复乱码批处理
@echo off Wmic OS Get Caption|Find /i "Windows 11">nul&&intl.cpl ,1 Wmic OS Get Caption|Find /i "Windows 10">nul&&intl.cpl ,1 Wmic OS Get Caption|Find /i "Windows 7">nul&&intl.cpl ,3 Wmic OS Get Caption|Find /i "Windows XP">nul&&intl.cpl ,2 pause>nul
VB Timer控件以分钟为单位延时
2022-10-4 乱云飞 评论(0) 浏览(304) 标签: VB定时器 VB倒计时源码
Dim T As Integer
Timer1.Interval = 60000 '循环间隔为一分钟
Private Sub Timer1_Timer()
If T < 30 Then '如果小于30分钟
T = T + 1 '计数器+1
Else '大于等于30分钟
T = 0 '计数器清零
msgbox "QQ5082500" '要执行的代码
End If
End Sub
IE7透明度设置
filter:alpha(opacity=30)海康摄像机/录像机rtsp视频流地址格式
2022-9-27 乱云飞 评论(0) 浏览(393) 标签: 海康威视摄像机 海康威视录像机 RTSP视频流 RTSP取流地址
★目前海康录像机、网络摄像机，网络球机的RTSP单播取流格式如下（车载录像机不支持RTSP取流）：rtsp://用户名:密码@IP:554/Streaming/Channels/101
→录像机示例： 取第1个通道的主码流预览
rtsp://admin:hik12345@10.16.4.25:554/Streaming/Channels/101
取第1个通道的子码流预览
rtsp://admin:hik12345@10.16.4.25:554/Streaming/Channels/102
取第1个通道的第三码流预览
rtsp://admin:hik12345@10.16.4.25:554/Streaming/Channels/103
取第12个通道的主码流预览
rtsp://admin:hik12345@10.16.4.25:554/Streaming/Channels/1201
→网络摄像机/网络球机示例： 取主码流的URL：
rtsp://admin:hik123456@192.168.1.64:554/Streaming/Channels/101
★如果是多播取流的话，则使用以下路径
rtsp://用户名:密码@IP:554/Streaming/Channels/101?transportmode=multicast
→录像机示例： 取第1个通道的主码流预览
rtsp://admin:hik12345@10.16.4.25:554/Streaming/Channels/101?transportmode=unicast
★2012年之前的设备URL规定：
rtsp://username:password@//ch/
路径后面不能有空格、回车等符号，否则会连接失败。→举例说明： 主码流取流：
rtsp://admin:12345@192.0.0.64:554/h264/ch1/main/av_stream
子码流取流：
rtsp://admin:12345@192.0.0.64:554/h264/ch1/sub/av_stream
零通道取流：
rtsp://admin:12345@192.0.0.64:554/h264/ch0/main/av_stream
如果摄像机密码是a12345678,IP是192.168.1.,64，RTSP端口默认554未做改动，是H.264编码，那么主码流取流:
rtsp://admin:a12345678@192.168.1.64:554/h264/ch1/main/av_stream
子码流取流:
rtsp://admin:a12345678@192.168.1.64:554/h264/ch1/sub/av_stream
【如果是H.265编码的，那么将H.264替换成H.265即可】注意：URL中“:”“?”“&”等符号均为英文半角。
标签TAGS
友情链接
热门文章
电脑维修
实时监控
