精易论坛

标题: 生成泛链接问题-本人小白,求助大佬 [打印本页]

作者: 卡夫卡的熊    时间: 2025-5-19 21:56
标题: 生成泛链接问题-本人小白,求助大佬
编辑框1放多个链接。   设个编辑框2 .填写链接要求  {数字1-9}  {大写字母1-9}   {小写字母1-9}   {大小写字母1-9}  {随机地区}   {日期}    {域名}


域名等于  编辑框1.域名一行一个    比如域名   //{域名}/888/{大写字母=5}/{小写字母=5}/{数字=5}/{日期}{随机地区}.h




                                域名就取编辑框1的域名     /888/  这是填的内容。 也带上随意在哪个位置加任意字符 都加 生成后都加上   大写字母5   就是5位大写字母  小写字母5 -5位小写字母
                                数字8    就取8位随机数   /日期  就取当天日期  20250219   【8位数的日期】  随机地区 我上传到常量里了




本人小白。  跪求大佬帮忙。   用ai 弄一天了  。  不是这里有问题就是哪里有问题 , 头搞麻了

求助大佬.e

10.43 KB, 下载次数: 4, 下载积分: 精币 -1 枚


作者: zainex    时间: 2025-5-19 21:56
效果,跟写代码一样:

完整代码.zip (5.71 KB, 下载次数: 2)

作者: 卡夫卡的熊    时间: 2025-5-19 21:57
补充一句    下面还有个  编辑框  输入多少 , 就 每个域名就生成多少条,  生成结果保存到根目录 txt文件里   跪求了
作者: haoren1212    时间: 2025-5-19 22:48
  
