你还在手动搜索自己的商品来shua销量吗？你OUT，快来用按键精灵吧！

平台刷，怕别人圈钱跑。本人遇到过，幸好当时账户资金少，没有造成重大损失。
Q群刷，整天喊“有没有人刷啊，2单，200元”，累！

还是自己可靠，自己刷自己！

虽然现在还不知道老大是怎么刷的！是否需要自己刷自己也不得而知。没有T币购买老大的教程啊！

今天无意中进来这里，感觉不错，速度成为了会员！

闲话不说了，因为之前都是自己一个人在研究。自己刷自己，说真的，如果都手动来搜索，累啊。如果会用按键精灵的，可以减少很多工作。现在把代码贡献出来给大家。

注意事项：
一、小心搜索结果的链接是http://s8.taobao.com/********,这个是淘宝官方的淘宝客地址，你要是从这里面购买你店铺的东西，你的佣金就给淘宝了。

二、这个脚本代码适合有单独网线的用户。


等会继续编辑。。正在完善代码

新手来学习经验，很受益，会继续关注的。

真有那么神？？？楼主？  

1. //===============
   
2. //下面的网站是随便找的例子，大家可根据范例自己修改代码
   
3. //http://yiyi-waimao.taobao.com
   
4. //===============
   
5. //参数配置，只需要修改这里的参数，就可以拿来用了
   
6. Shopname       = "情花二代"        //店铺ID
   
7. Keyword        = array("quiksilver 沙滩裤", "INVAD 沙滩裤")
   
8. //搜索关键词,如果需要添加更多，继续往后面添加，例如：
   
9. //array("关键词A","关键词B","关键C","关键词D")
   
10. Classification = array("Quiksilver", "Volcom")      //店铺分类
    
11. //===============
    
12. //=================================分割线===================================
    
13. ////===================================================================
    
14. //断开网络
    
15. 
    
16. Call Plugin.Net.HangUp()
    
17. Delay 2000
    
18. //下面是清理IE垃圾
    
19. Delay 1000
    
20. Call Plugin.Web.ClearHistory()
    
21. Delay 1000
    
22. Call Plugin.Web.ClearTemp()
    
23. Delay 1000
    
24. Call Plugin.Web.ClearCookie()
    
25. Delay 1000
    
26. //连接网络，连接网络要进属性里面设置“提示名称、密码”前面的勾去掉，保证连接不出提示框
    
27. Rem 拨号
    
28. Delay 1000
    
29. Plugin.Net.DialUp("宽带连接")
    
30. Delay 4000
    
31. OnLine = Plugin.Net.IsOnline()
    
32. Delay 1000
    
33. If OnLine = False Then
    
34.     Call Plugin.Msg.Tips("网络未连接成功，跳转再次连接")
    
35.     Delay 1000
    
36.     Goto 拨号
    
37. End If
    
38. Delay 1000
    
39. //=================================分割线===================================
    
40. Rem IE
    
41. PID=Plugin.Web.Bind("wqm.exe")
    
42. Delay 1000
    
43. Hwnd = Plugin.Window.Foreground()
    
44. 
    
45. 
    
46. //=================================分割线===================================
    
47. Rem 开始
    
48. Delay 500
    
49. Call Plugin.Web.TabNew()
    
50. Delay 1500
    
51. Call Plugin.Web.Go("http://www.taobao.com")
    
52. Delay 8000
    
53. //检查是否有打开网页
    
54. Num = Plugin.Web.HtmlExists("id:q")
    
55. If Num = 1 Then
    
56.     Call Plugin.Msg.Tips("淘宝首页已经打开，继续下一步")
    
57.     Delay 1000
    
58. End If
    
59. If Num = 0 Then
    
60.     Call Plugin.Msg.Tips("淘宝首页还没打开，尝试再次打开！")
    
61.     Delay 1500
    
62.     Call Plugin.Web.TabClose()
    
63.     Delay 1000
    
64.     Goto 开始
    
65. End If
    
66. Call Plugin.Msg.Tips(Shopname&"：准备输入关键词")
    
67. Delay 1000
    
68. Num_keyword = UBound(Keyword)
    
69. Num_keyword = Num_keyword + 1
    
70. Randomize
    
71. Input = Keyword(Int(Num_keyword * Rnd))
    
72. Delay 500
    
73. Call Plugin.Web.HtmlInput(Input,"tag:input&id:q")
    
74. Delay 1000
    
75. Call Plugin.Web.HtmlClick("tag:BUTTON&value:搜 索")
    
76. Delay 5000
    
77. Rem 检查搜索结果
    
78. Num = Plugin.Web.HtmlExists("tag:DT&txt*:你是不是想找")
    
79. Delay 1000
    
80. If Num = 0 Then
    
81.     Call Plugin.Msg.Tips("搜索结果还没完全显示。。")
    
82.     Delay 3000
    
83.     Goto 检查搜索结果
    
84. End If
    
85. Num = Plugin.Web.HtmlExists("tag:P&txt*:抱歉！没有找到")
    
86. Delay 1000
    
87. If Num = 1 Then
    
88.     Call Plugin.Msg.Tips("没有找到任何结果，需要重新开始。")
    
89.     Delay 3000
    
90.     Goto 开始
    
91. End If
    
92. //检查搜索结果中是否有Shopname
    
93. Num = Plugin.Web.HtmlExists("tag:A&txt:"&Shopname)
    
