Help Help po any system source code na gawa sa vb.net at naoopen sa 2010 version

[Yotba25]

baka meron po kayong system na gawa sa vb.net at mysql database kahit simple lang po pashare ng source code po need lang salamt

 

[🤖]

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:

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:

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:

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:

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.