.:: Jasa Membuat Aplikasi Website,Desktop,Android Order Now..!! | | Order Now..!! Jasa Membuat Project Arduino,Robotic,Print 3D ::.

Kekerasan Merusak Benang yang Sulit ,Bukan Menguraikannya

0 komentar
Suatu hari ,angin selatan dan matahari bertikai siapakah yang paling kuat diantara mereka berdua.Lalu mereka bersepakat bahwa yang menang diantara mereka adalah siapa yang dapat menelanjangi seorang musafir dari baju yang dikenakannya.
Angin mencoba pertama kali,tetapi serangannya yang dahsyat hanya dapat menjadikan sang musafir tersebut merapikan bajunya kuat-kuat,dan ketika serangan menjadi lebih dahsyat lagi,suhu yang sedingin-dinginnya ini hanya membuatnya menambah jumlah selimut yang menyelimutinya,dan pada akhirnya angin selatan merasa letiha dan menyerahkan musafir tersebut pada sang matahari.
Pada awalnya matahari mulai menyinari dengan panas yang sedang,sehingga membuat musafir itu melepas penutup kepalanya,tetapi lama-kelamaan ia menyinari semakin panas yang menjadikan musafir itu tidak kuat menahannya,sehingga ia melepas bajunya dan menuju sungai terdekat untuk mandi.





�Basel Syaikhu � Lubang pada Tembok Akal�
Suni

Keputusan Anda untuk Tidak Bertoleransi adalah Keputusan Anda untuk Menderita

0 komentar

Alkisah ,ada seorang laki-laki yang sedang mengujungi salah satu kebun binatang lalu dia membaca tulisan peringatan �Bahaya,Jangan dekati Singa!!� .Tetapi laki-laki itu tidak menghiraukan peringatan tersebut ,malah ia memasukkan tangannya kedalam terali kandang.Tiba-tiba saja ,singa menerkam tangannya ,beruntung ia terluka hanya membutuhkan pengobatan ringan.Kejadian ini membuatnya kaget dan berkata ada dirinya sendiri ,�Kenapa singa itu menerkamku ? Padahal aku orang baik.Aku hanya ingin bermain dengannya dan tidak berfikir bahwa dia akan menyakitiku,tetapi aku telah memaklumi dan melupakan apa yang telah terjadi�Dua bulan telah berlalu ,laki-laki tersebut mengunjungi kebun binatang itu lagi.Dia melihat kandang singa dan memasukkan tangan kedalam kandangnya.Namun kali ini singa menerkam seluruh lengannya.Kemudian laki-laki ini kembali dilarikan ke Rumah sakit dan ia berhasil disembuhkan karena sebuah mukjizat.Setelah 6 bulan berikutnya ,laki-laki ini kembali mengunjungi kebun binatang untuk ketiga kalinya,tetapi dia berdiri di depan kandang singa dan berkata ,�Aku tahu bahwa kamu tidak bermaksud menyakitiku,aku telah memaklumimu.Namun kali ini aku tidak akan lupa�.�Basel Syaikhu � Lubang pada Tembok Akal�
Suni

Membuat Halaman Login pada CodeIgniter

0 komentar
Membuat Halaman Login dengan CodeIgniterMembuat Halaman Login pada CodeIgniter PHP ini digunakan untuk membuat Halaman Admin adalah sambungan dari artikel CodeIgniter yang lain yaitu Menampilkan Data(View), Mengedit Data (Update), dan Menghapus (Delete).

Teknik membuat halaman login ini digunakan untuk membuat halaman Administrator yang diharapkan terlindungi dari akses oleh pengguna umum, atau pengguna yang tidak mengetahui username dan password, atau istilahnya pengguna yang tidak terautentikasi :)

Buat dahulu tabel (misal di database dbci seperti sebelumnya) berisi data login, di MySQL, misalnya seperti ini :


CREATE TABLE IF NOT EXISTS `login` (
`username` varchar(50) NOT NULL,
`password` varchar(50) DEFAULT NULL,
`akses` varchar(50) DEFAULT NULL,
PRIMARY KEY (`username`)
);

INSERT INTO `login` (`username`, `password`, `akses`) VALUES
('admin', MD5('123'), '1'),
('bos', MD5('321'), '2');

Aplikasi ini terdiri dari 5 buah file, pertama kita buat webci/application/views/vadmin.php seperti ini :

<?php
echo "Selamat Datang ";
if($akses == '1')
{
echo "admin";
}
elseif($akses == '2')
{
echo "user";
}
echo "<br/>";
echo anchor('login/logout','Logout');
?>

Kemudian kita buat webci/application/views/vlogin.php

