Rabu, 26 April 2017

PERANCANGAN DATABASE PADA SQL SERVER, WEB, DAN ASP.NET

Perancangan Database pada sql server, web dan asp.net

Assalamualaikum wr.wb...

Untuk kali ini saya membuat aplikasi web dengan menggunakan sql server dan asp.net, pada aplikasi ini saya membuat data dari struk belanja dan saya membuat normalisasi dari struk tersebut, setelah terbentuk menjadi 3NF atau normalisasi ke tiga, baru lah saya buat database nya didalam sql server dan dijalankan pada visual studio.



Bentuk Normalisasi :

Kemudian buat database :
  1. Buka Microsoft SQL Server
  2. Buat Database 'New Database'
  3. Klik Tables dalam database yang baru saja dibuat 'New Table' isi sesuai kebutuhan yang diperlukan, 'save'.
Visual Studio :
  1. Buka Microsoft Visual Studio
  2. Buat Project, pilih 'New Project pada WEB', 'ASP.NET Empity Web Application', 'ok'.
  3. Klik pada project aplikasi 'Add Web Form'
  4. Buat desain sesuai kebutuhan.
Klik 'Toolbox' pilih 'Gridview', 'Choose Data Source', 'New', 'Database', 'New Connection', 'Change pada Data Source pilih Microsoft SQL Server', ' Ketik nama server kemudian refresh dan pilih database yang sudah dibuat'

Berikut adalah hasil desain :


Berikut adalah sourcode nya :

Imports System.Data
Imports System.Data.OleDb
Imports System.Data.SqlClient

Module Module1
    Public sqlCon As New SqlConnection
    Public Sub dbConn()
        Dim server As String
        server = "Data Source=DESKTOP-V2SAOF1;Initial Catalog=db ilham;Integrated Security=True"
        sqlCon = New SqlConnection(server)
        sqlCon.Open()
    End Sub
End Module

Partial Class UTS
    Inherits System.Web.UI.Page

    Dim sql As String
    Dim da As SqlDataAdapter
    Dim ds As DataSet
    Dim dt As DataTable
    Dim xReader As SqlDataReader

    Sub tampil_data()
        clear()
        dbConn()
        sql = "Select * From Tabel_Barang"
        Dim da = New SqlDataAdapter(sql, sqlCon)
        Dim ds = New Data.DataSet
        ds.Reset()
        da.Fill(ds)
        GridView1.DataSource = ds.Tables(0)
    End Sub

 Sub clear()
        TextBox1.Text = ""
        TextBox2.Text = ""
        TextBox3.Text = ""
        TextBox4.Text = ""
   End Sub

 Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        dbConn()
        Dim query As New SqlCommand("Insert Into Tabel_Barang values('" & TextBox2.Text & "','" & TextBox1.Text & "','" & TextBox3.Text & "','" & TextBox4.Text & "')", sqlCon)
        Dim x = query.ExecuteNonQuery()
        If x = 1 Then
            MsgBox("Data Berhasil Disimpan", MsgBoxStyle.Information, "Sukses")
            tampil_data()
        Else
            MsgBox("Data Gagal Disimpan", MsgBoxStyle.Critical, "Gagal")
        End If

 sqlCon.Close()
        Response.Redirect("UTS.aspx")

    End Sub

Protected Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click

        dbConn()
        Dim query As New SqlCommand("Update Tabel_Barang set nama_barang ='" & TextBox2.Text & "', harga_barang ='" & TextBox3.Text & "', jumlah_barang ='" & TextBox4.Text & "' where kode_barang = '" & TextBox1.Text & "'", sqlCon)
        Dim x = query.ExecuteNonQuery()
        If x = 1 Then
            MsgBox("Data Berhasil di Edit", MsgBoxStyle.Information, "Sukses")
            tampil_data()
        Else
            MsgBox("Data Gagal di Edit", MsgBoxStyle.Critical, "Gagal")
        End If
    sqlCon.Close()
        Response.Redirect("UTS.aspx")

    End Sub

  Protected Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click

        dbConn()
        Dim query As New SqlCommand("Delete Tabel_Barang where kode_barang = '" & TextBox1.Text & "'", sqlCon)
        Dim x = query.ExecuteNonQuery()
        If x = 1 Then
            MsgBox("Data Berhasil di Hapus", MsgBoxStyle.Information, "Sukses")
            tampil_data()
        Else
            MsgBox("Data Gagal di Hapus", MsgBoxStyle.Critical, "Gagal")
        End If
        sqlCon.Close()
        Response.Redirect("UTS.aspx")

    End Sub

 Protected Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click

        clear()
    End Sub

