indoglobal.com
Langsung ke: navigasi, cari

Windows Script

(Perbedaan revisi)
(←Membuat halaman berisi 'Berikut adalah script VBS untuk melakukan update layanan Dynamic DNS dari {{indoglobal}}. <source lang="vbs"> Call LogEntry() Sub LogEntry() On Error Resume Next D...')
 
 
(4 revisi antara oleh satu pengguna tak ditampilkan)
Baris 1: Baris 1:
 
Berikut adalah script VBS untuk melakukan update layanan Dynamic DNS dari {{indoglobal}}.
 
Berikut adalah script VBS untuk melakukan update layanan Dynamic DNS dari {{indoglobal}}.
  
<source lang="vbs">
+
<source lang="vb">
 
Call LogEntry()
 
Call LogEntry()
  
Baris 20: Baris 20:
 
Gantilah URL dengan Full Update URL yang bisa anda dapatkan dari halaman Usage pada hostname Dynamic DNS anda.
 
Gantilah URL dengan Full Update URL yang bisa anda dapatkan dari halaman Usage pada hostname Dynamic DNS anda.
  
[[Kategori:Dynamic DNS|Windows Script]]
+
Setelah ini anda perlu menambahkan script tersebut pada Task Scheduler untuk dieksekusi secara berkala, misalnya setiap 10 menit.
 +
 
 +
[[Kategori:Setting Aplikasi Dynamic DNS]]

Revisi terkini pada 16 Oktober 2014 11.38

Berikut adalah script VBS untuk melakukan update layanan Dynamic DNS dari indoglobal.com.

Call LogEntry()
 
Sub LogEntry()
	On Error Resume Next
	Dim objRequest
	Dim URL
 
	URL = "http://myhostname.example.net:mypass@mail.example.net/nic/update?hostname=myhostname.example.net&myip=auto"
 
	Set objRequest = CreateObject("Microsoft.XMLHTTP")
	objRequest.open "GET", URL , false
	objRequest.Send
	Set objRequest = Nothing
End Sub

Gantilah URL dengan Full Update URL yang bisa anda dapatkan dari halaman Usage pada hostname Dynamic DNS anda.

Setelah ini anda perlu menambahkan script tersebut pada Task Scheduler untuk dieksekusi secara berkala, misalnya setiap 10 menit.