[神梦] 【插件】神梦填表插件 SmWeb.dll，【IE】【谷歌】【网页】【元素... [复制链接]

真的很不错

行行行

1111111111111111

不错哦看看

zhenhao

封装的超级厉害

66666666666666666666666666666666666666

插件】神梦填表插件 SmWeb.dll，【IE】【谷歌】【网页】【元素】{v1.0.0.0}[2019.4.26]修改

    
1#
字体大小:发表于 2018-02-07 17:47 | |只看楼主
神梦填表插件COM版出来了！

支持 IE、谷歌浏览器

支持跨域夸框架穿透填表

【元素智能定位】

【上传文件】

【处理弹窗】

【滑动验证码】

【执行JS】




插件预览







演示例子






插件例子
'【神梦填表插件 SmWeb.dll 演示按键例子】
'作者：神梦无痕
'ＱＱ：1042207232
'Ｑ群：624655641

'插件版本号
TracePrint "插件版本号：" & Plugin.SmWeb.Ver()


TracePrint("**********************【神梦填表插件 SmWeb.dll 演示按键例子】**********************")
//生成插件帮助文档
TracePrint(Plugin.SmWeb.About())

//初始化插件
Call Plugin.SmWeb.Init()


绑定句柄数组 = Array("IE.exe", "Chrome.exe")
For iw = 0 To UBound(绑定句柄数组)
//绑定浏览器
Tips("正在绑定浏览器：" & 绑定句柄数组(iw)) : TracePrint(运行状态)
If Plugin.SmWeb.Bind(绑定句柄数组(iw)) = False Then
MsgBox "出错，绑定浏览器失败！"
ExitScript
End If


Tips("打开 SmWeb 测试页面") : TracePrint(运行状态)
Call Plugin.SmWeb.TabGo("http://127.0.0.1:8008/SmWeb.html")
Call Plugin.SmWeb.TabIsReady(30) '判断网页是否加载完毕
Delay(2000)


'网页截图
Tips("【网页截图】：截取区域 0, 0, 400, 200 范围图像保存到文件 C:\1.png") : TracePrint(运行状态)
Call Plugin.SmWeb.TabSnapShot(0, 0, 400, 200, "C:\1.png")
Delay(2000)


'【预处理弹窗】：提前为弹出窗口做准备（点击确定按钮）
Call Plugin.SmWeb.TabGo("#TabPreDialog")elay(1000)
Tips("【预处理弹窗】：提前为弹出窗口做准备（三个连续弹窗，需要点击三个按钮：true=确定；false=取消）") : TracePrint(运行状态)
Call Plugin.SmWeb.TabPreDialog("神梦无痕", "true|false|true")
'点击按钮，弹出窗口
Tips("点击【无返回弹窗】") : TracePrint(运行状态)
Call Plugin.SmWeb.HtmlClick("#myPreDialog_alert")
Tips("点击【有返回值弹窗】") : TracePrint(运行状态)
Call Plugin.SmWeb.HtmlClick("//*[@id='myPreDialog_confirm']")
Tips("点击【可输入内容弹窗】") : TracePrint(运行状态)
Call Plugin.SmWeb.HtmlClick("id:myPreDialog_prompt")
'获取弹窗内容
Tips("【获取弹窗内容】：" & Plugin.SmWeb.TabGetDialog()) : TracePrint(运行状态)
Delay (2000)


'元素点击
Call Plugin.SmWeb.TabGo("#HtmlClick")elay(1000)
Tips("【点击元素】：" & Plugin.SmWeb.HtmlClick("id:myClick")) : TracePrint(运行状态)
Delay(1000)


'输入文本内容
Call Plugin.SmWeb.TabGo("#HtmlInput")elay(1000)
Tips("【输入框】：神梦无痕") : TracePrint(运行状态)
Call Plugin.SmWeb.HtmlInput("神梦无痕", "#myInput")
Delay(1000)


'勾选单/复选框
Call Plugin.SmWeb.TabGo("#HtmlCheck")elay(1000)
Tips("【单选框】：勾选") : TracePrint(运行状态)
Call Plugin.SmWeb.HtmlCheck(True, "[id='myRadio']")
Tips("【复选框】：勾选") : TracePrint(运行状态)
Call Plugin.SmWeb.HtmlCheck(True, "//*[@id='myCheck']")
Delay(1000)


'设置下拉框
Call Plugin.SmWeb.TabGo("#HtmlSelect")elay(1000)
Tips("【下拉框】：香蕉") : TracePrint(运行状态)
Call Plugin.SmWeb.HtmlSelect("香蕉", "id:mySelect")
Delay(1000)


