Lauch4J
Jsmooth
Jar2Exe
Advanced Installer
Java-2-Exe
Monday, October 17, 2011
Thursday, June 23, 2011
Aplikasi Editing MP3
"Free MP3 Cutter and Editor" adalah aplikasi editing MP3. APlikasi ini sangat sederhana dan mudah digunakan. Selain itu, file instalasinya juga berkapasitas kecil cuma 961 Kb. Yang paling penting, berlisensi FREEWARE alias gratis.....
Anda tertarik untuk mencoba... silakan download disini
Anda tertarik untuk mencoba... silakan download disini
Wednesday, June 22, 2011
Clean URL Jika Web Berada di sub direktori
Terkadang kita menempatkan direktori web sebagai sub direktori. Misalkan, di \htdocs\webku
Serta, menempatkan file CSS dengan nama mystyles.css
Untuk membuat Clean URL menggunakan htaccess, maka sintak nya adalah seperti berikut :
Serta, menempatkan file CSS dengan nama mystyles.css
Untuk membuat Clean URL menggunakan htaccess, maka sintak nya adalah seperti berikut :
RewriteEngine on
RewriteCond $1 !^(index\.php|images|robots\.txt|mystyles\.css)
RewriteRule ^(.*)$ /webku/index.php/$1 [L]
RewriteCond $1 !^(index\.php|images|robots\.txt|mystyles\.css)
RewriteRule ^(.*)$ /webku/index.php/$1 [L]
Konfigurasi XAMPP agar bisa menggunakan htaccess
Aktfkan module apache berikut pada "\xampp\apache\conf\httpd.conf"
LoadModule rewrite_module modules/mod_rewrite.so
Serta, ekstensi php berikut pada "\xampp\php\php.ini"extension=php_curl.dll
Tuesday, May 24, 2011
Situs belajar Grammar Bahasa Inggris
Fren, ni situs yang bisa jadi referensi untuk belajar Grammar Bahasa Inggris. Situs ini menyediakan penjelasan dan berbagai soal latihan. Dan yang paling menarik, juga menyediakan file belajar yang dapat didownload. So, kita bisa belajar secara offline.
Klik Disini
Klik Disini
Tuesday, April 5, 2011
Thursday, March 24, 2011
Menampilkan Sintak Di Halaman Web
Mungkin kita pernah pengen share sintak program (Java, PHP, VB, dll) dengan menampilkan di halaman web atau blog, tapi kadang sulit untuk menampilkannya dengan rapi dan menarik.
Solusinya pake SyntaxHighlighter yang bisa di download disini
Gini nih hasilnya
Solusinya pake SyntaxHighlighter yang bisa di download disini
Gini nih hasilnya
Tuesday, March 22, 2011
VBA Pada Ms. Excel Untuk Mencetak Daftar File
Terkadang perlu ingin melihat seluruh isi file pada sebuah folder, klo pake cari ketik satu-satu ngga efisien banget. Ini ada cara pake VBA Excel, berikut kodenya :
Sub TestListFilesInFolder()
Workbooks.Add ' create a new workbook for the file list
' add headers
With Range("A1")
.Formula = "Folder contents:"
.Font.Bold = True
.Font.Size = 12
End With
Range("A3").Formula = "File Name:"
Range("B3").Formula = "File Size:"
Range("C3").Formula = "File Type:"
Range("D3").Formula = "Date Created:"
Range("E3").Formula = "Date Last Accessed:"
Range("F3").Formula = "Date Last Modified:"
Range("G3").Formula = "Attributes:"
Range("H3").Formula = "Short File Name:"
Range("A3:H3").Font.Bold = True
ListFilesInFolder "E:\SPMA\LAIN-LAIN\", False
' list all files included subfolders
End Sub
Sub ListFilesInFolder(SourceFolderName As String, IncludeSubfolders As Boolean)
' lists information about the files in SourceFolder
' example: ListFilesInFolder "C:\FolderName\", True
Dim FSO As Scripting.FileSystemObject
Dim SourceFolder As Scripting.Folder, SubFolder As Scripting.Folder
Dim FileItem As Scripting.File
Dim r As Long
Set FSO = New Scripting.FileSystemObject
Set SourceFolder = FSO.GetFolder(SourceFolderName)
r = Range("A65536").End(xlUp).Row + 1
For Each FileItem In SourceFolder.Files
' display file properties
Cells(r, 1).Formula = FileItem.Path '& FileItem.Name
Cells(r, 2).Formula = FileItem.Size
Cells(r, 3).Formula = FileItem.Type
Cells(r, 4).Formula = FileItem.DateCreated
Cells(r, 5).Formula = FileItem.DateLastAccessed
Cells(r, 6).Formula = FileItem.DateLastModified
Cells(r, 7).Formula = FileItem.Attributes
Cells(r, 8).Formula = FileItem.ShortPath & FileItem.ShortName
' use file methods (not proper in this example)
' FileItem.Copy "C:\FolderName\Filename.txt", True
' FileItem.Move "C:\FolderName\Filename.txt"
' FileItem.Delete True
r = r + 1 ' next row number
Next FileItem
If IncludeSubfolders Then
For Each SubFolder In SourceFolder.SubFolders
ListFilesInFolder SubFolder.Path, True
Next SubFolder
End If
Columns("A:H").AutoFit
Set FileItem = Nothing
Set SourceFolder = Nothing
Set FSO = Nothing
ActiveWorkbook.Saved = True
End Sub
Workbooks.Add ' create a new workbook for the file list
' add headers
With Range("A1")
.Formula = "Folder contents:"
.Font.Bold = True
.Font.Size = 12
End With
Range("A3").Formula = "File Name:"
Range("B3").Formula = "File Size:"
Range("C3").Formula = "File Type:"
Range("D3").Formula = "Date Created:"
Range("E3").Formula = "Date Last Accessed:"
Range("F3").Formula = "Date Last Modified:"
Range("G3").Formula = "Attributes:"
Range("H3").Formula = "Short File Name:"
Range("A3:H3").Font.Bold = True
ListFilesInFolder "E:\SPMA\LAIN-LAIN\", False
' list all files included subfolders
End Sub
Sub ListFilesInFolder(SourceFolderName As String, IncludeSubfolders As Boolean)
' lists information about the files in SourceFolder
' example: ListFilesInFolder "C:\FolderName\", True
Dim FSO As Scripting.FileSystemObject
Dim SourceFolder As Scripting.Folder, SubFolder As Scripting.Folder
Dim FileItem As Scripting.File
Dim r As Long
Set FSO = New Scripting.FileSystemObject
Set SourceFolder = FSO.GetFolder(SourceFolderName)
r = Range("A65536").End(xlUp).Row + 1
For Each FileItem In SourceFolder.Files
' display file properties
Cells(r, 1).Formula = FileItem.Path '& FileItem.Name
Cells(r, 2).Formula = FileItem.Size
Cells(r, 3).Formula = FileItem.Type
Cells(r, 4).Formula = FileItem.DateCreated
Cells(r, 5).Formula = FileItem.DateLastAccessed
Cells(r, 6).Formula = FileItem.DateLastModified
Cells(r, 7).Formula = FileItem.Attributes
Cells(r, 8).Formula = FileItem.ShortPath & FileItem.ShortName
' use file methods (not proper in this example)
' FileItem.Copy "C:\FolderName\Filename.txt", True
' FileItem.Move "C:\FolderName\Filename.txt"
' FileItem.Delete True
r = r + 1 ' next row number
Next FileItem
If IncludeSubfolders Then
For Each SubFolder In SourceFolder.SubFolders
ListFilesInFolder SubFolder.Path, True
Next SubFolder
End If
Columns("A:H").AutoFit
Set FileItem = Nothing
Set SourceFolder = Nothing
Set FSO = Nothing
ActiveWorkbook.Saved = True
End Sub
Tuesday, March 8, 2011
Artikel Bagus Tentang Squidoo.com
Buka di link ini http://www.squidoo.com/workathomewithsquidoo
Cerita ibu rumah tangga yang berhasil menjalankan bisnis di squidoo.com dengan bermodal menjadi penulis artikel di squidoo.com.
Ibu tersebut memperoleh pendapatan lebih dari $1.000 per bulan……
Membuat EA secara Online
Buka aja di alamat ini http://sufx.core.t3-ism.net/ExpertAdvisorBuilder/
Layanan berbasis web untuk membuat Expert Advisor forex khusus platform Meta Trader
Wednesday, March 2, 2011
MySQL Ngga Bisa Jalan
Hmmm.... dah beberapa hari bingung dengan MySQL yang ngga bisa di start, sementara Apachenya bisa di start. Kebetulan pake XAMPP neh.
Eh ternyata, ada service yang bernama "VCL MySQL Database Server" yang menjadi faktor utama ngga jalannya MySQL dari XAMPP. Service tersebut adalah bawaan program yang ku install beberapa waktu lalu.
Setelah menonaktifkan service tersebut, alhamdulillah MySQL dari XAMPP udah berjalan.
Eh ternyata, ada service yang bernama "VCL MySQL Database Server" yang menjadi faktor utama ngga jalannya MySQL dari XAMPP. Service tersebut adalah bawaan program yang ku install beberapa waktu lalu.
Setelah menonaktifkan service tersebut, alhamdulillah MySQL dari XAMPP udah berjalan.
Monday, February 21, 2011
Mengaktifkan Telnet Pada Windows 7
Secara default, fasilitas Telnet pada Windows 7 tidak aktif. Berikut cara mengaktifkannya :
- Klik menu Start
- Klik Control Panel
- Klik "Programs And Features"
- Klik "Turn Windows features on or off"
- Beri tanda cek pada "Telnet Client"
- Klik OK
Subscribe to:
Posts (Atom)