请问大家有见过创建快捷方式的批处理不

显示全部楼层 · 发表于 2018-1-6 14:09:59

lyttmonkey 发表于 2018-1-6 14:06
被@了，过来看看，你还在……

那去哪儿啊？起码这边版务还过得去。

显示全部楼层 · 发表于 2018-1-6 18:37:18

527907615 发表于 2018-1-5 23:43
是这样的，我平时喜欢在B站看那些AMV视频，看到不错的都会下载存到本地硬盘收藏起来，通常下载下来的有FL ...

【综漫_衔接_燃】--激燃交响曲_MAD·AMV_动画_bilibili_哔哩哔哩.html
▲这个标题对于那个vbs没有问题。

你复制到的内容是什么？
如果含有?问号，那就是在复制时已出了问题。
你是用什么复制标题的？

显示全部楼层 · 发表于 2018-1-6 20:08:07

kfk 发表于 2018-1-6 18:37
【综漫_衔接_燃】--激燃交响曲_MAD·AMV_动画_bilibili_哔哩哔哩.html
▲这个标题对于那个vbs没有问题。 ...

是一个火狐的UC脚本AutoCopyButton.uc，选中文字自动复制到剪贴板

// ==UserScript==
// [url=home.php?mod=space&uid=467097]@Name[/url] autoCopy.uc.js
// [url=home.php?mod=space&uid=1079000]@namespace[/url] ithinc#mozine.cn
// @description 自动复制按钮版（切换图标蓝色复制，绿色复制并粘贴到搜索栏，红色禁用）
// [url=home.php?mod=space&uid=713796]@include[/url] main
// @compatibility Firefox 3.0.x
// [url=home.php?mod=space&uid=321866]@author[/url] ithinc
// @updator iwo
// [url=home.php?mod=space&uid=378994]@Update[/url] 2013-01-21 21:30 respected ctrl or alt Key
// @update 2013-01-06 10:00 excluding input area
// [url=home.php?mod=space&uid=570682]@version[/url] LastMod 2009/3/1 22:30 Initial release
// [url=home.php?mod=space&uid=356229]@Note[/url] https://g.mozest.com/redirect.php?goto=findpost&pid=299093&ptid=42980
// ==/UserScript==
/* :::: AutoCopy with AutoPaste to search bar :::: */
(function() {
var lastSelection = "";
var autocopyImages = ["data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAACnUlEQVQ4jX1TW0iTYRh+/jknZptTnHPLbf+/qbOZpwZSGh4gSUsxApXORFERSQfJC/FiXRQdFKQuJOhEhB0ulKQuOhCUCRFhKAmVS52GNdClS0Wn+XTxl4mnBx5e+Hif5/veh+8FVsBeIOwktOJKPUviKqKPuaCOugnd8VaseZ4LKFtgrKgC1MuKcgHlCUSYSwFVFyzfPZB+uGEZ9wpW9kD8PKKM530Y1p5DmL4C0CwycAGKDpgGPBAHhyDO+FV20lnCn0Fx9ClsHFHG06ewDU6EJgUuQZu2UKy8gIjwDzC/8QpWDkEijZlkxyeOBidwcnUy/So7x0MdnAh1TD6DLv4hoJo3s67QDctEP8RZr2DloCDRp7CRbg+5/ShnI52kfgMDmlQGNKmkMWt6GFKdC1DOmbQh9oVXsMpCZwmZVU6+6yQ/fiHFHNKcTeoyyJiNpDXPVwt1FACgHmH6ZhhquiH6ewWRTCkivUNk3zeyvUuuu06RUq48VvxmMqlgmpHOpk4YE9EIdVQbTJX9EId7BZHM3kk+bSUbW8h7j8kHT2Q2NJKHqmWD1OIpGjLvdsNkmxvhLWJfegWr/ILL18nquv90XSHrb5P7zpD2fDJl28gt6GLmxE0wFPgEq28Y0szEqiRy92my6iJZeV6uFWfJIzVk8WHSUTDLrLJfYyGO2mtA8D8PwQWo3BBfjwYnyEFllpF5e+QwE7fINycVkslFU69gNAEQ/lJGKRA0FpLYMxvh/Ppbu36axkw5fSlXNnAUkOu29nFTub8BuvRFP/EhEOSGPhoApjVpgzRmeSjljNKeT0o5HczYwQHExvlgDb8DfdiyOwEAvTDvf4+I8D5YDs5o0x8BEALq1AM3ELX8Mi2FZmi17YhxzDsSFvb8Adw/Yqk8IeavAAAAAElFTkSuQmCC",
"data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAC8ElEQVQ4jX2Te0hTARTGz/Teu9mcsxzbSrNcJZkUFUlBJNFj6YppkEpRRiVWlim4hHzUJcgEi4gKioj6o4wMLJMeVgRl0YPQoqA0c4/rtju1u1dpy/Drj9SiZB98/xy+3wcHziEKJ51FSfqj08NmxlNEysUimnJMw85t3sssa31AxDPsklvFpClXhcGWMzSlNpGI5zjjOze79pNIGV3fOLMNnOljhzzPDW5hYwolHdHRzOKYcQr4CGbFO0Fh6nTJs60/VZsErOR7Ic8ToMgRoMgTEJVrd0Xl9/1gU0/M/xdmyHBOLV/R9lSeZQObbUVKsQudzhDYjU5EbxcRtcmJqC0iJmx1fZcvvj+LUnluDJcnX85kMroGWFPXMJfVDTLbEJHbA0ffEDaf9UFR9AWxxf2ILuiFsqAX6hL/kDav9TgRz/wpSX/2kDPboMqxYTXvgbFWwgdHCA53CHqLhIllPsTs6UfsPgn6cq+kSuY1v8mk8zom7W4Vk9kRkJm6sabKja99g5DEQfTYB+B1D6Doog/q/X6oSyToDvgw+WBgSLfH0RhnbJlNquRmjSr9cZliXecXMlmRXyuio92HthdetL/04s2IHz/1ora+H3EVPsTzwVBSqe2yNvPGjLEV2OUvHlGWgHVVTjy568adpj9uaRbRet+Dk5dc0FQGEM8Hfcq0M/oxOCatMUOVY5W4Dfaf6nwnTl/owe0GB25dE3D7eg8arjlRf0XAwVMCNNXBYUPdQHDa9ufHiM6xox0ySuU5xdr3TyI3ipi2V0RujQtb6kSYj3qQVCkhsULC1Go/9IeCoUnGq1OJSDbiUeVETtxs7Y7fbf8cs8szpCzxQmXxQ13uh6byK7TVQRh4jy25bjAwYdHhBeNcYkOkzvhMS0QUV2hzJZQ67XpLn19bEYCh3Po2oSaEBPO9mYbC12rdPIsyzE8QJa5v2mpY1aBOyG7ZMX1XZxMRyebsfLVNszTsM/2v2Pk3YhNX3pzz10j2b+YX3iF72eejL8YAAAAASUVORK5CYII=",
"data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAACzklEQVQ4jX1Ta0iTARQ9X04zZKk1p07Tuc32NJVFZUpNy+V8tKiGFr0LiUgRLIOKEJIeYBEarNSISeKrWk/sMSOXWWJIoln9MLLAMirMSCrF048eRqkHzp/LOedy4R5gMpjhgxQ/+aSacbFVtgMZYglyQneiSHEbJoiwNyIHyyXiiU0miJDhHwY9vHBS/Qbl2rewa74IDh1RpnnuUTeHyAvWYo00EJYZ08eLmIITka9RrulDpX7E83wM1e0rOaU2ikKNgR51cyjUGvq8ncbv2BQQ8/92m78vjs9uFhw6CpV6ShsT2cxOiuqj6XNlHj3Px9DbaaT3JeNX7A+NhA1eYwFbgiywq4dQoRkVHDoKZ3UUagzsYA/jX2XT/0YCJbcXU3xtAcXXFlB6J3EYVfpjMEE0FnJI6RIcP43q9pWM6sqii+1s5VPKmpIZfHcpZ95axACXiaH3ln1Etkzy07hNGog94ftxSj0olGmparOyl/3sZi+b2MFu9jKpP4chbjOljYkMu2+h4mH68IybCRdROlsD5MskOKzMR4X2g1CmZXT3WlbRxWOs5wleYAmdLKGT+3iGloFdDLtvYeSjFd+kLtM5lKiUYyccVd4RHDqq2qzMZSmzePAPN/AI82ln8vs8hrekUtlmHcCOgKAx8255CqoNH1GtH5l2aS6XvMulbaSQq74foG2kkNahvUwbLGDcy22MaE0fNXRlfp7qNBYjG56/IwTY4AW72i2qj2aAy0RDZyZjn61jVFcW5Q/SGN6SSkVrBlVt1m8oUs4CIPziL9jgMfVC7Au/hoQe34b4YWljImVNyQxxmyl/kMaIh+lUtGa8jHqyZhDbZbH//6ENHrArpQAgvh7XF9iY1Ctzmz+Ft6QyxG3u0D5eTVQoVagz+mJ9oM/EnQCA05qNOKLwRbl6q1/DwssABPHV+ZtRMFmZxkOe3A/FKt1fE+FfyQ8ziT4B0I5QggAAAABJRU5ErkJggg=="];
var autocopyTooltips = ["自动复制禁用", "自动复制\n不开启自动粘贴到搜索栏", "自动复制\n开启自动粘贴到搜索栏"];
var prefs = Cc["@mozilla.org/preferences-service;1"].getService(Ci.nsIPrefBranch);
if(!prefs.getPrefType("userChrome.autocopy.autocopyState")) prefs.setIntPref("userChrome.autocopy.autocopyState", 2);
function autocopyStart(e) {
lastSelection = getBrowserSelection();
}
function autocopyStop(e) {
var prefs = Cc["@mozilla.org/preferences-service;1"].getService(Ci.nsIPrefBranch);
var autocopyState = prefs.getIntPref("userChrome.autocopy.autocopyState");
var selection = getBrowserSelection();
//增加判断是否在输入框或按下功能键
var exceptTarget = (e.target.nodeName == "TEXTAREA" || e.target.type == "textarea" || e.target.type == "text" || e.target.type == "password" || e.target.type == "email");
var exceptoriginalTarget = (!e.originalTarget.ownerDocument || e.originalTarget.ownerDocument.designMode == "off" || e.originalTarget.ownerDocument.designMode == "undefined");
var exceptAlternativeKey = (e.ctrlKey || e.altKey);
var except = (exceptTarget && exceptoriginalTarget && !exceptAlternativeKey);//
if(autocopyState>0 && selection && selection!=lastSelection && !except) {//
goDoCommand('cmd_copy');
if(autocopyState>1) {
var searchbar = document.getElementById('searchbar');
searchbar.removeAttribute("empty");
searchbar.value = selection;
var evt = document.createEvent("Events");
evt.initEvent("oninput", true, true);
searchbar.dispatchEvent(evt);
}
}
}
gBrowser.mPanelContainer.addEventListener("mousedown", autocopyStart, false);
gBrowser.mPanelContainer.addEventListener("mouseup", autocopyStop, false);
var statusbarpanel = document.getElementById("urlbar-icons").appendChild(document.createElement("statusbarpanel"));;
statusbarpanel.setAttribute("id", "autocopy-statusbarpanel");
statusbarpanel.setAttribute("class", "statusbarpanel-iconic");
// statusbarpanel.insertBefore(newItem refChild);//
statusbarpanel.setAttribute("onclick", '\
if(event.button==0) {\
var prefs = Cc["@mozilla.org/preferences-service;1"].getService(Ci.nsIPrefBranch);\
var autocopyState = prefs.getIntPref("userChrome.autocopy.autocopyState");\
prefs.setIntPref("userChrome.autocopy.autocopyState", (autocopyState+1)%3);\
}\
');
function refreshStatus() {
var prefs = Cc["@mozilla.org/preferences-service;1"].getService(Ci.nsIPrefBranch);
var autocopyState = prefs.getIntPref("userChrome.autocopy.autocopyState");
var statusbarpanel = document.getElementById("autocopy-statusbarpanel");
statusbarpanel.setAttribute("src", autocopyImages[autocopyState%3]);
statusbarpanel.tooltipText = autocopyTooltips[autocopyState%3];
}
refreshStatus();
var observer = {
observe:function(subject, topic, prefName) {refreshStatus();}
};
prefs.QueryInterface(Ci.nsIPrefBranchInternal).addObserver("userChrome.autocopy.autocopyState", observer, false);
})();