'设置元素信息
Call Plugin.SmWeb.TabGo("#HtmlSet"):Delay(1000)
Tips("【设置信息】：value") : TracePrint(运行状态)
Call Plugin.SmWeb.HtmlSet("value", "【作者】：神梦无痕", "id:mySet")
Delay(1000)
Tips("【设置信息】：name") : TracePrint(运行状态)
Call Plugin.SmWeb.HtmlSet("name", "QQ_1042207232", "id:mySet")
Delay(1000)


'获取元素信息
Tips("【获取信息】：value") : TracePrint(运行状态)
Tips ("　　　　　　：" & Plugin.SmWeb.HtmlGet("value", "id:mySet")) : TracePrint (运行状态)
Delay(1000)
Tips("【获取信息】：outerHTML") : TracePrint(运行状态)
Tips("　　　　　　：" & Plugin.SmWeb.HtmlGet("outerHTML", "id:mySet")) : TracePrint(运行状态)
Delay(1000)


'滚动到指定元素
Call Plugin.SmWeb.TabGo("#HtmlScroll"):Delay(2000)
Tips("【滚动定位】：" & Plugin.SmWeb.HtmlScroll("name:HtmlHover")) : TracePrint(运行状态)
Delay(2000)


'鼠标在元素上悬停
Tips("【元素悬停】：" & Plugin.SmWeb.HtmlHover("#myHover")) : TracePrint(运行状态)
Delay(1000)


'滑动验证码
Call Plugin.SmWeb.TabGo("#HtmlSwipe"):Delay(1000)
Tips("【滑动验证】：" & Plugin.SmWeb.HtmlSwipe(128, 420, 400, 420, "#Swipe_btn")) : TracePrint(运行状态)
Delay(1000)



'执行元素事件
Call Plugin.SmWeb.TabGo("#HtmlEvent"):Delay(1000)
Tips("【执行事件】：鼠标左键按下") : TracePrint(运行状态)
Call Plugin.SmWeb.HtmlEvent("mousedown", "#myEvent")
Tips("【执行事件】：输入框改变") : TracePrint(运行状态)
Call Plugin.SmWeb.HtmlEvent("change", "#myEvent")
Delay(1000)


'上传图片文件
Call Plugin.SmWeb.TabGo("#HtmlInputFile") : Delay(1000)
Tips("【图片路径】：C:\1.png") : TracePrint(运行状态)
Call Plugin.SmWeb.HtmlInputFile("C:\1.png", "id:myInputFile")
Delay(1000)


'添加/还原元素边框
Call Plugin.SmWeb.TabGo("#HtmlBorder") : Delay(1000)
Tips("【添加边框】：" & Plugin.SmWeb.HtmlBorder(True, "//*[@id='myBorder']")) : TracePrint(运行状态)
Delay(1000)
Tips("【还原边框】：" & Plugin.SmWeb.HtmlBorder(False, "//*[@id='myBorder']")) : TracePrint(运行状态)
Delay(1000)


'启用/禁用元素
Call Plugin.SmWeb.TabGo("#HtmlEnabled") : Delay(1000)
Tips("【禁用元素】：" & Plugin.SmWeb.HtmlEnabled(False, "#myEnabled")) : TracePrint(运行状态)
Delay(1000)
Tips("【启用元素】：" & Plugin.SmWeb.HtmlEnabled(True, "#myEnabled")) : TracePrint(运行状态)
Delay(1000)


'显示/隐藏元素
Call Plugin.SmWeb.TabGo("#HtmlVisible") : Delay(1000)
Tips("【隐藏元素】：" & Plugin.SmWeb.HtmlVisible(False, "id:myVisible")) : TracePrint(运行状态)
Delay(1000)
Tips("【显示元素】：" & Plugin.SmWeb.HtmlVisible(True, "id:myVisible")) : TracePrint(运行状态)
Delay(1000)


'判断元素是否启用
Call Plugin.SmWeb.TabGo("#HtmlIsEnabled") : Delay(1000)
Tips("【是否启用】：" & Plugin.SmWeb.HtmlIsEnabled("[id='myIsEnabled']")) : TracePrint(运行状态)
Delay(1000)


'判断元素是否显示
Call Plugin.SmWeb.TabGo("#HtmlIsVisible") : Delay(1000)
Tips("【是否显示】：" & Plugin.SmWeb.HtmlIsVisible("[id='myIsVisible']")) : TracePrint(运行状态)
Delay(1000)


'保存验证码图片
Call Plugin.SmWeb.TabGo("#HtmlImage") : Delay (1000)
Tips ("【保存验证码】：C:\yzm.jpg") : TracePrint (运行状态)
Call Plugin.SmWeb.HtmlImage("C:\yzm.jpg", "id:myImage")
Delay (1000)


