Anda bisa membuat, menghapus, disable, enable dan merubah profile user ppp/pptp Mikrotik dan menampilkan user ppp yang aktif hanya dengan bantuan bot telegram  cukup dengan menggunakan System Script  dan System Scheduler  pada mikrotik tanpa harus punya server PHP sendiri, ini cukup mudah dipasang dan digunakan bagi orang awam yang tidak paham pemograman PHP. Tutorial ini update dari postingan sebelumnya yang berjudul Membuat User PPP/PPTP Dengan Menggunakan Bot Telegram .
Agar script ini berjalan dengan semestinya anda harus membuat terlebih dahulu bot telegram interaktif yang terdapat pada postingan berikut ini:Â Monitoring Mikrotik dengan Bot Telegram Interaktif tanpa Pemograman PHP
/ppp (spasi) Nama User PPP (spasi) Password (spasi) Nama Profile
/ppp (spasi) delete (spasi) Nama User PPP
/ppp (spasi) disable (spasi) Nama User PPP
/ppp (spasi) enable (spasi) Nama User PPP
/ppp (spasi) password (spasi) Nama User PPP (spasi) Password baru
/ppp (spasi) profile (spasi) Nama User PPP (spasi) Nama Profile Baru
/ppp (spasi) print
Buat script dengan nama tg_cmd_ppp. Script ini akan dipanggil dengan perintah /ppp pada Bot Telegram.
Share to Unlock Content
image/svg+xml Silahkan share untuk membuka link download dan membuka scriptnya
Apabila tutorial ini bermanfaat support saya dengan cara share artikel ini..
Terimakasih
:local send [:parse [/system script get tg_sendMessage source]]
:local param1 [:pick $params 0 [:find $params " "]]
:local param2 [:pick $params ([:find $params " "]+1) [:len $params]]
:local param3 [:pick [:pick $params ([:find $params " "]+1) [:len $params]] ([:find [:pick $params ([:find $params " "]+1) [:len $params]] " "]+1) [:len [:pick $params ([:find $params " "]+1) [:len $params]]]]
:if ([:len [:find $param2 " "]]>0) do={
:set param2 [:pick [:pick $params ([:find $params " "]+1) [:len $params]] 0 [:find [:pick $params ([:find $params " "]+1) [:len $params]] " "]]
} else={
:set param3 ""
}
:put $params
:put $param1
:put $param2
:put $param3
:put $chatid
:put $from
:if ($param1="delete") do={
/ppp secret remove [find name=$param2]
$send chat=$chatid text=("User PPP: $param2 Berhasil dihapus") mode="Markdown"
}
:if ($param1="disable") do={
/ppp secret disable [find name=$param2]
$send chat=$chatid text=("User PPP: $param2 Disable") mode="Markdown"
}
:if ($param1="enable") do={
/ppp secret enable [find name=$param2]
$send chat=$chatid text=("User PPP: $param2 Enable") mode="Markdown"
}
:if ($param1="password") do={
/ppp secret set password=$param3 [find name=$param2]
/ppp active remove [find name=$param2]
$send chat=$chatid text=("User PPP: $param2 pasword diganti menjadi $param3...") mode="Markdown"
}
:if ($param1="profile") do={
/ppp secret set profile=$param3 [find name=$param2]
/ppp active remove [find name=$param2]
$send chat=$chatid text=("User PPP: $param2 profile diganti menjadi $param3...") mode="Markdown"
}
:if ($params="print") do={
:local output
:foreach activeIndex in=[/ppp active find] do={
:local activeUser ("*Username:* ".[/ppp active get value-name="name" $activeIndex]."%0A")
:local activeAddress ("*Address:* ".[/ppp active get value-name="address" $activeIndex]."%0A")
:local activeCaller ("*Caller-ID:* ".[/ppp active get value-name="caller-id" $activeIndex]."%0A")
:local activeUptime ("*Uptime:* ".[/ppp active get value-name="uptime" $activeIndex]."%0A")
:local activeService ("*Service:* ".[/ppp active get value-name="service" $activeIndex]."%0A")
:set output ($output.$activeUser.$activeAddress.$activeCaller.$activeUptime.$ActiveService."%0A")
}
$send chat=$chatid text=("$output") mode="Markdown"
}
:if ($param1!="password" and $param1!="profile" and $param1!="enable" and $param1!="disable" and $param1!="delete" and $param1!="print") do={
/ppp secret add name=$param1 password=$param2 service=pptp profile=$param3
$send chat=$chatid text=("User PPP %0AUsername: $param1 %0APassword: $param2 %0AProfile: $param3 %0ABerhasil dibuat...") mode="Markdown"
}
VIDEO
