:: topengdigital ::

April 25, 2007

Energi Ruhani Rasulullah

Filed under: Qolbu

Ketika shalat Subuh tadi terasa sekali energi ruhani Rasulullah yang sangat kuat. Begitu dekatnya beliau pada Allah, Sang Khaliq, dan begitu intensifnya pertemuan dengan-Nya, membuat energi ruhani Beliau sangat kuat. Beliau adalah makhluk yang sangat dicintai Allah. Namanya disandingkan dengan nama Allah. Bahkan Dia mengatakan sesuatu yang membuat kita menyadari bahwa kita tidak ada apa-apanya dibanding beliau, yaitu:
“Jika bukan karena engkau Muhammad, tak akan Aku ciptakan dunia ini.”

Betapa tingginya kedudukan beliau di sisi Allah. Barang siapa mau mendekat kepada Rosulullah, maka dengan kekuatan energi ruhani Beliau, akan ditarik untuk mencapai wilayah spiritual Rasulullah. Maka tidak mengherankan ketika para sahabat dalam waktu yang relatif singkat mampu mencapai pengalaman spiritual yang sangat menakjubkan.

Abu Bakar, sahabat yang selalu setia tanpa reserve, dan percaya penuh pada beliau, menjadi salah satu manusia yang sangat mulia. Bahkan Rasulullah memujinya:
“Jika iman seluruh umat manusia di dunia ditimbang, maka masih tetap lebih berat timbangan iman Abu bakar.”

Umar bin Khattab, dari yang sangat jahiliyyah dan sangat kejam, tiba-tiba saja berubah menjadi manusia yang sangat mulia. Syariatnya karena mendengar ayat-ayat Qur’an yang dibacakan oleh adiknya. Hakikatnya karena doa Rasulullah, dikabulkan oleh-Nya. Apa sih yang tidak Dia berikan kepada kekasih-Nya?
“Ya, Allah, masukkanlah ke dalam Islam di antara 2 orang Umar.” Dan Allah memilih Umar bin Khattab.

Usman bin Affan, orang dekat Rasulullah, menjadi orang yang sangat baik hati, yang tidak bisa bilang “tidak” jika orang meminta pertolongannya, yang justru karena kebaikan hatinya, membuat banyak orang salah paham, bahkan mencelakainya.

Ali bin Abi Thalib, orang yang paling dekat silsilahnya dengan Rasulullah, yang masuk Islam di usia yang sangat belia, mencapai tingkat ma’rifatullah yang sangat tinggi. Rasulullah sangat mencintainya, hingga berkeinginan menikahkannya dengan putri tercinta Fatimah Azzahra.

Dan masih banyak lagi para sahabat yang dengan berbagai karakter masing-masing, mampu mencapai wilayah ruhani yang sangat tinggi karena ditarik oleh energi ruhani Rasulullah. Dahsyat sekali pengaruhnya. Hanya dalam waktu 23 tahun mampu membangun dasar-dasar peradaban manusia yang tidak dapat dipungkiri kehebatannya hingga saat ini.

Sekarang aku mengerti kenapa ketika patrap dimulai dengan membaca shalawat kepada Rasulullah. Sebab diharapkan dengan membaca shalawat, yang merupakan doa kepada Allah agar disambungkan dengan Rasulullah, diharapkan sama dengan mendekati energi ruhani Beliau. Dengan mendekati energi ruhani yang sangat kuat ini akan mempercepat perjalanan ruhani kita menuju Tuhan. Bahkan ketika shalat wajib membaca shalawat ketika duduk tasyahud awal dan tasyahud akhir. Karena shalat adalah cara patrap yang paling cepat untuk ‘nyambung’ dengan Allah.

Alysha

kill proses menggunakan vbs script

Filed under: tutorial

biasanya anda menghentikan/stop program menggunakan ctrl + alt + del, cara itu juga bisa digunakan menggunakan script vbs . misalkan kita mau mematikan program yang berjalan itu calculator jika kita lihat di task manager ( menggunakan ctrl + alt + del ) program tersebut adalah calc.exe ,maka cara mengentikannya menggunakan vbs sebagai berikut :

‘ ProcessKillLocal.vbs
‘ Sample VBScript to kill a program
‘ modified by topengdigital
‘ Version 1.0 - 25 april 2007
‘ ———————— ——————————-’
Option Explicit
Dim objWMIService, objProcess, colProcess
Dim strComputer, strProcessKill
strComputer = “.”
strProcessKill = “‘calc.exe’”

Set objWMIService = GetObject(”winmgmts:” _
& “{impersonationLevel=impersonate}!\\” _
& strComputer & “\root\cimv2″)

Set colProcess = objWMIService.ExecQuery _
(”Select * from Win32_Process Where Name = ” & strProcessKill )
For Each objProcess in colProcess
objProcess.Terminate()
Next
WSCript.Echo “Program sudah dimatikan ” & strProcessKill _
& ” by : topengdigital” & strComputer
WScript.Quit
‘ End

atau anda juga bisa menggunakan script dibawa ini

Option Explicit
‘On Error Resume Next
Dim objWMIService, objProcess, colProcess
Dim strComputer, strProcessKill
Dim WshShell, ProcID
strComputer = “.”
strProcessKill = “‘calc.exe’”
Set WshShell = WScript.CreateObject(”WScript.Shell”)
Set objWMIService = GetObject(”winmgmts:” & “{impersonationLevel=impersonate}!\\” & strComputer & “\root\cimv2″)
Set colProcess = objWMIService.ExecQuery(”Select * from Win32_Process Where Name = ” & strProcessKill)
If colProcess.Count = 0 Then
WshShell.LogEvent 2, “WARNING: Process ” & strProcessKill & ” hasn’t been found in the list of running processes at ” & Time() & ” on ” & Date()
Else
For Each objProcess in colProcess
ProcID = objprocess.Processid
objProcess.Terminate()
If Err.Number = 0 Then
WshShell.LogEvent 0, “SUCCESS: Process ” & strProcessKill & ” with PID= ” & ProcID &” process has been killed at ” & Time() & ” on ” & Date()
Else
WshShell.LogEvent 1, “FAILURE: Failed to Kill process ” & strProcessKill & Time() & ” on ” & Date()
End If
Next
End If
WScript.Quit

jika anda ingin mematikan lain program anda bisa mengganti calc.exe dengan nama program
yang akan anda hapus dan jangan lupa copy vbs script tersebut ke notepad dan simpan dengan
nama terserah anda yang wajib menggunakan extention vbs.

topengdigital.blogsome.com






















Get free blog up and running in minutes with Blogsome
Theme designed by Minz Meyer