Membuat Sendiri Web Editor Sangat Sederhana Menggunakan REBOL


Web Editor Sangat Sederhana yang saya buat menggunakan bahasa pemrograman REBOL ini saya buat demi memudahkan saya dalam melakukan minor update seperti meng-update harga produk, judul, dan lain-lain. Program ini secara spesifik saya aplikasikan pada halaman situs USBINOV (www.usbinov.com). Salah satu produknya adalah USB-2REL, yakni modul interface untuk mengontrol 2 buah relay melalui port USB (bukan USB-to-Serial).

Prinsip kerja program Web Editor Sangat Sederhana ini tentunya sangat sederhana. Program membaca file pada server dan menampilkan pada editor. Setelah proses editing selesai, program menulis file ke server. Selesai.

Berikut adalah tampilan program Web Editor Sangat Sederhana.

Sangat sederhana, bukan? Lebih tepatnya: sangat sederhana dan tidak dapat dibanggakan. Hehehe… 😀

Nah, bagaimana dengan kode programnya? Kode programnya pun tak kalah sederhananya. Simak listing program berikut ini:

#!/usr/bin/rebol

REBOL [
  Title: "My Super Simple Web Page Editor"
  Programmer: "Chandra MDE"
]

d: "ftp://user&&passwordd&&alamatsitus-www.usbinov.com"
x: 0

view center-face layout [
  backdrop effect [gradient crimson black]
  vtext font-size 24 bold gold "WWW.USBINOV.COM"
  across
  vtext font-size 14 sky bold 100 "PATH/FILE:"
  alamat: field bold font-size 14 wheat 720
  btn 80 crimson bold "READ" [
    f: to-url rejoin [d alamat/text]
    if/else exists? f [
      r: read to-url f
      clear a/text
      append a/text r
      focus a
      x: 1
    ][
      alert "File is not existed."
    ]
  ]
  return

  across
  vtext font-size 14 sky bold 100 "TEXT/HTML:" a: area 720x500 font-size 14 bold wheat
  btn 80 bold crimson "UPDATE" [
    if/else x == 1 [
      write f a/text
      alert "File updated."
    ][
      alert "File is not loaded."
    ]
  ]
]

Tuh, sangat sederhana juga kan? Dan postingan ini juga gak mau kalah sederhananya hingga cukup sampai sekian saja. Selamat belajar.

 

Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout /  Ubah )

Foto Google+

You are commenting using your Google+ account. Logout /  Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout /  Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout /  Ubah )

Connecting to %s

This site uses Akismet to reduce spam. Learn how your comment data is processed.