End Class


Berikut adalah hasil run nya :


Didalam aplikasi ini saya hanya membuat 1 form, yaitu form Tabel_Barang.
Dalam tabel ini hanya menampilkan apa saja yang dilakukan ketika transaksi pada toko tersebut.

Semoga bermanfaat :) 

Wassalamualaikum wr.wb .....

Sabtu, 14 Januari 2017

Aplikasi Administrator Pendaftaran Turnament Futsal

Assalammualaikum pada postingan kali ini gue bakal bikin program di Visual Studio dan program ini akan terhubung ke database (Ms.Access), Program ini tentang aplikasi untuk administrator "Pendaftaran Turnament Futsal", Aplikasi ini hanya bisa di gunakan oleh admin saja. Cukup penjelasan dan basa-basinya kita langsung saja ke pembuataannya oke.

Pertama kalian harus membuat beberapa form disini gue membuat 3 form dan yg akan terhubung dengan database ada 1 form, oke pertama buat form seperti ini :

Sabtu, 19 November 2016

Membuat Aplikasi Pemesanan "Caffe Nugraha" Secara Modern Menggunakan Visual Studio


Assalamu'alaikum wr.wb


Ketemu lagi di postingan ini, kali ini saya akan membuat aplikasi pemesanan di caffe secara modern menggunakan Visual Studio. Jujur saja kali ini saya mengkhayal sedikit hehehe, ywdh berikut adalah tutorialnya :


1. Buka Aplikasi Visual Studio nya :




2. Kemudian kita buat "Project" dengan cara klik File > New > Project :



 3. Setelah kita sudah melakukan perintah di atas akan muncul tampilan seperti ini :



4. Setelah itu kita bisa desain project kita sesuai apa yg ingin ita buat :


5. Kita buat hasil outputnya menggunakan word :



6. Setelah itu kita Bookmark agar terhubung dengan Visual Studio nya :



7. Selanjutnya kita bisa hubungkan Visual Studio dan Word dengan cara klik Project > Add Reference :



8. Lalu kita kasih tanda ceklis pada "Microsoft Office, Interop, Word :



9. Nah kalo sudah mengikuti perintah di atas kita bisa menuliskan Sourcode nya :



10. Berikutnya kita tuliskan sourcode pada bagian ( No. Meja) :




11. Lalu kita menuliskan sourcode pada bagian ( Makanan ) :


12. Selanjutnya kita menuliskan sourcode pada bagian ( Minuman ) :


13. Berikutnya kita menuliskan sourcode nya pada bagian ( Word) :



14. Sesudah itu kita bisa Run Projectnya :



15. Setelah muncul tampilan seperti di atas kita bisa mengisi "No. Meja, Makanan, dan Minuman" sesuai dengan yang kita mau, lalu kita bisa langsung tekan tombol "Word" :



16. Setelah kita sudah selesai melakukan perintah di atas,akan muncul tampilan seperti ini :


17. Kalau sudah muncul tampilan seperti di atas dinyatakan Program telah selesai atau berhasil.


Berikut adalah sourcode nya :

