ICDYCT / 我能, 你也行

本来  huashengdun/webssh 就有带参数的功能. 但是对于小白来说, 使用起来有障碍, 特别是, 里面的密码要经过 base64 转化. 所以增加了一个按钮, 用以生成一个带参数的链接. 这个链接可以添加到浏览器的书签栏, 下次直接按一下就SSH登录了. 演示视频 有这么几种应用的方案 1. 部署 Github 项目 https://github.com/crazypeace/webssh/ 比如, koyeb 就是这样的, 参考教程:  https://zelikk.blogspot.com/2023/10/huashengdun-webssh-codesandbox.html Demo https://flyio-webssh.fly.dev/ https://ssh.icdyct.nyc.mn/ http://ssh.icdyct.live/ 2. 使用油猴脚本 https://github.com/crazypeace/huashengdun-webssh/raw/master/user.js/Build-SSH-Link.user.js 源码  https://github.com/crazypeace/huashengdun-webssh/blob/master/user.js/Build-SSH-Link.user.js

添加 tab 其它部分的具体修改步骤和 v2rayN v6 差不多 , 不想写了. Github:  https://github.com/crazypeace/v2rayN-3.29-VLESS/releases/tag/v3.29.0.5 ======== update 2023-11-18 发现一个问题，如果关闭Socks下一跳，进行测速时，总是失败，而节点本身是没问题的，可以正常使用。 调试发现，测速时，需要新启动一个*ray进程, 相应地需要新构建它的配置文件config.json. 所用到的函数是 V2rayConfigHandler.GenerateClientSpeedtestConfigString 里面需要做一样的处理, 在加载了SampleClient的JSON文件之后, 需要调用 socksOut 函数来设置下一跳Socks相关的参数. 注意, 根据此函数的逻辑, 加载了JSON两次, 所以这两次都要调用一下 socksOut 函数. 代码合Github了:  https://github.com/crazypeace/v2rayN-3.29-VLESS/ 没有打包新的Release

需求 https://t.me/blacktechsharing/183161 思路 二维码实际上就是以一种图片的方式写的一串字符. 这串字符可以是一个网址. 既然这个二维码图片已经发给别人了, 你不可以跑到别人的电脑或者手机里面去删掉图片, 那么"一次性二维码"是怎么实现的呢? 二维码图片不变, 那么二维码对应的网址A不变. 你访问网址A就是访问一个服务器. 这个服务器可以让来访问网址A的人都跳转到一个新的网址B. 我们定义网址B才是真正有实际意义的网址. 让服务器只允许第一次访问网址A的人跳转到网址B, 以后再来访问网址A, 跳转都失效. 这样就实现了 "一次性二维码".

感谢 https://github.com/EasyChris/Url-Shorten-Worker 实现基本的计数功能. 我在此基础上, 继续优化了操作页面, 可以在操作页面读出访问计数, 不需要到KV后台去看访问计数了. 效果

问题  想调试 Url-Shorten-Worker, 把 index.html 保存在本地电脑上, 调用服务器https://1way.eu.org/的API, 报错 Access to fetch at 'https://1way.eu.org/bodongshouqulveweifengci' from origin 'null' has been blocked by CORS policy: Request header field content-type is not allowed by Access-Control-Allow-Headers in preflight response.

根据 换行, |, 空格来分割文本文件, 生成字符串数组 去掉数组中的空元素 以 | 作为分隔符, 把数据拼回一个单行的字符串 前后分别添加 / 和 /ig 根据 换行, 逗号, 空格来分割文本文件, 生成字符串数组 去掉数组中的空元素 以 逗号 作为分隔符, 把数据拼回一个单行的字符串 ' 定义输入输出文件 inputFile = "关键字.txt" outputFile = "outputkey.txt" ' 打开文件 Set fs = CreateObject("Scripting.FileSystemObject") Set f = fs.OpenTextFile(inputFile, 1) ' 读取文件内容 strData = f.ReadAll ' 关闭文件 f.Close ' 将 换行 替换为 | strData = Replace(strData, vbCrLf, "|") ' 将 空格 替换为 | strData = Replace(strData, " ", "|") ' 以 | 为分隔符, 将文件内容分隔为字符串数组 arrData = Split(strData, "|") ' 去重 arrData = uniqFE(arrData) ' 将字符串数组用 | 为间隔拼起来 strData = Join(arrData, "|") '在开头添加 / strData = "/" + strData '在末尾添加 /ig strData = strData + "/ig" ' 打开文件 Set fs = CreateObject("Scripting.FileSystemObject") Set f = fs.OpenTextFile(outputFile, 2, true) ' 写入文件 f.write strData ' 关闭文件 f.Close ' returns an arra...

VBS 的数组没有去除重复值的方法 在网上搜了一圈， 找到一个可以无脑抄的方案 感谢  https://stackoverflow.com/questions/13743165/how-to-get-unique-values-from-a-list-of-values-using-vbscript#13744080 ' returns an array of the unique items in for-each-able collection fex Function uniqFE(fex)   Dim dicTemp : Set dicTemp = CreateObject("Scripting.Dictionary")   Dim xItem   For Each xItem In fex       dicTemp(xItem) = 0   Next   uniqFE = dicTemp.Keys() End Function