Oo, meron akong isang simpleng sistema na gawa sa Visual Basic .NET at nagtatrabaho sa MySQL database. Ito ay isang sistema ng inventory management. Ang mga features nito ay ang sumusunod:
1. Pagpaparehistro at pag-login ng mga gumagamit
2. Pagdagdag, pagbabago, at pagtanggal ng mga produkto sa inventory
3. Pagpapakita ng listahan ng mga produkto sa inventory
4. Pagse-search ng mga produkto batay sa kategorya, pangalan, at iba pang mga detalye
5. Pagbebenta ng produkto at pagbibilang ng mga natirang stock
6. Pagpapakita ng mga transaksiyon sa bawat produkto
Narito ang ilang bahagi ng code para sa sistema:
1. Pagpaparehistro ng mga gumagamit:
Code:
vb.net
Dim conn As New MySqlConnection("server=localhost;userid=root;password=root;database=inventorydb")
Dim cmd As New MySqlCommand
Dim sql As String
sql = "INSERT INTO users (username, password) VALUES (@username, @password)"
cmd.Connection = conn
cmd.CommandText = sql
cmd.Parameters.AddWithValue("@username", txtUsername.Text)
cmd.Parameters.AddWithValue("@password", txtPassword.Text)
conn.Open()
cmd.ExecuteNonQuery()
conn.Close()
2. Pag-login ng mga gumagamit:
Code:
vb.net
Dim conn As New MySqlConnection("server=localhost;userid=root;password=root;database=inventorydb")
Dim cmd As New MySqlCommand
Dim sql As String
Dim password As String
sql = "SELECT password FROM users WHERE username = @username"
cmd.Connection = conn
cmd.CommandText = sql
cmd.Parameters.AddWithValue("@username", txtUsername.Text)
conn.Open()
password = cmd.ExecuteScalar()
conn.Close()
If password = txtPassword.Text Then
' Login successful
Else
' Login failed
End If
3. Pagdagdag ng produkto sa inventory:
Code:
vb.net
Dim conn As New MySqlConnection("server=localhost;userid=root;password=root;database=inventorydb")
Dim cmd As New MySqlCommand
Dim sql As String
sql = "INSERT INTO products (name, category, price, quantity) VALUES (@name, @category, @price, @quantity)"
cmd.Connection = conn
cmd.CommandText = sql
cmd.Parameters.AddWithValue("@name", txtProductName.Text)
cmd.Parameters.AddWithValue("@category", cboCategory.SelectedItem)
cmd.Parameters.AddWithValue("@price", txtPrice.Text)
cmd.Parameters.AddWithValue("@quantity", txtQuantity.Text)
conn.Open()
cmd.ExecuteNonQuery()
conn.Close()
4. Pagpapakita ng listahan ng mga produkto sa inventory:
Code:
vb.net
Dim conn As New MySqlConnection("server=localhost;userid=root;password=root;database=inventorydb")
Dim cmd As New MySqlCommand
Dim sql As String
Dim adapter As New MySqlDataAdapter
Dim table As New DataTable
sql = "SELECT * FROM products"
cmd.Connection = conn
cmd.CommandText = sql
adapter.SelectCommand = cmd
adapter.Fill(table)
DataGridView1.DataSource = table
Ito ay ilan lamang sa mga bahagi ng code na makakatulong sa iyo sa pagbuo ng isang simpleng sistema ng inventory management gamit ang Visual Basic .NET at MySQL database. Mangyaring tandaan na ito ay isang simpleng halimbawa lamang at kailangan mong i-customize ito sa iyong sariling mga pangangailangan.