Imports word = Microsoft.Office.Interop.Word
Public Class Form1
    Dim appnya As New word.Application
    Dim dokumennya As word.Document
    Private Sub RadioButton1_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton1.CheckedChanged
        TextBox2.Text = RadioButton1.Text
        PictureBox1.Image = System.Drawing.Image.FromFile("C:\Users\M.Ilham Nugraha\Desktop\foto\nasgor.jpg")
    End Sub

    Private Sub RadioButton2_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton2.CheckedChanged
        TextBox2.Text = RadioButton2.Text
        PictureBox1.Image = System.Drawing.Image.FromFile("C:\Users\M.Ilham Nugraha\Desktop\foto\baksotelor.jpg")
    End Sub

    Private Sub RadioButton3_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton3.CheckedChanged
        TextBox2.Text = RadioButton3.Text
        PictureBox1.Image = System.Drawing.Image.FromFile("C:\Users\M.Ilham Nugraha\Desktop\foto\mieayam.jpg")
    End Sub

    Private Sub RadioButton4_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton4.CheckedChanged
        TextBox2.Text = RadioButton4.Text
        PictureBox1.Image = System.Drawing.Image.FromFile("C:\Users\M.Ilham Nugraha\Desktop\foto\kwetiau.jpg")
    End Sub

    Private Sub RadioButton5_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton5.CheckedChanged
        TextBox2.Text = RadioButton5.Text
        PictureBox1.Image = System.Drawing.Image.FromFile("C:\Users\M.Ilham Nugraha\Desktop\foto\sotoayam.jpg")
    End Sub

    Private Sub RadioButton6_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton6.CheckedChanged
        TextBox2.Text = RadioButton6.Text
        PictureBox1.Image = System.Drawing.Image.FromFile("C:\Users\M.Ilham Nugraha\Desktop\foto\sateayam.jpg")

    End Sub

    Private Sub RadioButton7_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton7.CheckedChanged
        TextBox3.Text = RadioButton7.Text
        PictureBox2.Image = System.Drawing.Image.FromFile("C:\Users\M.Ilham Nugraha\Desktop\foto\airmineral.jpg")
    End Sub

    Private Sub RadioButton8_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton8.CheckedChanged
        TextBox3.Text = RadioButton8.Text
        PictureBox2.Image = System.Drawing.Image.FromFile("C:\Users\M.Ilham Nugraha\Desktop\foto\iceteh.jpg")
    End Sub

    Private Sub RadioButton9_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton9.CheckedChanged
        TextBox3.Text = RadioButton9.Text
        PictureBox2.Image = System.Drawing.Image.FromFile("C:\Users\M.Ilham Nugraha\Desktop\foto\vanilla.jpg")
    End Sub

    Private Sub RadioButton10_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton10.CheckedChanged
        TextBox3.Text = RadioButton10.Text
        PictureBox2.Image = System.Drawing.Image.FromFile("C:\Users\M.Ilham Nugraha\Desktop\foto\greentea.jpg")
    End Sub

    Private Sub RadioButton11_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton11.CheckedChanged
        TextBox3.Text = RadioButton11.Text
        PictureBox2.Image = System.Drawing.Image.FromFile("C:\Users\M.Ilham Nugraha\Desktop\foto\cappucino.jpg")
    End Sub

    Private Sub RadioButton12_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton12.CheckedChanged
        TextBox3.Text = RadioButton12.Text
        PictureBox2.Image = System.Drawing.Image.FromFile("C:\Users\M.Ilham Nugraha\Desktop\foto\lemontea.jpg")
    End Sub

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        For a = 1 To 26
            ComboBox1.Items.Add(a)
        Next
    End Sub

    Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
        Select Case ComboBox1.Text
            Case "1"
                TextBox1.Text = "1"
            Case "2"
                TextBox1.Text = "2"
            Case "3"
                TextBox1.Text = "3"
            Case "4"
                TextBox1.Text = "4"
            Case "5"
                TextBox1.Text = "5"
            Case "6"
                TextBox1.Text = "6"
            Case "7"
                TextBox1.Text = "7"
            Case "8"
                TextBox1.Text = "8"
            Case "9"
                TextBox1.Text = "9"
            Case "10"
                TextBox1.Text = "10"
            Case "11"
                TextBox1.Text = "11"
            Case "12"
                TextBox1.Text = "12"
            Case "13"
                TextBox1.Text = "13"
            Case "14"
                TextBox1.Text = "14"
            Case "15"
                TextBox1.Text = "15"
            Case "16"
                TextBox1.Text = "16"
            Case "17"
                TextBox1.Text = "17"
            Case "18"
                TextBox1.Text = "18"
            Case "19"
                TextBox1.Text = "19"
            Case "20"
                TextBox1.Text = "20"
            Case "21"
                TextBox1.Text = "21"
            Case "22"
                TextBox1.Text = "22"
            Case "23"
                TextBox1.Text = "23"
            Case "24"
                TextBox1.Text = "24"
            Case "25"
                TextBox1.Text = "25"
            Case "26"
                TextBox1.Text = "26"
        End Select
    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        dokumennya = appnya.Documents.Open("C:\Users\M.Ilham Nugraha\Documents\Visual Studio 2012\Projects/Caffe Nugraha.docx")

        dokumennya.Bookmarks("NoMeja").Select()
        appnya.Selection.TypeText(TextBox1.Text)

        dokumennya.Bookmarks("Makanan").Select()
        appnya.Selection.TypeText(TextBox2.Text)

        dokumennya.Bookmarks("Minuman").Select()
        appnya.Selection.TypeText(TextBox3.Text)

        dokumennya.SaveAs2("C:\Users\M.Ilham Nugraha\Desktop\hasil\Order dari meja " & TextBox1.Text & ".docx")

        appnya.Visible = True

    End Sub