复制代码

显示全部楼层 · 发表于 2018-1-6 23:18:19

527907615 发表于 2018-1-6 20:08
是一个火狐的UC脚本AutoCopyButton.uc，选中文字自动复制到剪贴板

你复制到的内容正常吗？
你粘贴上来，我就不用试火狐的脚本了。

显示全部楼层 · 发表于 2018-1-7 00:09:05

本帖最后由 527907615 于 2018-1-7 00:12 编辑

kfk 发表于 2018-1-6 23:18
你复制到的内容正常吗？
你粘贴上来，我就不用试火狐的脚本了。

这样的咯“【综漫/衔接/燃】--激燃交响曲”

双击就可以全选了

显示全部楼层 · 发表于 2018-1-7 00:47:09

呃……抱歉……前面我以为你说的是真正的“网页标题”，所以就用了一下“另存为”，结果\被转换成了_，所以我还以为没有非法字符呢……

显示全部楼层 · 发表于 2018-1-7 21:27:41

来人不接你这茬，你是不是@错了？

显示全部楼层 · 发表于 2018-1-8 19:08:14

本帖最后由 kfk 于 2018-1-11 20:32 编辑

注意：此版不完美，结构也不好。
新版在 53楼：
https://bbs.kafan.cn/forum.php?m ... 109806&pid=41306765

