Algoritma pemrograman sistem pada komputer Client

By -


Pada pemrograman sistem ini, program yang berjalan pada computer Client dapat diuraikan sebagai berikut :
1)      Algoritma Program Utama
Program utama ini diletakan pada Modul  Global, yang secara langsung memanggil Form Komputer Klien, akan tetapi sebelumnya telah membentuk sebuah port, pada system ini ditetapkan nilai port yaitu “1256”.


Port -> Int
Begin
            If Command ¬ “ “ then
                        Port ¬ 1256
            Endif
            Tampil Form KomputerKlien
If Aplikasi ¬ Jalan then
            Exit
    Else
            If Error then
                        KoneksiUlang
                 Else
                        TcpIpKlien ¬ Port
                        TcpIpKlien ¬ Listen
            Endif
            If KoneksiUlang then
                        Port ¬ Port + 1
                        TcpIpKlien ¬ Port
                        TcpIpKlien ¬ Listen
            Endif
Endif
End
 
















Sesuai dengan Socket Client  yang bersifat pasif, dalam hal ini Client akan menunggu adanya permintaan sambungan dari Administrator dan melaksanakan instruksi serta mengirimkan informasi yang dibutuhkan, maka pada program ini menggunakan prosedur case dan memanggil fungsi-fungsi yang dikirimkan. Prosedur Case pada penerimaan instruksi yang selanjutnya  memanggil  fungsi yang didefinisikan.


InstruksiMsk,Drive,Command ¬ String
Begin
            Select Case Command
                                Case "Dpt_Inform"
                                    IdKlien.AmbilInformasi
                        Case "DptInformSystem"
                                                IdKlien.DptInformSystem
                        Case "BukaCDRomKlien"
                                    IdKlien.BukaCDRomKlien
                        Case "TutupCDRomKlien"
                                    IdKlien.TutupCDRomKlien
                        Case "ShutDown"
                                    Call ShutDown(ExitOptions.EWX_SHUTDOWN)
                        Case "HangUp_Internet_Klien"
                                    IdKlien.HangUp_Internet_Klien
                        Case "Tutup_Aplikasi"
                                    IdKlien.CloseWindow Drive
                        Case "OffLine_Program_Klien"
                                    IdKlien.ShutDown
                                    TcpIpKlien.Close
                                    Unload Me
                        Case "Ganti_Resolusi"
                                    IdKlien.ChangeRes Drive
                        Case "Ganti_Walpaper_Klien"
                                    IdKlien.GantiWallpaperKlien
                        Case "Dpt_Drives"
                                    IdKlien.GetDrives
                        Case "PesanDialog"
                                    IdKlien.PesanDialog Drive
                        Case "PesanSingkat"
                                    IdKlien.PesanSingkat Drive
                        Case "IsiDialog"
                                    IdKlien.Dialog Drive
                        Case "PesanDesktop"
                                                PesanDesktop Drive
Case “LihatLayarUser”
            If InstruksiMsk ¬ 15 then
               Panggil File(C:\Layar.old)
               If File (C:\Layar.old <> “” then
                  NamaFile=FreeFile
                  Buka(C:\Layar.old)
                                             KirimDataKeAdministrator (TampilinData)
               Endif
            Endif
Case Else
KirimDataKeAdministrator "Pesan_Salah,Tidak Ada instruksi yang lain !!"
            End case
End
 










 untuk melihathalaman selanjutnya klik disini



Popular posts from this blog

Cara Mengatasi E31 Canon MP258

By -
Pengertian Error E 31 Penyakit ini tidak hanya di alami oleh mp 258 tapi bisa terjadi juga pada mp sejenisnya seperti MP 287 atau MP 237.  jenis error ini di sebabkan oleh port usb pada printer yang tidak beres. mengalami short atau sudah rusak parah. tanda yang muncul di komputer adalah USB not reorganized. printer untuk copy bisa akan tetapi untuk melakukan printing dari komputer ke Printer tidak dapat berjalan. Cara mengatasi USB not reorganized Hal yang perlu di lakukan untuk menangani masalah ini antara lain : 1. ganti kabel USB priter ke CPU bisa jadi kabel yang di gunakan sudah saatnya ganti. kemungkinana karena sering tertekuk atau tergulung berulang ulang sehingga kabel putus di dalam. ganti dngan yang baru. jika sudah cek di device and printer dan coba untuk print. 2. pindah ke PC lain. Jika cara pertama gagal maka coba untuk pindah di pc atau laptop lain. bisa saja komputer yang di pakai untuk mencoba mengalami error pada port usb. sebelum menc
Read more

Cara Mengukur Trimpot

By -
Image
Trimpot adalah sejenis resistor yang nilai hambatannya bisa dirubah dan karena sifatnya yang fleksibel sering dipergunakan sebagai media penahan dalam mengatur besarnya masukkan di dalam rangkaian elektronik. Dahulu kala trimpot menjadi komponen yang akan selalu ada di dalam rangkaian elektronik contoh di rangkaian penerima televisi dalam hal ini ada pada bagian pengaturan sistem vertikal dan horizontal serta level video output untuk ke CRT . Contoh gambarnya bisa dilihat dibawah ini : Sekarang mungkin sudah semakin jarang rangkaian penerima televisi menggunakan trimpot manual karena sudah tergantikan dengan sistem trimpot digital begitu pula pada rangkaian elektronik lain misalnya rangkaian penerimaan radio. Apabila ada mungkin hanya 1 buah biasanya berada pada bagian pengaturan tegangan output sistem power supply televisi dan satu contoh lagi ada pada bagian pengaturan frekuensi untuk sistem stereo radio Fm. Trimpot dengan potensio adalah hampir sama secara f
Read more

Persamaan Transistor Amplifier

By -
Transistor di dalam amplifier biasanya mempunyai kode atau type yang berbeda-beda , karena memang menyesusaikan dengan model rangkaian serta voltase yang dipergunakan. Transistor memang mempunyai ketentuan sampai batas mana bisa bertahan dengan supply tegangan yang diterimanya. Dari sekian banyak type transistor yang biasa dipergunakan pada amplifier biasanya ada yang serupa/ sama atau model sepasang. Contoh model serupa adalah pada amplifier 60 Watt dimana menggunakan transistor 2SD313 sebanyak 2 buah untuk final versi mono , 4 buah untuk final versi stereo. Untuk versi sepasang ada pada amplifier OCL biasanya menggunakan transistor Tip 31 dan Tip 32 , ada kalanya kita menemui atau ingin mengganti transistor yang bersangkutan supaya amplifier bisa lebih kuat. Untuk ini bisa kita gunakan type persamaannya. Dari sekian banyak kita coba berikan beberapa yang kita tahu , diantaranya : 1 2SD313 -Tip 31- Tip 41-2SC2580-2SC2581-  2N3055 - 2SC2922 -MJ15003 2 2SB507-Tip
Read more