Membatasi inputan pada VB.NET

Bismillah....

Pembatasan karakter tertentu dalam dunia pemrograman itu penting untuk menjegah kesalahan entry data oleh pengguna. Misalkan tipe field pada database bertipe angka jika di entry data bertipe string akan error.
Pilih event keypress pada textbox dan ketik script berikut ini yang bergaris tebal :

 Private Sub tjabatantxt_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles tjabatantxt.KeyPress
        If Not ((e.KeyChar >= "0" And e.KeyChar <= "9") Or e.KeyChar = vbBack) Then
            e.Handled = True
        End If
    End Sub

Penjelasan :
Pada textbox tersebut hanya mengizinkan angka 0 - 9 dan tombol Backspace.

Semoga bermanfaat.

Koneksi database MySQL pada VB.NET

Visual basic memberikan pilihan dalam menghubungkan ke database, diantaranya dengan Modul, Class atau ODBC. Pada tulisan ini saya membahas koneksi dengan modul ke database MySql.
1. Download Connector.net yang dibagikan secara gratis. anda bisa mengunjungi situs langsung mysql.
2. Masukkan library Mysql pada project yang anda buat. Add Library > MySql.data
3. Tambahkan Modul dan ketik kode program berikut ini

Imports MySql.Data.MySqlClient
Module ModKoneksi
    Public curFileName As String = Nothing
    Public Database As New MySqlConnection
    Public Tampil As New MySql.Data.MySqlClient.MySqlCommand
    Public Tampilkan As MySql.Data.MySqlClient.MySqlDataReader
    Public Grid As New MySql.Data.MySqlClient.MySqlDataAdapter
    Public Ds As New DataSet
    Public Tabel As String
    Public record As New BindingSource
    Public DMLSql As New MySql.Data.MySqlClient.MySqlCommand
    Public Sub Koneksi()
        Try
            Database.Close()
            Database.ConnectionString = "server=localhost;" _
                & "Port=3306;" _
           & "user id=root;" _
           & "password=admin;" _
           & "database=dblatihan"
            Database.Open()
        Catch ex As Exception
            MsgBox(ex.ToString())
        End Try
    End Sub
  End Module

Solusi Crytal Report ASP.Net 2013

Bismillah.....

Berawal dari pengalaman pribadi yang dibuat pusing selama 2 hari dan alhamdulillah akhirnya setelah melalang buana di dunia maya akhirnya ketemu juga.
Ada perbedaan dalam menggunakan Crystal Report asp.net yang di bundel pada visual studio 2013 dengan asp.net yang dibundel 2010. Jika pada asp.net 2010 tidak ada masalah setelah ngoding ambil data dari database tetapi pada asp.net 2013 anda harus menambahkan sebagai berikut :
1. anda harus mencopy folder aspnet_client yang terdapat pada C:\inetpub\wwwroot\aspnet_client ke aplikasi yang anda buat.
2. tambahkan kode berikut yang bergaris tebal pada web.config

<appSettings>
      <add key="CrystalImageCleaner-AutoStart" value="true" />
      <add key="CrystalImageCleaner-Sleep" value="60000" />
      <add key="CrystalImageCleaner-Age" value="120000" />
      <add key="vs:EnableBrowserLink" value="false"/>
  </appSettings>

Semoga bermanfaat

Shahih Muslim

Assalamu'alaikum....

Apa kabar sahabat semua, Kesempatan kali ini saya akan bagikan kitab shahih muslim.
Download