改好了，你试试。

改动说明：

若剪贴板中无文字，则询问，以免莫明其妙。

处理非法字符（用的是简单的Replace语句，一符一行，便于你自己更改）：
▲默认将\/:*?"<>|替换成全角，以接近原貌。
▲默认将换行符替换成句号。这样你可以一次复制多行文字，自动并成一行。

支持批量。
重名会加序号。

vbs：

代码：

Set oArgs = WScript.Arguments
If oArgs.Count = 0 Then WScript.Quit
sText = CreateObject("htmlfile").ParentWindow.ClipboardData.GetData("text")
If IsNull(sText) Then
sText = InputBox("剪贴板中无文字", WScript.ScriptName)
If sText = "" Then WScript.Quit
End If
sText = Replace(sText, "\", "＼")
sText = Replace(sText, "/", "／")
sText = Replace(sText, ":", "：")
sText = Replace(sText, "*", "＊")
sText = Replace(sText, "?", "？")
sText = Replace(sText, """", "”")
sText = Replace(sText, "<", "＜")
sText = Replace(sText, ">", "＞")
sText = Replace(sText, "|", "｜")
sText = Replace(sText, vbCrLf, "。")
sText = Replace(sText, vbCr, "。")
sText = Replace(sText, vbLf, "。")
Set oFSO = CreateObject("Scripting.FileSystemObject")
For i = 0 To oArgs.Count - 1
If oFSO.FileExists(oArgs.Item(i)) Then
sExtName = "." & oFSO.GetExtensionName(oArgs.Item(i))
If sExtName = "." Then sExtName = ""
j=1 : sN=""
Do
If j>1 Then sN = " {" & j
sName = sText & sN & sExtName
j=j+1
Loop While oFSO.FileExists(sName)
Set oItem = oFSO.GetFile(oArgs.Item(i))
oItem.Name = sName
ElseIf oFSO.FolderExists(oArgs.Item(i)) Then
j=1 : sN=""
Do
If j>1 Then sN = " {" & j
sName = sText & sN
j=j+1
Loop While oFSO.FolderExists(sName)
Set oItem = oFSO.GetFolder(oArgs.Item(i))
oItem.Name = sName
End If
Next

复制代码

显示全部楼层 · 发表于 2018-1-10 02:52:12

kfk 发表于 2018-1-8 19:08
改好了，你试试。

改动说明：

试用过了很不错，不知可否再完善两点

▲如果有多个字幕文件格式相同自动在文件名后加序号。这里应该还要在序号的前面加 “ . ”因为序号的前面要带这个点 . potplayer才能自动识别这些文件为候选字幕，如果没这个点 . 播放器只会加载第一个字幕其它的都识别不了。
▲如果文件己存在会更名失败能跳过或忽略继续执行其它文件更名不（因为剪贴板里的内容有时可能会跟其中一个文件的名称一致）

显示全部楼层 · 发表于 2018-1-10 18:04:25

527907615 发表于 2018-1-10 02:52
试用过了很不错，不知可否再完善两点
▲如果有多个字幕文件格式相同自动在文件名后加序号。这 ...

好，我再改。

你的图中，看上去.的前后有空格，这是必须的吗？

[系统] 请问大家有见过创建快捷方式的批处理不

评分

本帖子中包含更多资源

本帖子中包含更多资源

本帖子中包含更多资源