<?php echo form_open('login/ceklogin'); 
if(isset($pesan))
{
echo $pesan;
}
?>
<table>
<tr>
<td>Username</td>
<td><?php echo form_input('username'); ?></td>
</tr>
<tr>
<td>Password</td>
<td><?php echo form_password('password'); ?></td>
</tr>
<tr>
<td>&nbsp;</td>
<td><?php echo form_submit('submit','Login'); ?></td>
</tr>
</table>
<?php echo form_close(); ?>

Setelah itu buatlah file model, yaitu webci/application/models/mlogin.php :

<?php
class Mlogin extends CI_Model{
function cekdb(){
$username = $this->input->post('username');
$password = md5($this->input->post('password'));
$this->db->where('username',$username);
$this->db->where('password',$password);
$query = $this->db->get('login');
return $query->result();
}
}
?>

Kemudian kita buat Controller admin.php di webci/application/controllers/admin.php :

<?php
class Admin extends CI_Controller{
function index(){
if($this->session->userdata('login') != 'TRUE')
{
$data['pesan'] = 'Belum Login';
$this->load->view('vlogin',$data);
}
else
{
$data['akses'] = $this->session->userdata('akses');
$this->load->view('vadmin',$data);
}
}
}
?>

Langkah terakhir tambahkan kode program ini pada Controller login.php yang ada di webci/application/controllers/login.php :

<?php
class Login extends CI_Controller{
function index(){
$this->load->view('vlogin');
}

function ceklogin(){
$this->load->model('mlogin');

$data['hasilquery'] = $this->mlogin->cekdb();
$this->load->library('session');
//print_r($data['hasilquery']); exit;
if($data['hasilquery'] != null){
$username = $this->input->post('username');
//atau bisa dari database
$username = $data['hasilquery'][0]->username;
$akses = $data['hasilquery'][0]->akses;
$sessiondata = array('userlogin'=>$username,'login'=>'TRUE','akses'=>$akses);
$this->session->set_userdata($sessiondata);
//untuk mengeset satu saja variable
$this->session->set_userdata('userlogin', $username);
$data['akses']=$this->session->userdata('akses');
//echo $this->session->userdata('userlogin');
//print_r($data['hasilquery']);
$this->load->view('vadmin',$data);
}
else
{
$data['pesan'] = 'Login Gagal';
$this->load->view('vlogin',$data);
}
}
function logout(){
//untuk mengeset variable satu per satu
$this->session->set_userdata('userlogin', '');
$this->session->set_userdata('login', 'false');
$sessiondata = array('userlogin'=>'','login'=>'FALSE');
$this->session->unset_userdata($sessiondata);
$this->load->view('vlogin');
}
}
?>

Hasilnya, panggil halaman Login dengan url http://127.0.0.1/webci/login/ :

Membuat Halaman Login dengan CodeIgniter

Setelah mengetikkan username dan password dengan benar bisa masuk halaman admin :

Membuat Halaman Login dengan CodeIgniter Admin Page


Dan bisa melakukan logout,

Membuat Halaman Login dengan CodeIgniter Logout

Kemudian jika langsung mengakses halaman login padahal belum login hasilnya akan dikembalikan ke halaman login :

Membuat Halaman Login dengan CodeIgniter Belum Login

Project selengkapnya menyusul :)

Semoga berguna.
Suni

Membuat Halaman Login pada CodeIgniter

0 komentar
Membuat Halaman Login pada CodeIgniter PHP ini digunakan untuk membuat Halaman Admin adalah sambungan dari artikel CodeIgniter yang lain yaitu Menampilkan Data(View), Mengedit Data (Update), dan Menghapus (Delete).

Teknik membuat halaman login ini digunakan untuk membuat halaman Administrator yang diharapkan terlindungi dari akses oleh pengguna umum, atau pengguna yang tidak mengetahui username
Suni

Cara Menghapus Folder dalam Registry

0 komentar
Pernahkah anda mencoba untuk menghapus sebuah key didalam registry ? mungkin pernah, dan bagaimana menghapusnya ? mungkin kalau menghapus key itu semua bisa [LINK], tapi pernahkah anda mencoba untuk menghapus foldernya didalam registry editor itu ?. Nah, sekarang saya mau berbagi sedikit info dengan sobat-sobat vb blog saya .
Langsung menuju tkp agar tidak panjang lebar, sipp (y) .

Masukkan Code ini pada Declaration nya :

Private Declare Function RegDeleteKey Lib "advapi32.dll" Alias "RegDeleteKeyA" _
(ByVal hKey As Long, ByVal lpSubKey As String) As Long

