Thursday, November 21, 2013

Cara menghemat baterai android

Tips menhemat baterai pada android anda

Banyak user android mengeluhkan kenapa baterai handphone mereka sangat cepat habis. Padahal wajar kalau baterai pada smartphone sangatlah boros namu ada beberpa cara untuk menghemat baterai pada android.

Bagi para user android tips - tips untuk menghemat baterai ada banyak cara nya mulai dari menginstal aplikasi,meredupkan layar dan lain sebagainya. mari simak cara - cara untuk menghemat baterai pada android anda:

Matikan bluetooth, GPS ,Layanan Data,

fitur - fitur seperti GPS, bluetooth sangat jarang digunakan jadi sebaiknya gunakan saja pada saat yang diperlukan. untuk layanan data gunakan koneksi 2G saja dikarenakan jaringan 3G sangat banyak menghabiskan energi.

Redupkan kecerahan Layar

Layar pada smartphone cukup banyak menghabiskan energi baterai jadi atur kecerahan layar secukupnya. masuk ke setting untuk mengatur kecerahannya

Gunakan aplikasi penghemat baterai

di playstore cukup banyak ada aplikasi yang digunakan untuk menghemat baterai smartphone anda.

Jangan terlalu banyak melakukan mulitasking

semakin banyak aplikasi yang dibuka pada saat yang bersamaan akan banyak menguras energi baterai smartphone anda dikarenakan setiap aplikasi android yang berjalan memakan memory yang cukup banyak sehingga memperlambat kinerja smartphone anda dan memakan energi yang banyak.

cukup sekian tips - tips Cara menghemat baterai android dari saya semoga bermanfaat bagi para pembaca

Root


Banyak user baru android bertanya - tanya apa root itu dan apa fungsinya. dengan jumlah pengguna sistem operasi android yang sudah mencapai ratusa juta dsemoga informasi ini menjadi bermanfaat.
Cara melakukan root pada setiap device android adalah berbeda – beda. Informasi yang saya berikan mengenai pengertian root pada android, manfaatnya dan kelebihan serta kekurangannya.

Root : Root adalah suatu system account yang memiliki kekuasaan absolut untuk mengakses dan mengeksekusi semua file, command, system, dalam sistem operasi berbasis linux yang juga adalah androi. root ini punya akses tanpa batas yang bisa mengubah, menghapus, menambah, bahkan merusak semua yang ada didalam sistem handphone kita. Nge-root artinya seperti masuk menjadi system administrator pada computer berbasis windows.

Fungsi : memberi hak penuh kepada pengguna Android untuk dapat masuk ke sistem Android. Dengan melakukan Root, pengguna dapat menambah, mengurangi maupun memodifikasi file-file atau data-data yang terletak pada sistem Android yang bila dalam keadaan standar (belum root) file-file tersebut tidak dapat di akses. Pada root ini juga user dapat mengganti ROM formware dengan COSTUM ROM yang tersedia.

Manfaat :
Dapat mengganti rom dengan costum rom
Bias menghapus aplikasi bawaan android
Menambah memory internal pada device anda
Dapat memodifikasi system pada android
Dapat menginstal aplikasi yang membutuhkan akses penuh terhadap sistem

Kekurangan :
Root dapat menghapus garansi device anda

Membuat laporan berdasarkan kriteria pada Crystal report dan VB6


Kali ini saya akan membagikan cara untuk menampilakan laporan berdasrkan kriteria tertentu seperti nomor nota yang menggunakan bahasa pemrograman Visual Basic 6.  pada program ini menggunakan crystal report sebagai laporannya  semoga bisa menambah wawasan bagi para pembaca semuanya.

source code :

  Me.MousePointer = 11
    With CrystalReport1
        .Reset
        .ReportFileName = App.Path & "\Jual.rpt"
        .DataFiles(0) = App.Path & "\STOKIS.mdb"
        .SelectionFormula = "{TB_Jual.noNota}='" & Text1.Text & "'"
        .WindowMinButton = False
        .WindowShowCancelBtn = True
        .WindowShowCloseBtn = True
        .WindowShowPrintBtn = True
        .WindowShowPrintSetupBtn = True
        .WindowParentHandle = MDIForm1.hWnd
        .WindowState = crptMaximized
        .Action = 1
    End With