子程序名返回值类型公开备 注
取随机链接文本型 
参数名类 型参考可空数组备 注
域名文本型
变量名类 型静态数组备 注
地区数组文本型0
局_返回文本型 
地区数组 = 分割文本 ( #常量1, #换行符, )
局_返回 = “https://” + 域名 + “/888/”文本_取随机字符 (5, 4)“/”文本_取随机字符 (5, 2)“/”文本_取随机字符 (5, 1)“/”时间_到文本 (, 3, 1, ) + 地区数组 [汇编_取随机数 (1, 取数组成员数 (地区数组))]
返回 (局_返回)
子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
域名数组文本型0
i整数型 
域名数组 = 分割文本 (编辑框1.内容, #换行符, )
计次循环首 (取数组成员数 (域名数组), i)
调试输出 (取随机链接 (域名数组 [i]))
计次循环尾 ()


i支持库列表   支持库注释   
spec特殊功能支持库


作者: haoren1212    时间: 2025-5-19 23:00
  
子程序名返回值类型公开备 注
取随机链接文本型 
参数名类 型参考可空数组备 注
域名文本型
变量名类 型静态数组备 注
地区数组文本型0
局_返回文本型 
地区数组 = 分割文本 ( #常量1, #换行符, )
局_返回 = “https://” + 域名 + “/888/”文本_取随机字符 (5, 4)“/”文本_取随机字符 (5, 2)“/”文本_取随机字符 (5, 1)“/”时间_到文本 (, 3, 1, ) + 地区数组 [汇编_取随机数 (1, 取数组成员数 (地区数组))]
返回 (局_返回)
子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
域名数组文本型0
i整数型 
x整数型 
局_临时文本文本型 
局_返回文本文本型 
域名数组 = 分割文本 (编辑框1.内容, #换行符, )
计次循环首 (取数组成员数 (域名数组), i)
计次循环首 (到整数 (编辑框3.内容), x)
局_临时文本 = 取随机链接 (域名数组 [i])
局_返回文本 = 局_返回文本 + 局_临时文本 + #换行符
计次循环尾 ()
写到文件 (取运行目录 ()“\” + 域名数组 [i]“.txt”, 到字节集 (局_返回文本))
局_返回文本 = “”
计次循环尾 ()


作者: haoren1212    时间: 2025-5-19 23:06
用我后面发的

1747667137115.jpg (234.92 KB, 下载次数: 0)

1747667137115.jpg

作者: 卡夫卡的熊    时间: 2025-5-19 23:36
haoren1212 发表于 2025-5-19 23:06
用我后面发的

局_临时文本 = 取随机链接 (域名数组 <i>)    我这易语言不知道什么情况,  复制代码 总报这个错
   大佬 求把链接生成到一个txt里。   求源码    复制总报错
作者: 卡夫卡的熊    时间: 2025-5-19 23:40
卡夫卡的熊 发表于 2025-5-19 23:36
局_临时文本 = 取随机链接 (域名数组 )    我这易语言不知道什么情况,  复制代码 总报这个错
   大佬  ...

{随机}   里面的内容 好像不能  随意换位置吧

作者: 卡夫卡的熊    时间: 2025-5-19 23:46
haoren1212 发表于 2025-5-19 23:06
用我后面发的

比如说 这个   ;//{域名}/888/{大写字母=5}/{小写字母=5}/{数字=5}/{日期}{随机地区}
  这些位置随意换   {域名}{大写字母=5}{数字=5}    这些{  } 括号里的内容随意换位置。  相加什么固定内容打在编辑框里。   

只按照编辑框3 所填的内容生成  求大佬
作者: haoren1212    时间: 2025-5-19 23:46
数组的[]变成<>了,手动改一下,或者下载附件
你需要先了解一下易语言再来提问

求助大佬.e

965.2 KB, 下载次数: 2, 下载积分: 精币 -1 枚


作者: zainex    时间: 2025-5-19 23:48
你要实现的肯定不是上面那种在固定位置随机生成链接的功能,否则也不会问了一天的大语言模型,也没什么结果。
你要实现的应该是那种可以自己设置规则来随机生成链接的功能,简单的说,就跟写代码一样,写一个规则告诉它,它就给你生成一个链接出来。
要实现这个的功能,你可以按照自制编程语言的做法来干,也就是词法分析、语法分析、、、等等。
但你这个功能其实还算简单,因此只需涉及分词即可:
  
子程序名返回值类型公开备 注
生成链接文本型 
参数名类 型参考可空数组备 注
规则文本文本型
当前域名文本型
随机地区文本文本型
变量名类 型静态数组备 注
正则正则表达式 
搜索结果搜索结果0
整数型 
域名正则表达式 
大写字母正则表达式 
小写字母正则表达式 
数字正则表达式 
日期正则表达式 
随机地区正则表达式 
成员文本型 
结果文本型 
数量整数型 
时间日期时间型 
正则.创建 (“\{域名\}|\{大写字母=[0-9]+\}|\{小写字母=[0-9]+\}|\{数字=[0-9]+\}|\{日期\}|\{随机地区\}|.”, )
域名.创建 (“\{域名\}”, )
大写字母.创建 (“\{大写字母=([0-9]+)\}”, )
小写字母.创建 (“\{小写字母=([0-9]+)\}”, )
数字.创建 (“\{数字=([0-9]+)\}”, )
日期.创建 (“\{日期\}”, )
随机地区.创建 (“\{随机地区\}”, )
搜索结果 = 正则.搜索全部 (规则文本)
置随机数种子 ()
计次循环首 (取数组成员数 (搜索结果), 数)
成员 = 搜索结果 [].取匹配文本 (规则文本, )
判断 (域名.匹配 (成员))
结果 = 结果 + 当前域名
判断 (大写字母.匹配 (成员))
数量 = 到整数 (大写字母.搜索 (成员, 1, ).取子匹配文本 (成员, 1, ))
计次循环首 (数量, )
结果 = 结果 + 字符 (取随机数 (取代码 (“A”, ), 取代码 (“Z”, )))
计次循环尾 ()
判断 (小写字母.匹配 (成员))
数量 = 到整数 (小写字母.搜索 (成员, 1, ).取子匹配文本 (成员, 1, ))
计次循环首 (数量, )
结果 = 结果 + 字符 (取随机数 (取代码 (“a”, ), 取代码 (“z”, )))
计次循环尾 ()
判断 (数字.匹配 (成员))
数量 = 到整数 (数字.搜索 (成员, 1, ).取子匹配文本 (成员, 1, ))
计次循环首 (数量, )
结果 = 结果 + 字符 (取随机数 (取代码 (“0”, ), 取代码 (“9”, )))
计次循环尾 ()
判断 (日期.匹配 (成员))
时间 = 取现行时间 ()
结果 = 结果 + 格式化文本 (“%d%.2d%.2d”, 取年份 (时间), 取月份 (时间), 取日 (时间))
判断 (随机地区.匹配 (成员))
结果 = 结果 + 随机地区文本 [取随机数 (1, 取数组成员数 (随机地区文本))]
结果 = 结果 + 成员

计次循环尾 ()
返回 (结果)
子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
域名文本文本型0
规则文本文本型 
整数型 
结果文本型 
单次数量整数型 
随机地区文本文本型0
文件名文本型 
节点节点 
链接文本型 
域名文本 = 分割文本 (编辑框1.内容, #换行符, )
如果真 (取数组成员数 (域名文本) = 0)
返回 ()
随机地区文本 = 分割文本 ( #常量1, #换行符, )
规则文本 = 编辑框2.内容
单次数量 = 到整数 (编辑框3.内容)
计次循环首 (取数组成员数 (域名文本), 数)
计次循环首 (单次数量, )
' 强制去重复,可能导致死循环,不建议使用
' 循环判断首()
' 链接 = 生成链接 (规则文本, 域名文本 [], 随机地区文本)
' 循环判断尾 (节点.加入属性 (链接, 0))
链接 = 生成链接 (规则文本, 域名文本 [], 随机地区文本)
结果 = 结果 + 链接 + #换行符
计次循环尾 ()
计次循环尾 ()
文件名 = 取临时文件名 (取运行目录 ())
文件名 = 取文本左边 (文件名, 取文本长度 (文件名) - 3)“txt”
调试输出 (文件名)
如果 (写到文件 (文件名, 到字节集 (结果)))
信息框 (文件名, #信息图标, “已保存至:”, )
信息框 (“保存失败!”, #错误图标, “提示:”, )
调试输出 (结果)


i支持库列表   支持库注释   
RegEx正则表达式支持库
eAPI应用接口支持库
EDataStructure数据结构支持库
spec特殊功能支持库

上面的按钮被单击事件会将结果保存到一个随机名称的txt文件中。
如果你想一个域名一个文件的保存,可以将这个事件改为如下:
  
子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
域名文本文本型0
规则文本文本型 
整数型 
结果文本型 
单次数量整数型 
随机地区文本文本型0
文件名文本型 
链接文本型 
域名文本 = 分割文本 (编辑框1.内容, #换行符, )
如果真 (取数组成员数 (域名文本) = 0)
返回 ()
随机地区文本 = 分割文本 ( #常量1, #换行符, )
规则文本 = 编辑框2.内容
单次数量 = 到整数 (编辑框3.内容)
计次循环首 (取数组成员数 (域名文本), 数)
结果 = “”
文件名 = 取运行目录 ()“\” + 域名文本 []“.txt”
计次循环首 (单次数量, )
链接 = 生成链接 (规则文本, 域名文本 [], 随机地区文本)
结果 = 结果 + 链接 + #换行符
计次循环尾 ()
写到文件 (文件名, 到字节集 (结果))
调试输出 (文件名)
计次循环尾 ()


i支持库列表   支持库注释   
spec特殊功能支持库

完整代码.zip (5.71 KB, 下载次数: 0)

作者: 卡夫卡的熊    时间: 2025-5-20 00:09
zainex 发表于 2025-5-19 23:52
效果,跟写代码一样:

大佬 {大小写字母=5} 没有效果
作者: 卡夫卡的熊    时间: 2025-5-20 00:24
zainex 发表于 2025-5-19 23:52
效果,跟写代码一样:

大佬随机  大小写字母 没有添加进去   
作者: 卡夫卡的熊    时间: 2025-5-20 00:25
zainex 发表于 2025-5-19 23:52
效果,跟写代码一样:

随机大小写   这个功能没有 添加 。。其他完美
作者: zainex    时间: 2025-5-20 00:48
添加其它功能很容易实现:

新增功能.zip (5.24 KB, 下载次数: 2)

作者: haoren1212    时间: 2025-5-20 00:50
  
子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
域名数组文本型0
i整数型 
x整数型 
局_临时文本文本型 
局_返回文本文本型 
域名数组 = 分割文本 (编辑框1.内容, #换行符, )
计次循环首 (取数组成员数 (域名数组), i)
计次循环首 (到整数 (编辑框3.内容), x)
局_临时文本 = 取随机链接2 (域名数组 [i])
局_返回文本 = 局_返回文本 + 局_临时文本 + #换行符
计次循环尾 ()
写到文件 (取运行目录 ()“\” + 域名数组 [i]“.txt”, 到字节集 (局_返回文本))
局_返回文本 = “”
计次循环尾 ()
子程序名返回值类型公开备 注
取随机链接2文本型 
参数名类 型参考可空数组备 注
域名文本型
变量名类 型静态数组备 注
正则正则表达式类 
样板文本文本型 
临时文本1文本型 
临时文本2文本型 
临时文本3文本型 
字符类型整数型 
字符数量整数型 
i整数型 
地区数组文本型0
样板文本 = 编辑框2.内容
地区数组 = 分割文本 ( #常量1, #换行符, )
正则.创建 (“{(.*?)}”, 样板文本, , , , )
计次循环首 (正则.取匹配数量 (), i)
临时文本1 = 正则.取子匹配文本 (i, 1, )
如果真 (寻找文本 (临时文本1, “=”, , ) ≠ -1)
临时文本2 = 文本_取左边 (临时文本1, “=”, , )
字符数量 = 到整数 (文本_取右边 (临时文本1, “=”, , ))
如果真 (临时文本2 = “数字”)
字符类型 = 1
如果真 (临时文本2 = “小写字母”)
字符类型 = 2
如果真 (临时文本2 = “大写字母”)
字符类型 = 4
临时文本3 = 文本_取随机字符 (字符数量, 字符类型)
如果真 (临时文本1 = “域名”)
临时文本3 = 域名
如果真 (临时文本1 = “日期”)
临时文本3 = 时间_到文本 (, 3, 1, )
如果真 (临时文本1 = “随机地区”)
临时文本3 = 地区数组 [汇编_取随机数 (1, 取数组成员数 (地区数组))]
样板文本 = 文本_替换 (样板文本, 1, , , “{” + 临时文本1 + “}”, 临时文本3, , , , , , , , )
计次循环尾 ()
返回 (样板文本)

求助大佬.e

966.66 KB, 下载次数: 1, 下载积分: 精币 -1 枚






欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4