Sub DeleteRegistryKey(ByVal hKey As Long, ByVal KeyName As String)
RegDeleteKey hKey, KeyName
End Sub

Dan untuk menghapusnya, berikan code ini command button anda :

Const HKEY_CURRENT_USER = &H80000001
Dim sKey As String
sKey = "Software\Microsoft\Internet Explorer\TypedURLs"
DeleteRegistryKey HKEY_CURRENT_USER, sKey

Untuk "Software\Microsoft\Internet Explorer\TypedURLs"   , bisa diganti dengan alamat folder di registry editornya, dan HKEY_CURRENT_USER bisa di ganti dengan yang lain .

Untuk VB.NET bisa lihat disini

Semoga bermanfaat .   
Suni

Source Code Sistem Penjualan Online / Inline

0 komentar



Setelah Massa Pembuatan Yang Cukup Lama Akhirnya Jadi Juga ni Designnya.
+JQuery + Ajax + PHP
Monggo Langsung Di Dowload Saja

download disini
password disini



* Bagi Yang Ingin Di Buatkan Aplikasi WEB. monggo
PM di Facebook Saya

Suni

Contoh Penggunaan DialogResult pada Object, MessageBox dan Form VBNET

0 komentar
Ada yang sudah tahu apa itu DialogResult? Sederhanya adalah jika anda memunculkan/membuat messagebox, maka akan ada pilihan apakah hasilnya akan Yes, No, Cancel dan lain lain. Di VB.Net ada 8 DialogResult (dengan index dari 0) :
0 = Windows.Forms.DialogResult.None
1 = Windows.Forms.DialogResult.OK
2 = Windows.Forms.DialogResult.Cancel
3 = Windows.Forms.DialogResult.Abort
4 = Windows.Forms.DialogResult.Retry
5 = Windows.Forms.DialogResult.Ignore
6 = Windows.Forms.DialogResult.Yes
7 = Windows.Forms.DialogResult.No
Jika anda ingin membuat pesan "Yes, No, Cancel" dan masing masing pilihan mempunyai kondisi yang berbeda, maka anda dapat menulis sintaknya seperti ini :
Dim hasil As DialogResult
hasil = MessageBox.Show("Yes or No or Cancel ?", "Tanya", MessageBoxButtons.YesNoCancel, MessageBoxIcon.Question)
Select Case hasil
      CaseWindows.Forms.DialogResult.Yes
                'jika yes maka ...
      CaseWindows.Forms.DialogResult.No
                'jika no maka ...
      CaseWindows.Forms.DialogResult.Cancel
                'jika cancel maka ...
End Select

DialogResult jika dapat anda aplikasikan untuk validasi pada object : OpenFileDialog, SaveFileDialog, ColorDialog dan lain lain. Sehingga dapat diketahui apakah user itu meng-click open atau cancel misalnya.

Dim buka As New OpenFileDialog
With buka
    .Filter = "Music File|*.mp3"
    If.ShowDialog = Windows.Forms.DialogResult.Cancel Then
                'jika batal maka no action
    Else
                'jika klik open
      TextBox1.Text = .FileName
    End If
End With

Selain itu jika ada pernah memanggil form lain (form2) dari tombol di form1, anda juga dapat menggunakan DialogResult supaya lebih praktis. Misalnya saya sudah membuat form seperti ini :
Kemudian saya panggil dari form1 (saat tekan button1) dan sekaligus membuat kondisi selanjutnya.

Private Sub Button1_Click(ByValsender As System.Object, ByVal e AsSystem.EventArgs) Handles Button1.Click
   Dim new_formAs New Form2
   Ifnew_form.ShowDialog = Windows.Forms.DialogResult.OK Then
            'jika Setuju ...
   Else
            'jika tidak setuju ...
   End If
End Sub

Pertanyaanya, bagaimana kita bisa tahu SETUJU = OK dan TIDAK SETUJU = Cancel ? jawabannya adalah dengan setting dialoag result pada masing masing button di event form2_load()

Private Sub Form2_Load(ByValsender As System.Object, ByVal e AsSystem.EventArgs) Handles MyBase.Load
   Button_setuju.DialogResult = Windows.Forms.DialogResult.OK
   Button_tidak.DialogResult = Windows.Forms.DialogResult.Cancel
End Sub

Tags:
How to use the DialogResult property in Visual Basic .NET, Dialog forms in VB.NET - Modal, ShowDialog, and DialogResult, VB.NET MessageBox.Show Examples, VB.NET 2005 DialogResult.OK, Cancel dialog result from closing form, Get DialogResult
Suni

Tawk.to