Me.MousePointer = 1

untuk memilih kriteria harap diperhatikan "{TB_Jual.noNota}='" & Text1.Text & "'" ---> gantilah agar sesuai dengan kriteria anda.

berikut screenshootnya :

Autonumber berdasarkan tanggal pada VB6

Pada kesempatan sebelumnya saya telah membagikan informasi mengenai pembuatan autonumber. Kali ini saya akan membagikan cara untuk membuat autonumber atau penomoran secara otomatis dengan menggunakan tanggal sebagai acuan yang menggunakan bahasa pemrograman Visual Basic 6. Pada program ini menggunakan perulangan. semoga bisa menambah wawasan bagi para pembaca semuanya.

berikut source code nya :

Function autoNumber() As String
    Dim rs As New ADODB.Recordset
    rs.Open "select max(kode_beli) from pembelian where month(tgl_beli)=" & Month(Now) & _
    " and year(tgl_beli)=" & Year(Now), cn
    autoNumber = IIf(IsNull(rs.Fields(0)), Right(Year(Now), 2) & Month(Now) & "001", _
        Left(rs.Fields(0), 4) & Format(Right(rs.Fields(0), 3) + 1, "0##"))
    rs.Close
End Function

berikut screenshootnya :






Autonumber pada VB6

Kali ini saya akan membagikan cara untuk membuat autonumber atau penomoran secara otomatis dengan menggunakan bahasa pemrograman Visual Basic 6. Pada program ini menggunakan perulangan. semoga bisa menambah wawasan bagi para pembaca semuanya.

Sub auto()


 Dim Con As New ADODB.Connection
  Dim Rst As New ADODB.Recordset
  Dim s As String
    

 'mengatur dan membuka koneksi
   Con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\SPK.mdb;"
  '    Con.Open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=STOKIS;Data Source=OKA-881F6BA00CA"
    
    
    'mengambil 4 karakter dari kanan (yg merupakan nomer) dari field ID, kemudian dicari nilai yg paling besar (max)
    'kemudian hasilnya d tampung d field buatan dgn nama Nomor
    Rst.Open "select max(right(Kd_penilaian,4)) as kd from TB_Penilaian", Con, adOpenKeyset
    
    ''jika berisi null atau tdk ditemukan
    If IsNull(Rst!kd) Then
       Text1.Text = "0001" 'member nilai awal
    Else
     Text1.Text = "ID" & Format(Rst!kd + 1, "0000")
    End If
    
    Con.Close

End Sub

yang kemudian fungsi diatas bisa dipanggil pada button baru dengan cara

Call auto


screenshoot nya :


Deret bilangan ganjil pascal

Kali ini saya akan membagikan cara untuk membuat deret bilangan ganjil dengan menggunakan bahasa pemrograman pascal. Pada program ini menggunakan perulangan. semoga bisa menambah wawasan bagi para pembaca semuanya.

berikut source code nya :

program bilanganganjil;
uses crt;
var
i,n:integer;
begin
clrscr;
writeln('masukan batas akhir');
readln(n);
for i:=1 to n do
 if (i mod 2 = 1) then
 write(i,' ');
end.

berikut screenshoot nya :

Perkalian deret dengan pascal

Kali ini saya akan membagikan cara untuk membuat perkalian berderet atau perkalian faktorial dengan menggunakan bahasa pemrograman pascal. Pada program ini menggunakan perulangan. semoga bisa menambah wawasan bagi para pembaca semuanya.

berikut codingnya :

program perkalianderet;
uses crt;

var
 batasawal,batasakhir,jumlah:real;
 begin
 clrscr;
 writeln('masukan awal');
 readln(batasawal);
 writeln('masukan batas akhir'); readln(batasakhir);
 jumlah:=1;


 repeat
 batasawal:=batasawal+1;
 write(batasawal:2,'x':2);
 jumlah:=jumlah*batasawal;
 until batasawal=batasakhir;
 write('=',jumlah);
 readkey;

end.

berikut screenshootnya :