‘壹’ 请问网页里怎么添加脚本
<script></script>这个是脚本标签，就是在网页头部（标签<head></head>）内添加对应的script标签，其中参数为lanange（
脚本语言
），type（脚本类型），src（
脚本文件
路径）。这样就OK了。
‘贰’ 网页脚本到底是什么意思
脚本其实一组操作的集合，网页脚本像VB脚本和Java脚本
.vbs
或
.js
它们都是纯文本文件可以用记事本打开查看它的代码。只不过是用了VB或Java的语法。它们在客户端机器上执行。
‘叁’ 怎样查看网站的脚本语言
在当前网页里的工具栏里点
查看--------源文件
就可以看到这一页的代码了,当然有的网页是防止你看的
‘肆’ 如何获取网页脚本
右键网页 选择审查元素 代码就出来了
‘伍’ 怎样查看网页所用的脚本技术
很简单，只要看打开的网页的地址栏的结尾，
PHP，ASP，.net,JSP或html
‘陆’ 按键精灵在网页查找关键字的脚本是什么
用这个子程序：
Else
xmlUrl = 网页地址
End if
Set xmlHttp = CreateObject("Microsoft.XMLHTTP")
xmlHttp.Open "Get", xmlUrl, False
xmlHttp.Send
xmlBody = xmlHttp.ResponseBody
Set xmlHttp = Nothing
获得网页源文件 = ""
If Len(xmlBody) = 0 Then Exit Function
Set ObjStream = CreateObject("Adodb.Stream")
With ObjStream
.Type = 1
.Mode = 3
.Open
.Write xmlBody
.Position = 0
.Type = 2
.Charset = "UTF-8"
BytesToBstr = .ReadText
.Close
End With
Set ObjStream = Nothing
获得网页源文件 = BytesToBstr
End Function；
‘柒’ 如何查看Web页面当中的一些图像切换特效所对应的js脚本
一般先看 它页面引入的脚本插件，这个要经验
通过google F12,可以 看sources看有哪些脚本 引入了，
第二就是看这个图片上一级的div或者 ul这种大块的class名 或者 id名，一般都 会写上特别的名称，也可以查找页面，看是否有其他地方出现，一般脚本 会有的。
其实 这都 是些经验，一点点找咯。
‘捌’ 求在按键精灵中实现网页刷新与查找特定颜色并点击的脚本
新建，找开按键抓抓，抓取，抓取任意绿色，然后开始做脚本
Do
MoveTo “网上约车”按钮坐标
Delay 50
LeftClick 1
Delay 500
FindColorEx 0,0,1024,768,"0000FF",0,0.9,intX,intY
//0,0,1024,768 改为会出现绿色的区域
//"0000FF"改为你抓取的绿色，引号不能少
If intX > 0 And intY > 0 Then
MoveTo intx + 5, inty + 5
Delay 50
LeftClick 1
Delay 200
MessageBox "出现了"
End If
Loop
‘玖’ 怎么在页面上看JS脚本
鼠标右键点击页面，选择查看源代码。里面就有js脚本。
但通过引用的脚本是看不到的
‘拾’ 按键精灵在网页查找关键字的脚本
'能！
'用这个子程序
Function 获得网页源文件(网页地址)
//说明：支持远程获取文本内容，如：MsgBox lib.网络.获得网页源文件("http://www.jdyou.com/test.txt")
//例子：MsgBox lib.网络.获得网页源文件("http://www.jdyou.com")
Dim xmlHttp, xmlBody, xmlUrl
Dim ThisCharCode ,NextCharCode ,BytesToBstr
If InStr(网页地址, "http://") = 0 Then
xmlUrl = "http://" & 网页地址
Else
xmlUrl = 网页地址
End if
Set xmlHttp = CreateObject("Microsoft.XMLHTTP")
xmlHttp.Open "Get", xmlUrl, False
xmlHttp.Send
xmlBody = xmlHttp.ResponseBody
Set xmlHttp = Nothing
获得网页源文件 = ""
If Len(xmlBody) = 0 Then Exit Function
Set ObjStream = CreateObject("Adodb.Stream")
With ObjStream
.Type = 1
.Mode = 3
.Open
.Write xmlBody
.Position = 0
.Type = 2
.Charset = "UTF-8"
BytesToBstr = .ReadText
.Close
End With
Set ObjStream = Nothing
获得网页源文件 = BytesToBstr
End Function
'比如：你想查找到有"网络"字眼你就弹出一对话框，那么可以如下实现.
Text=获得网页源文件("http://www..com")
if Instr(Text,"网络")>0 then
messagebox "测试弹出对话框"
End if
'以上所有文字 你复制到你按键精灵代码编辑器里一试便知。