监视剪贴板的内容
百度MP3有个复制连接的功能，如何监视剪贴板的内容并判断是不是下载连接，是不是音乐文件，如果是则下载到程序所在文件夹，下载完后提示下载完成，请高手给个例子，万分感谢！ 另外不要显示下载界面。 在我的网址收集功能里面类似的功能我用过，就是如果我发现需要收藏的网址复制其URL后，我的程序会自动跳出来进行保存、命名等操作，如果我复制的是其它文本的话，程序是不会响应的。这只是一个判断的问题，应该很简单的了。至于不显示下载界面，静黙就行了啊 判断.mp3; .wma; .rm 文件，au3不会写，请高手帮帮忙，写个判断后缀的例子。 回复 4# 83133058#include <Filegetinfo.au3>
$Filetype=_getfiletype('C:\WINDOWS\explorer.exe')
if stringinstr($Filetype,'exe',2)>0 then msgbox(0,'','文件为exe')
;=============================================
;$spath必须是一个确实的文件
;_getdir($spath) 给出文件路径但不包含文件名
;_getfilename($spath)给出文件名 $sflag=1时不包含文件类型
;_getfiletype($spath)给出文件类型
;然后调用函数即可
;=======将以下文本"Filegetinfo.au3"文本复制到Include下=============
Func _getdir($spath)
If StringRegExp($spath, '\\') Then
$sdir = StringRegExpReplace($spath, '\\[^\\]*$', '')
Else
$sdir = ''
EndIf
Return ($sdir)
EndFunc ;==>_getdir
Func _getfilename($spath, $sflag = 0)
If $sflag = 0 Then
$sflag = 0
Else
$sflag = 1
EndIf
If $sflag = 0 Then
$sFileName = StringRegExpReplace($spath, '.+\\', '')
Else
$sFileName = StringRegExpReplace($spath, '.+\\', '')
$sFileName = StringRegExpReplace($sFileName, '\.[^\.]*$', '')
EndIf
Return ($sFileName)
EndFunc ;==>_getfilename
Func _getfiletype($spath)
$sFiletype = StringRegExpReplace($spath, '.+\.', '')
Return ($sFiletype)
EndFunc ;==>_getfiletype
;================================================ 学习学习.....
页:
[1]