94. Delay 500
    
95. Num_page=Plugin.Web.HtmlExists("tag:SPAN&txt:下一页")
    
96. If Num = 0 Then
    
97.     If Num_page = 1 Then
    
98.         Call Plugin.Web.HtmlClick("tag:SPAN&txt:下一页")
    
99.     End If
    
100.     //如果翻页找不到结果，则从新搜索
     
101.     If Num_page = 0 Then
     
102.         Call Plugin.Msg.Tips("搜索结果找不到店铺，重新开始")
     
103.         //关闭页面，重新打开搜索
     
104.         Delay 1500
     
105.         Call Plugin.Web.TabClose()
     
106.         Delay 1000
     
107.         Goto 开始
     
108.     End If
     
109.     Goto 检查搜索结果
     
110. End If
     
111. Delay 500
     
112. Call Plugin.Web.HtmlClick("tag:A&txt^:"&Shopname)
     
113. Call Plugin.Msg.Tips("点击搜索结果，准备进入店铺。。")
     
114. Delay 1000
     
115. Randomize
     
116. Delay int(rnd * 5000 + 5000)
     
117. //判断是否打开商品页面
     
118. Rem 进入店铺商品
     
119. Num = Plugin.Web.HtmlExists("tag:A&txt:查看所有宝贝>>")
     
120. Delay 500
     
121. If Num = 0 Then
     
122.     Delay 3000 //等待
     
123.     Goto 进入店铺商品
     
124. End If
     
125. //浏览首页
     
126. Call Plugin.Msg.Tips("浏览首页")
     
127. Delay 1000
     
128. Randomize
     
129. Scrollbar = Int(2000 * Rnd + 500)
     
130. Call Plugin.Web.ScrollTo(0,Scrollbar)
     
131. Randomize
     
132. Delay int(rnd*5000+5000)
     
133. Randomize
     
134. Scrollbar = Int(2000 * Rnd + 2500)
     
135. Call Plugin.Web.ScrollTo(0,Scrollbar)
     
136. Randomize
     
137. Delay int(rnd()*5000+5000)
     
138. 
     
139. Rem 随机点击分类
     
140. Delay 500
     
141. Num_Classification = UBound(Classification)
     
142. Delay 500
     
143. Num_Classification = Num_Classification + 1
     
144. Delay 500
     
145. Randomize
     
146. Rn_Classification = Classification(Int(Num_Classification * Rnd()))
     
147. Call Plugin.Web.HtmlClick("tag:A&txt:" & Rn_Classification & "&index:0")
     
148. Randomize
     
149. Delay int(rnd * 5000 + 5000)
     
150. Rem 随机点击分类商品
     
151. Url_fenlei=Plugin.Web.GetTitle() //获得当前标签名称
     
152. Delay 500
     
153. Randomize
     
154. img_id = Int(6 * Rnd + 6)
     
155. Call Plugin.Web.HtmlClick("tag:img&index:" & img_id)
     
156. Randomize
     
157. Delay int(rnd*5000+5000)
     
158. //检查是否已经打开分类商品
     
159. Url_fenlei_goods=Plugin.Web.GetTitle() //获得当前标签名称
     
160. Delay 500
     
161. If Url_fenlei = Url_fenlei_goods Then
     
162.     Call Plugin.Msg.Tips("没有打开分类商品，需要重新打开")
     
163.     Delay 1500
     
164.     Goto 随机点击分类商品
     
165. End If
     
166. //产生随机下拉
     
167. Randomize
     
168. Scrollbar = Int(2000 * Rnd + 500)
     
169. Call Plugin.Web.ScrollTo(0,Scrollbar)
     
170. Randomize
     
171. Delay int(rnd*5000+5000)
     
172. Randomize
     
173. Scrollbar = Int(2000 * Rnd + 2500)
     
174. Call Plugin.Web.ScrollTo(0, Scrollbar)
     
175. Randomize
     
176. Delay int(rnd*5000+5000)
     
177. Randomize
     
178. Scrollbar = Int(2000 * Rnd + 4500)
     
179. Call Plugin.Web.ScrollTo(0,Scrollbar)
     
180. Randomize
     
181. Delay int(rnd*5000+5000)
     
182. If Rn_fenlei > 3 Then
     
183.     Goto 结束
     
184. End If
     
185. Rem 随机产生浏览二次分类
     
186. Randomize
     
187. Rn_fenlei = Int(Rnd() * 5)
     
188. If Rn_fenlei > 3 Then
     
189.     Call Plugin.Web.TabClose()
     
190.     Delay 1000
     
191.     Goto 随机点击分类
     
192. End If
     
193. Rem 结束
     
194. Call Plugin.Msg.Tips("脚本运行结束。。。。。。。。")
     
195. Delay 80000

复制代码

按键精灵以前玩游戏用过，都有点生疏了，想想用来模拟搜索这个应该不错哇

楼主高人来的啊，最佩服会些技术的人

真有那么神么

顶一个 我试试看

软件在哪下载

L078116 发表于 2012-10-28 01:09
软件在哪下载

这是按键精灵脚本，你安装按键精灵后直接运行脚本就可以使用了

谢谢分享~~

不错，感谢分享

你这是刷流量还是刷销量呢

学习了，不过不怎么会用，先研究下，感谢楼主分享

新帖必看，每天学习才能不断进步

顶一下自己的帖子。

这个是刷流量的