如何提高在线校验 NOD32 ID 速度

lss33333

1. #include <INet.au3>
   
2. #include <Array.au3>
   
3. 
   
4. Opt("MustDeclareVars", 1)
   
5. 
   
6. ;------------------脚本开始-------------------------
   
7. Local $a_Url = "http://www.zolsky.com/" & _
   
8. "killsoftware/sdsoft/NOD32/nod32_id.htm"
   
9. Local $HTMLSource = _INetGetSource($a_Url)
   
10. 
    
11. Local $N = 3
    
12. Local $a_IdInfo[1][$N], $p = 1
    
13. 
    
14. Local $a_Id = StringRegExp($HTMLSource, _
    
15. "名：\s*(.+?)\s*<[\s\S]+?：\h*(.+?)\h*<", 3)
    
16. Local $a_Time = StringRegExp($HTMLSource, _
    
17. "至：(\d*.{6})", 3)
    
18. ;_ArrayDisplay($a_Id, "$a_Id")
    
19. ;_ArrayDisplay($a_Time, "$a_Time")
    
20. 
    
21. For $i = 0 To UBound($a_Id) - 1 Step 2
    
22. If $a_Id[$i] <> "" Then
    
23. ReDim $a_IdInfo[$p + 1][$N]
    
24. $a_IdInfo[$p][0] = $a_Id[$i]
    
25. $a_IdInfo[$p][1] = $a_Id[$i + 1]
    
26. If StringInStr($a_Id[$i], "EAV-") Then
    
27. $a_IdInfo[$p][2] = $a_Time[1]
    
28. Else
    
29. $a_IdInfo[$p][2] = $a_Time[0]
    
30. EndIf
    
31. $p += 1
    
32. EndIf
    
33. Next
    
34. _ArrayDisplay($a_IdInfo, "$a_IdInfo")
    
35. ;-------------------------验校ID的有效性---------------------------
    
36. Local $N = 4
    
37. Local $a_Final_Id[1][$N], $p = 1
    
38. 
    
39. For $i = 1 To UBound($a_IdInfo) - 1
    
40. ProgressOn("共有" & UBound($a_IdInfo) - 1 & "个ID，第" & _
    
41. $i & "个验校中！", "正在验校ID的有效性，请稍候……")
    
42. ProgressSet($i / UBound($a_IdInfo) * 100, " 正在验证 " & _
    
43. $a_IdInfo[$i][0] & " | " & $a_IdInfo[$i][1])
    
44. 
    
45. Local $ID = $a_IdInfo[$i][0] & ":" & $a_IdInfo[$i][1]
    
46. Local $Ess_Size = InetGetSize("http://" & $ID & "@" & _
    
47. "download.eset.com/download/win/v4ess/ess_nt32_enu.msi")
    
48. Local $Eav_Size = InetGetSize("http://" & $ID & "@" & _
    
49. "download.eset.com/download/win/v4eav/eav_nt32_enu.msi")
    
50. If $Ess_Size > 100 Or $Eav_Size > 100 Then
    
51. ReDim $a_Final_Id[$p + 1][$N]
    
52. $a_Final_Id[$p][0] = $a_IdInfo[$i][0]
    
53. $a_Final_Id[$p][1] = $a_IdInfo[$i][1]
    
54. $a_Final_Id[$p][2] = $a_IdInfo[$i][2]
    
55. 
    
56. If $Ess_Size > 100 And _
    
57. $Eav_Size > 100 Then
    
58. $a_Final_Id[$p][3] = "ESS/EAV"
    
59. ElseIf $Eav_Size > 100 Then
    
60. $a_Final_Id[$p][3] = "EAV"
    
61. ElseIf $Ess_Size > 100 Then
    
62. $a_Final_Id[$p][3] = "ESS"
    
63. EndIf
    
64. EndIf
    
65. $p += 1
    
66. Next
    
67. ProgressOff()
    
68. _ArrayDisplay($a_Final_Id, "$a_Final_Id")

复制代码

漠蓝蓝

看不懂啊，表示不用ESET

samking897

不懂这个，等高手解答

solo_4200

这个怎么而用啊，楼主

wy330226

也看不懂，盼望高手解答。



女鞋品牌大全排行http://www.zhang68.com 淘宝网女靴
他她红蜻蜓女鞋官网