角色

在#3帖的code，没有问题

1. [admin@MikroTik] > /import file-name=dyndns-3.rsc
   
2. Opening script file dyndns-3.rsc
   
3. 
   
4.   status: finished
   
5. 
   
6.   status: finished
   
7. 
   
8. Dyndns Update Result: good 58.153.xxx.yyy
   
9. Script file loaded and executed successfully
   
10. [admin@MikroTik] >

複製代碼

角色

Another Script Link provided by member "bky16"

1. ############
   
2. # Set needed variables
   
3. ############
   
4. # Your DynDNS account user-name, password & host-name.
   
5. :local username "yourusername"
   
6. :local password "yourpassword"
   
7. :local hostname "yourhostname"
   
8. 
   
9. # Which interface are we checking if DHCP has changed? [interfaces | name column in winbox]
   
10. :local DHCPInterface "yourinterface"
    
11. ############
    
12. # This is the name of the file where the last recorded IP will be stored, as well as the file name of the DynDNS response.
    
13. # Make sure if another script is using files, that these names don't conflict.
    
14. # You probably also want to be sure they aren't the same as any other files on the disk - because you'll be clobbering those files.
    
15. # Finally, while I'm not aware of any "reserved" file names on the disk, it would be wise to avoid something that might conflict.
    
16. # Prefixing them with something to associate them with this script would probably be a good thing.
    
17. # You can point these files at your SD-disk too, if you have an SD card installed and ready on your RB. Just prefix the path appropriately:
    
18. # something like this [:local vLastIPFileName "micro-sd/dyndns-lastip.txt"] (don't put a leading slash)
    
19. # A user reported a bug if you use the RB flash and prefix the path with a [/]
    
20. # So for RB based flash, it's probably safest to use just something like [:local vLastIPFileName "dyndns-lastip.txt"] and not [:local vLastIPFileName "/dyndns-lastip.txt"]
    
21. # You ***MUST*** use a .txt extension. Just an oddity of ROS. Move along now.
    
22. # Code ForDD
    
23. :local vLastIPFileName "dyndns-lastip.txt"
    
24. :local vDynDNSResponseFile "dyndns-resp.txt"
    
25. # /dyndns.txt
    
26. 
    
27. ############
    
28. # END Set needed variables
    
29. ############
    
30. 
    
31. :local vlen;
    
32. :local vRawIP;
    
33. :local vJustIP;
    
34. :local currentIP
    
35. :local previousIP
    
36. :local vlocalurl
    
37. :local vIPChanged false
    
38. :local dyndnsresult
    
39. :local result
    
40. 
    
41. # Check for file existance, if not create it
    
42. # We need to do this before we try to read or write to files...
    
43. :local check [/file find name=$vLastIPFileName]
    
44. :if ( $check = "" ) do= {
    
45.    /file print file=$vLastIPFileName
    
46.    :delay 2
    
47.    /file set [/file find name=$vLastIPFileName] contents=""
    
48. }
    
49. 
    
50. # Get the last saved IP from the file.
    
51. :set previousIP [/file get $vLastIPFileName contents]
    
52. #:put $previousIP
    
53. 
    
54. 
    
55. # print some debug info
    
56. :log info ("UpdateDynDNS: username = $username")
    
57. :log info ("UpdateDynDNS: password = $password")
    
58. :log info ("UpdateDynDNS: hostname = $hostname")
    
59. :log info ("UpdateDynDNS: previousIP = $previousIP")
    
60. :log info ("UpdateDynDNS: DHCPInterface = $DHCPInterface")
    
61. 
    
62. 
    
63. # This code gets the current IP from the interface.
    
64. # The interface we're checking should be set above.
    
65. # get the raw IP from the interface, which includes a mask.
    
66. :set vRawIP [:tostr [/ip address get [find interface=$DHCPInterface] address]]
    
67. 
    
68. #Strip the netmask off the vRawIP address.
    
69. :for i from=( [:len $vRawIP] - 1) to=0 do={
    
70.         :if ( [:pick $vRawIP $i] = "/") do={
    
71.                 :set vJustIP [:pick $vRawIP 0 $i]
    
72.         }
    
73. }
    