End Class



Jumat, 12 Februari 2016

MEMBUAT APLIKASI LIST FINGER STYLE GUITAR MENGGUNAKAN ECLIPSE


Asslamu’alaikum wr.wb


Ketemu lagi dipostingan selanjutnya, yaitu membuat aplikasi dengan menggunakan eclipse. Kali ini saya akan membuat aplikasi “Finger Style Guitar”. Berikut adalah tutorial cara membuat aplikasinya.

1.   Buka aplikasi android Android Developer Tools/Eclipse










2.  Kemudian pilih tempat penyimpanannya, disini saya simpan di folder android adt di Local Disk (C:)








3.   Selanjutnya kita akan buat project baru, caranya klik NewàAndroid Application Project















4.   Beri nama aplikasi/nama project, disini saya beri nama Finger Style Guitar, klik Next













5.   Lalu Klik Next













6.   Pilih salah satu dari Image, Clipart, dan Text. Disini saya memilih Clipart, kemudian klik Choose dan pilih clipart yang diinginkan, klik Next














7.   Kemudian akan muncul gambar seperti dibawah ini, pilih Blank Activity, klik Next














8.   Klik Finish














9.   Setelah selesai membuat project, buat desain listview nya dengan cara klik palette  Composite, lalu pilih ListView dengan cara di drag drop ke desain activity nya















10. Kemudian beri kodingan (source code) pada activity_main.xml nya seperti berikut, biasanya source code seperti ini sudah muncul dengan sendirinya, jadi kita tidak perlu mengubahnya lagi













Source Code :
    <RelativeLayout xmlns:android="http://schemas.android.com/apk/res/android"
            xmlns:tools="http://schemas.android.com/tools"
            android:layout_width="match_parent"
            android:layout_height="match_parent"
            android:paddingBottom="@dimen/activity_vertical_margin"
            android:paddingLeft="@dimen/activity_horizontal_margin"
            android:paddingRight="@dimen/activity_horizontal_margin"
            android:paddingTop="@dimen/activity_vertical_margin"
            tools:context=".MainActivity" >

            <ListView
        android:id="@+id/listView1"
        android:layout_width="match_parent"
        android:layout_height="wrap_content"
        android:layout_marginTop="39dp" >
            </ListView>
    </RelativeLayout>


11.    Setelah selesai kemudian kita beri source code pada MainActivity.java seperti berikut












Source Code :
package com.example.fingerstyleguitar2;

import android.os.Bundle;
import android.view.Menu;
import android.app.ListActivity;
import android.graphics.Color;
import android.view.View;
import android.content.Intent;
import android.widget.*;


public class MainActivity extends ListActivity{

@Override
protected void onCreate(Bundle savedInstanceState) {
super.onCreate(savedInstanceState);

String[] Menu2= new String[] {"Canon Rock", "Heal The World", "Hey Jude", "Lagu Galau", "Tinggal Kenangan", "Exit"};
this.setListAdapter(new ArrayAdapter<String>(this,android.R.layout.simple_list_item_single_choice , Menu2));
getListView().setBackgroundResource(R.drawable.gg9);
}



protected void onListItemClick(ListView l, View v, int position,long id){
            Object o=this.getListAdapter().getItem(position);
            String Keyw=o.toString();
            Toast.makeText(this, "Anda Memilih " + Keyw, Toast.LENGTH_LONG).show();
      if (o=="Canon Rock"){
         Intent intent= new Intent (this, canon.class);
         startActivity(intent);
      } else if (o=="Heal The World"){
          Intent intent= new Intent (this, heal.class);
          startActivity(intent);
      } else if (o=="Hey Jude"){
          Intent intent= new Intent (this, hey.class);
          startActivity(intent);
      } else if (o=="Lagu Galau"){
          Intent intent= new Intent (this, galau.class);
          startActivity(intent);
      } else if (o=="Tinggal Kenangan"){
          Intent intent= new Intent (this, kenangan.class);
          startActivity(intent);   
      } else if (o=="Exit")
              this.finish();
}}

 Kodingan else if disini berfungsi untuk menghubungkan activity ini dengan activity selanjutnya 


