Mengenal dan Menjalankan clipper

Clipper Merupakan sebuah bahasa pemprograman untuk menejemen database. data base Clipper dapat digolongkan bahasa pemprograman database.

• Yang perlu dipersiapkan?

Untuk mengoperasikan program Clipper Compiler ada beberapa hal yang perlu diperhatikan terlebih dahulu, misalkan program yang anda buat atau anda tulis harus dalam format teks atau ascii. Nama file yang digunakan berekstension .PRG. Program dapat dibuat dengan editor apa saja misal SK (SideKick) atau dengan editor pada Dos, atau dengan menggunakan program bantu bawaan dari program clipper Compiler yaitu PE (Program Editor), dengan cara memanggil file PE.EXE yang bentuk umum penulisannya sebagai berikut :

C:\>PE coba.prg

Atau

C:\>edit coba.prg

File Config. Sys

            Pada pemprograman data base sering terjadi membuka lebih dari satu file sekaligus yang kadang meliputi file data base dan indexnya. Maka diperlukan file config.sysuntuk mengatur configurasi buffer komputer yang dipakai.

Untuk menggunakan Clipper maka confog.sys harus berisi perintah derektif.

Files = n

N=berkisar antara 8 s/d 255, jika akan dibuka 30 file sekaligus maka n diisi dengan 35, 30 untuk file data base dan 5 untuk digunakan dos.

File Autotexec.bat

      Digunakan untuk menentukan variabel enviromen yang digunakan Clipper, guna menentukan lokasi file LIB, file Include. File Lib merupakan file librari yang digunakan untuk proses compilasi. File Include berisi file header yang diperlukan oleh perintah yang digunakan dalam pemprograman.

Didalam file Autotexec. Bat dapat diberi perintah :

     

SET PIPEHANDLE=0

SET OBJ=C:\CLIP53\OBJ

SET LIB=C:\CLIP53\LIB

SET INCLUDE=C:\CLIP53\INCLUDE

SET PATH=C:\CLIP53\BIN

Gambar 1.2 file Autoexect.Bat

CARA INSTALASI OPEN OFFICE DI WINDOWS


KLIK DISINI

MENGHITUNG DURASI WAKTU DAN BIAYA

DENGAN CODING VISUAL BASIC 6.0

Program nya sebagai berikut :

Dim awal As Date

Dim akhir As Date

Dim lama As Single

Dim biaya As Currency

Private Sub cmdproses_Click()

If cmdproses.Caption = "START" Then

awal = Now

lblmulai.Caption = Format(awal, "hh:mm:ss")

cmdproses.Caption = "STOP"

ElseIf cmdproses.Caption = "STOP" Then

Timer1.Enabled = False

akhir = Now

lama = akhir - awal

lbldur.Caption = Format(lama, "hh:mm:ss")

Lblbiaya.Caption = "Rp" & 15 * CSng(Second(Now - awal)) + 1500 * CSng(Minute(Now - awal)) + 90000 * CSng(Hour(Now - awal)) & ",-"

cmdproses.Caption = "EXIT"

ElseIf cmdproses.Caption = "EXIT" Then

jawab = MsgBox(" apakah anda yakin akan keluar?", vbYesNo, "peringatan")

If jawab = 6 Then

Unload Me

End If

End If

End Sub

Private Sub Timer1_Timer()

a = Left(Label1.Caption, 1)

b = Len(Label1.Caption)

c = Right(Label1.Caption, b - 1)

Label1.Caption = c + a

lbljam.Caption = Time

lbljam.Caption = "sekarang jam : " & Format(Now, "hh:mm:ss")

If cmdproses.Caption = " stop" Then

lbldurasi.Caption = Format(Now - awal, "hh:mm:ss")

End If

End Sub

langkah - langkah instalasi openoffice 3.0 di Windows

openoffice adalah perangkat lunak open source untuk office suite,,

openoffice adalah perangkat lunak bebas/free, dibawah lisensi GNU.

openoffice adalah bawaan dari sistem operasi LINUX, namun perangkat aplikasi ini bisa di install di Windows...

untuk lebih jelasnya klik disini