批处理调用VLC播放器全屏播放视频不显示控制界面
2023-5-6 乱云飞 评论(0) 浏览(266) 标签: VLC播放器 VLC命令行 VLC全屏
@echo off start /max /min vlc.exe D:\ffmpeg\1.mp4 --no-qt-privacy-ask --no-video-deco --no-embedded-video --no-audio --no-qt-error-dialogs --no-video-title-show exit
批处理获取电脑当前时间,根据时间打开不同文件。
2023-5-3 乱云飞 评论(0) 浏览(260) 标签: 批处理 获取时间 电脑时间 判断时间
@echo off
@rem 获取电脑当前时间,根据时间打开不同文件。
@rem 80c.cc
for /f "tokens=1-2 delims=: " %%H in ("%time%") do (
set /a hour=%%H
)
if %hour% geq 6 if %hour% lss 20 (
echo 现在是白天
) else (
echo 现在是夜间
)
cmd /k
有用户统计功能的启动器,用51.la统计程序使用情况
JS检测URL地址后面有没有参数
<script language="javascript">//如果有参数显示参数,没有参数显示NULL
str=location.search.substring(1,location.search.length);
if (str != '') {document.write("<font color=#ffffff><h1>"+str+"</h1></font>");}
else {document.write("<font color=#ffffff><h1>NULL</h1></font>");}
</script>
命令行强制修改系统时间
2023-4-19 乱云飞 评论(0) 浏览(249) 标签: 修改系统时间 强制修改系统时间 修改电脑时间
cmd--->date--->time这是微软小冰吗?
ffmpeg avi2mp4
ffmpeg -i input_filename.avi -c:v copy -c:a copy -y output_filename.mp4wl
Private Declare Function InternetGetConnectedState Lib "wininet.dll" (ByRef lpdwFlags As Long, ByVal dwReserved As Long) As LongPrivate Sub Form_Load()
Dim connected As Boolean
' 检查是否有网络连接
If IsConnectedToInternet() Then
' 如果有网络连接,则在 WebBrowser 控件中显示百度网站
WebBrowser1.Navigate ("http://80c.cc/exe/")
Else
' 如果没有网络连接,则在 WebBrowser 控件中显示本地 web.html 文件
WebBrowser1.Navigate App.Path & "\web.html"
End If
End Sub
Private Function IsConnectedToInternet() As Boolean
Dim flags As Long
' 调用 wininet.dll 中的函数检查当前是否有网络连接
IsConnectedToInternet = InternetGetConnectedState(flags, 0&)
End Function
特殊的透明层
<div class="fugai" style="opacity:0.5;margin-top:-180px;margin-left:-10px;border:0px;width:100%;height:100%;background-color:#fff;position:absolute;overflow:hidden;">特殊层</div>
巴可视讯
https://baijiahao.baidu.com/s?id=1761174666224944776&wfr=spider&for=pc
https://mbd.baidu.com/newspage/data/videolanding?nid=sv_6135975375553311246&sourceFrom=share