12. Disini saya akan membuat tiga activity lagi, dengan cara klik project yang dibuat (contoh : klik Finger Style Guitaràsrc, kemudian klikkanan pada com.example.fingerstyleguitar,pilih NewàOtheràAndroid 1.  ActivityàNext, maka akan muncul activity baru, activity ini saya beri nama Canon/Canon.java dan akan muncul activity_peta.xml seperti gambar dibawah ini :





















13.    Berikut adalah Screen Shoot dan Source Code nya :
      Screen Shot Activity_canon.xml :











Source Code :
<?xml version="1.0" encoding="utf-8"?>
<RelativeLayout xmlns:android="http://schemas.android.com/apk/res/android"
    android:layout_width="fill_parent"
    android:layout_height="fill_parent"
    android:background="@drawable/gg6"
    android:gravity="center"
    android:orientation="vertical" >

    <Button
        android:id="@+id/canon"
        android:layout_width="fill_parent"
        android:layout_height="wrap_content"
        android:textColor="#ffffff"
        android:text="Canon Rock" />
     
</RelativeLayout>

14.   Screen Shoot & Sorce Code pada Canon.java :





Source Code :
package com.example.fingerstyleguitar2;

import android.app.Activity;
import android.media.MediaPlayer;
import android.os.Bundle;
import android.view.View;
import android.view.View.OnClickListener;
import android.widget.Button;
import android.widget.Toast;

import com.example.fingerstyleguitar2.canon;

public class canon extends Activity {
    private static final String isPlaying = "Media is Playing";

      private MediaPlayer player;
        private Button canon;
      
  /** Called when the activity is first created. */
  @Override
  public void onCreate(Bundle savedInstanceState) {
      super.onCreate(savedInstanceState);
      setContentView(R.layout.canon);
   // Get the button from the view
      canon = (Button) this.findViewById(R.id.canon);
      canon.setOnClickListener(new OnClickListener() {
    
                @Override
                public void onClick(View arg0) {
                    // TODO Auto-generated method stub
                    playSound(1);
    
                }
            });
                     }
    
        @Override
        public void onPause() {
            try{
            super.onPause();
            player.pause();
            }catch (Exception e){
    
            }
        }
    
        private void playSound(int arg){
            try{
                if (player.isPlaying()) {
                    player.stop();
                    player.release();
                }
            }catch(Exception e){

            }
            if (arg == 1){
    
                Toast.makeText(this, isPlaying+" Canon Rock", Toast.LENGTH_LONG).show();
                player = MediaPlayer.create(this, R.raw.cr1);
    
            }
            player.setLooping(false); // Set looping
            player.start();
        }
}


15.   Untuk empat activity lagi saya buat caranya sama dengan membuat activity Canon/Canon.java

16. Setelah selesai membuat activity, buat source code pada
      AndroidManifest.xmlseperti berkut
















Source Code :
<?xml version="1.0" encoding="utf-8"?>
<manifest xmlns:android="http://schemas.android.com/apk/res/android"
    package="com.example.fingerstyleguitar2"
    android:versionCode="1"
    android:versionName="1.0" >

    <uses-sdk
        android:minSdkVersion="8"
        android:targetSdkVersion="17" />

    <application
        android:allowBackup="true"
        android:icon="@drawable/ic_launcher"
        android:label="@string/app_name"
        android:theme="@style/AppTheme" >
        <activity
            android:name="com.example.fingerstyleguitar2.MainActivity"
            android:label="@string/app_name" >
            <intent-filter>
                <action android:name="android.intent.action.MAIN" />

                <category android:name="android.intent.category.LAUNCHER" />
            </intent-filter>
        </activity>
        <activity
            android:name="com.example.fingerstyleguitar2.canon"
            android:label="@string/app_name" >
            </activity>
            <activity
            android:name="com.example.fingerstyleguitar2.heal"
            android:label="@string/app_name" >
            </activity>
            <activity
            android:name="com.example.fingerstyleguitar2.hey"
            android:label="@string/app_name" >
            </activity>
            <activity
            android:name="com.example.fingerstyleguitar2.galau"
            android:label="@string/app_name" >
            </activity>
            <activity
            android:name="com.example.fingerstyleguitar2.kenangan"
            android:label="@string/app_name" >
            </activity>
    </application>

</manifest>


17.   Kemudian buat Android Virtual Device Manager, dengan cara di bawah ini















18.   Pembuatan aplikasi selesai, setelah selesai run aplikasi dengan cara klik kanan pada project RunAsàRun Configurationmaka hasilnya akan tampil seperti dibawah ini