'获取元素坐标
Call Plugin.SmWeb.TabGo("#HtmlOffset") : Delay (1000)
Tips ("【元素坐标】：" & Plugin.SmWeb.HtmlOffset("id:myOffset")) : TracePrint (运行状态)
Delay (1000)


'获取 CSS 选择器
Call Plugin.SmWeb.TabGo("#HtmlReadCSS") : Delay(1000)
Tips("【CSS 选择器】：" & Plugin.SmWeb.HtmlReadCSS("body > table:nth-child(71) > tbody > tr:nth-child(6) > td > input")) : TracePrint(运行状态)
Delay(1000)


'获取 XPath 选择器
Call Plugin.SmWeb.TabGo("#HtmlReadXPath") : Delay(1000)
Tips("【XPath选择器】：" & Plugin.SmWeb.HtmlReadXPath("/html/body/table[72]/tbody/tr[6]/td/input")) : TracePrint(运行状态)
Delay(1000)


'获取 WQM 选择器
Call Plugin.SmWeb.TabGo("#HtmlReadWQM") : Delay(1000)
Tips("【WQM 选择器】：" & Plugin.SmWeb.HtmlReadWQM("tag:INPUT&index:29")) : TracePrint(运行状态)
Delay(1000)


'设置表格内容
Call Plugin.SmWeb.TabGo("#myTable") : Delay(1000)
Tips("【设置1行一列】：神梦无痕") : TracePrint(运行状态)
Call Plugin.SmWeb.HtmlTable(0, 1, 1, "神梦无痕", "#myTable")
Delay(1000)
Tips("【设置2行一列】：小雪") : TracePrint(运行状态)
Call Plugin.SmWeb.HtmlTable(0, 2, 1, "小雪", "//*[@id='myTable']")
Delay(1000)
Tips("【设置3行二列】：女") : TracePrint(运行状态)
Call Plugin.SmWeb.HtmlTable(0, 3, 2, "女", "id:myTable")
Delay(1000)


'获取表格内容
Call Plugin.SmWeb.TabGo("#myTable") : Delay(1000)
Tips ("【获取1行一列】：" & Plugin.SmWeb.HtmlGetTable(0, 1, 1, "#myTable")) : TracePrint (运行状态)
Delay(1000)
Tips ("【获取2行一列】：" & Plugin.SmWeb.HtmlGetTable(0, 2, 1, "//*[@id='myTable']")) : TracePrint (运行状态)
Delay(1000)
Tips("【获取3行二列】：" & Plugin.SmWeb.HtmlGetTable(0, 3, 2, "id:myTable")) : TracePrint(运行状态)
Delay(1000)


'获取列表内容
Call Plugin.SmWeb.TabGo("#HtmlGetList") : Delay(1000)
Tips ("【获取索引 0 内容】：" & Plugin.SmWeb.HtmlGetList(0, "#myGetList")) : TracePrint (运行状态)
Delay(1000)
Tips ("【获取索引 1 内容】：" & Plugin.SmWeb.HtmlGetList(1, "//*[@id='myGetList']")) : TracePrint (运行状态)
Delay(1000)
Tips("【获取索引 2 内容】：" & Plugin.SmWeb.HtmlGetList(2, "id:myGetList")) : TracePrint(运行状态)
Delay (1000)


'退出浏览器
Call Plugin.SmWeb.TabGo("#Quit") : Delay(1000)
Tips("正在退出浏览器！") : TracePrint(运行状态)
Call Plugin.SmWeb.Quit()
Delay (1000)
Next
MsgBox "脚本执行完毕！"

Sub Tips(提示)
运行状态 = 提示
Call Plugin.Msg.Tips(提示)
End Sub
复制代码



插件下载
QQ 群号：624655641
百度网盘: https://pan.baidu.com/s/1QdQU6J4h_6WNUIkGqdSR1w?pwd=n4w7
提取码(回复可见)：
***** 该内容需您回复才可浏览 *****
点评

神梦科技 【神梦填表】实战 - 让网站承认插件输入框输入 发表于 2022/3/18 12:44:52

神梦科技 【神梦教程】实战 - 如何安装神梦填表插件 发表于 2022/3/11 20:29:17

神梦科技 【神梦教程】填表实战 - 按键精灵讨论自动签到[源码] http://bbs.anjian.com/showtopic-698053-1.aspx 发表于 2022/3/4 23:03:51

000000000000000000000000000000000

第一次使用沈梦插件

谢谢分享

怎么看不到

lfklkasdjklfjaskfjskajkfjdsakfjksajfksakfjs

学习一下

看看

感谢LZ分享

很难

6666666