Cara Partisi Harddisk Eksternal

Banyak pengguna komputer / laptop yang ingin menggunakan atau menambah cadangan (HD) Hardisk Eksternal, tapi masih banyak yang bingung cara partisi hardisk eksternal tersebut. Nah kali ini Gratisan Info akan memberikan panduan Cara Partisi Hardisk Eksternal Aman dan Mudah.
Oke, Langsung saja ikuti panduan cara partisi hardisk eksternal dengan aman dan mudah berikut ini :

• Pasanglah hardisk external anda ke port USB
• Klik kanan My Computer lalu klik Manage.
• Kemudian pilih Disk Management di bawah menu Storage

• Setelah muncul jendela Compter Management, lalu pilihlah Disk 2 jika dikomputer anda sebelumnya hanya tersedia 1 hardisk

• Setelah ketemu kemudian klik kanan pada disk 2 lalu pilih Shrink Volume, kemudian pilih ukuran partisi sesuai yang anda inginkan.

• Kalau sudah diatur silakan tentukan besarnya ukuran partisi, saya membagi rata sekitar 150 GB . kalau sudah tekan tombol Shring.
• Setelah menekan tombol shrink maka otomatis hardisk external anda sudah menjadi 2.

• Klik kanan pada partisi baru, pilih New Simple Volume.
• Kalau ada pertanyaan klik Yes//Next Silakan klik Yes
• Kemudian kembali atur besarna nilai kapasitas jika Anda ingin mengubahnya. jika tidak ada perubahan silakan atur kembali ukurannya lalu klik Next.
• Kemudian pilih salah seperti gbr di bawwh, kalau saya pilih Pilihan paling atas.

• Klik Next

• Tunggu sampai muncuk Finish
• Berikut tampilan kalau hardisk external sudah dipartisi menjadi 2 Drive

• Selesai.......Saya menggunakan OS Windows 7 

Selamat mencoba, semoga berhasil, semoga tips dari saya tentag Cara Partisi Harddisk Eksternal bisa membantu anda dan bermanfaat...

Import DBF to Ms.Access

Jika Anda awalnya membuat program for DOS dengan data menggunakan file DBF, dikemudian hari ingin migrate ke Access, Anda tidak perlu cemas dengan data-data sebelumnya.

Dengan source code dibawah ini Anda akan lebih mudah mengimport data-data file DBF ke Access.

Option Compare Database
Option Explicit

Private Sub cmdImport_Click()
Dim FullPath As String
Dim CurrentPath As String
Dim TableHRDExist As Boolean
Dim i As Integer

  On Error GoTo errorImport

  ' Ambil direktori beserta nama file database ini
  FullPath = CurrentDb.Name
  ' Ambil hanya direktorinya saja
  CurrentPath = Left$(FullPath, InStrRev(FullPath, "\", , vbBinaryCompare) - 1) & "\"
  ' Hapus table [Data HRD]
  CurrentDb.Execute "DROP TABLE [Data HRD];"

TransferDBF:
  ' Transfer file DataHRD.DBF to be table Data HRD
  DoCmd.TransferDatabase _
      acImport, "dBase III", CurrentPath, acTable, _
      "DataHRD.DBF", "Data HRD", False
  i = 0
  For i = 0 To CurrentDb.TableDefs.Count - 1
    If CurrentDb.TableDefs(i).Name = "Data HRD" Then
      TableHRDExist = True
    End If
  Next
  ' Jika table [Data HRD] tidak ada ulangi TransferDBF.
  ' Hal ini untuk mengecek berhasilkah transfer database?
  ' Biasanya transfer database tidak berhasil,
  '    sehingga harus dilakukan pengecekan
  If Not TableHRDExist Then
    GoTo TransferDBF
  End If
  MsgBox "Transfer file DBF telah berhasil.", , "Info"
Exit Sub
errorImport:
  Resume Next
End Sub

File DBF telah disertakan dalam paket download dibawah ini, nama file-nya adalah DataHRD.DBF, jika proses import telah berhasil, maka akan muncul tampilan seperti dibawah ini:

Proses import tsb akan menghasilkan satu table dengan nama Data HRD dengan beberapa record yang juga telah berhasil di import (lihat gambar dibawah).

Tools kecil ini semoga bisa memberikan manfaat.

DOWNLOAD DISINI

Serial Number XP3

Buat Temen2 yang butuhin Srial number Xp3, silahkan coba serial dibawah ini

XP3
PQ7FH-C6TP7-W6KDK-CY4VT-69J6
V2C47-MK7JD-3R89F-D2KXW-VPK3J

XP SP-3 Update Juli 2007
XP8BF-F8HPF-PY6BX-K24PJ-TWT6M
WRY2X-KXT8M-243WY-KQKC7-73D36