74. :set currentIP $vJustIP
    
75. 
    
76. # Determine if dyndns update is needed
    
77. # more dyndns updater request details http://www.dyndns.com/developers/specs/syntax.html
    
78. # Update if the currentIP isn't equal to previousIP.
    
79. :if (($currentIP != $previousIP)) do={
    
80.         :log info "CurrentIP: $currentIP - PreviousIP: $previousIP"
    
81.         :set vlocalurl ("http://" . "$username" . ":" . "$password" . "@" . "members.dyndns.org" . "/nic/update?hostname=" . "$hostname" . "&myip=" . "$currentIP")   
    
82.         /tool fetch mode=http url=$vlocalurl dst-path=$vDynDNSResponseFile
    
83.         :set result [/file get $vDynDNSResponseFile contents]
    
84.         :set vIPChanged true
    
85. } else={
    
86.    :log info ("UpdateDynDNS: No dyndns update needed")
    
87. }
    
88. 
    
89. # Get the result status code and pull it out for use.
    
90. # IF IPChanged = true
    
91. #        Get result code
    
92. #                Check DynDNS result
    
93. #                if good or nochg, then
    
94. #                        :set previousIP $currentIP
    
95. #                        /file set [/file find name=$vLastIPFileName] contents="$currentIP"
    
96. #                        also post the result to the log file        
    
97. #                else badauth or !donator or notfqdn, nohost, abuse, dnserr, 911
    
98. #                        post to log file
    
99. #                        Don't update previousIP or vLastIPFileName file
    
100. :if ($vIPChanged=true) do={
     
101.         :set result [/file get $vDynDNSResponseFile contents]
     
102.         :local endLoc [:find $result " " -1]
     
103.         :set dyndnsresult [:pick $result -1 ($endLoc)]
     
104.         :put $dyndnsresult
     
105.                 :if (($dyndnsresult = "good") || ($dyndnsresult = "nochg") ) do={
     
106.                         :set previousIP $currentIP
     
107.                         :log info ("UpdateDynDNS: Dyndns update needed")
     
108.                         :log info ("UpdateDynDNS: Dyndns Update Result: ".$result)
     
109.                         /file set [/file find name=$vLastIPFileName] contents="$currentIP"
     
110.                         } \
     
111.                 else={
     
112.                         :log info ("UpdateDynDNS: Dyndns update needed")
     
113.                         :log info ("DynDNS Update FAILED")
     
114.                         :log info ("UpdateDynDNS: Dyndns Update Result: ".$result)
     
115.                 }
     
116. }

複製代碼

1. New Terminal> /system scheduler add name=dyndns interval=00:01 on-event="/system script run dyndns\r\n"

複製代碼

Result 也 Okay

1. [admin@MikroTik] > /import dyndns-bk.rsc
   
2. Opening script file dyndns-bk.rsc
   
3. 
   
4.   status: finished
   
5. 
   
6. good
   
7. Script file loaded and executed successfully
   
8. [admin@MikroTik] >

複製代碼

角色

现在bky16的script，一关电源，过了一晚，再试就没有把DNS更改。

那么估计还要修改一下。

角色

现在正在测试bubblestar兄的script，看看关机后，再开是否可以把ip upgrade到最新的IP。

角色

我也发现这个问题，问题是整个script都是看local file，而不是check DNS Server！所以等我有空的时候去学怎样去修改那段script，看看是否做到script去check DNS Server。

角色

不知道其他members是否用的Script能关机后再能update DNS server呢？

角色

效果怎样？你在大陆？

角色

DynDNS一样，主要主hostname xxx.dyndns.org当然被blocked，但是用dyndns的sub-domian就没有问题。由于要收费，所以已经全部停用了。

角色

那么奇怪？时能PM我的你的hostname，然后我从香港check一下看看？

角色

DNS用香港的Servers，就是你是香港的ISP给你的DNS server。

角色

因为是内部IP，不能在外面进入系统，所以要求更换Public IP。
我估计一般是给Private IP，如果有投诉才跟Public IP，估计电信估算很多人只是上网，而不需要public IP，所以给你private IP就算了。

所以你一定要投诉外面不可以登入！