Jawaban No 3 (Harianto S)

Sumber : Kasus
Listing Program Server :

Form1

Dim ClientIndex As Byte
Dim cRequest As Integer
Dim cData As String
Dim i As Integer
Dim iGD As Integer
Sub MulaiServer()
WS(0).LocalPort = 3000
WS(0).Listen
cRequest = 1
ClientIndex = 1
End Sub

Private Sub Form_Load()
MulaiServer
GD.Rows = 41

Jawaban No 2 (Harianto S)

sumber : Kasus…

Listing Program Server :

MODUL
Public Db As New ADODB.Connection
Public RS As New ADODB.Recordset
Public RS2 As New ADODB.Recordset
Public SQL As String

Sub OPENDB()
If Db.State = adStateOpen Then Db.Close
Db.CursorLocation = adUseClient
Db.Open “Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\logOnOff\SERVER\belajarserver\Test.mdb;Persist Security Info=False”
End Sub
Sub clearFORM(f As Form)
Dim ctl As Control
For Each ctl In f
If TypeOf ctl Is TextBox Then ctl.Text = “”
If TypeOf ctl Is ComboBox Then ctl.Text = “”
Next

Sejarah Senter

Senter adalah sebuah alat listrik portabel yang merupakan sumber cahaya untuk menerangi dan dioperasikan dengan baterai. Biasanya sumber cahayanya adalah dari sebuah bola lampu pijar kecil atau lampu pendar yang dikenal dengan istilah lampu LED. Rancangan lampu senter yang khas adalah terdiri dari sumber cahaya yang dipasang dalam sebuah reflektor parabolik atau bentuk yang lainnya, sebuah lensa transparan untuk melindungi sumber cahaya dari kerusakan, sumber energi (yaitu baterai, dan sebuah saklar listrik. Arus listrik dari baterai kepada bohlam kecil di bagian ujung depan yang menghasilkan cahaya tersebut dikendalikan sebuah saklar yang ditempatkan di antara baterai-baterai dan lampu. Senter pada umumnya digunakan di tempat-tempat yang gelap untuk menerangi sesuatu di sekitarnya. Senter bisa digunakan siapa saja misalkan dalam keadaan mati lampu, untuk montir, orang yang membetulkan

Do'a.....

Do'a untuk Mendapatkan Rizqi yang Halal
 

Artinya: "Wahai Allah, wahai Dzat Yang Maha Kaya, wahai Dzat Yang Maha Terpuji, wahai Dzat Yang memulai, wahai Dzat Yang Mengembalikan, wahai Dzat Yang Maha Penyayang, wahai Dzat Yang Maha Mencintai. Cukupilah kami dengan kehalalan-Mu dari keharaman-Mu. Cukupilah kami dengan anugerah-Mu dari selain Engkau. Semoga Allah melimpahkan rahmat dan salam atas junjungan kita Nabi Muhammad Saw. keluarga dan sahabat beliau."

Penjelasan :
Doa ini dibaca setiap selesai melaksanakan shalat jumat minimal 3 kali. Khasiatnya, Insya Allah akan dilimpahkan dari harta yang halal. Bahkan sebagian ulama berpendapat, barangsiapa mendawamkan (membiasakan) membaca doa ini setelah sahalat fardhu, maka Allah akan menjamin menjadikan padanya orang kaya di antara orang-orang kaya lainnya


Do'a Kekuatan Iman
 

Artinya: "Ya Tuhan, sungguh kami telah beriman, maka