Public Class frmstock
Dim ds As DataSet
Dim da As SqlDataAdapter
Dim con As SqlConnection
Private Sub updatestock()
'
da = New SqlDataAdapter("UPDATE tblcodeall SET Stock = Stock - '" & CDbl(txtQuantity.Text.Trim) & "' WHERE Codeid = '" & ComboBox1.SelectedValue.ToString() & "'", sqlcon)
'End If
Exit Sub
End Sub
ตารางค่า Min 50 ตารางค่า max 90 ตารางค่า stock 70
มือใหม่หัดเขียนครับขอบคุณครับ
Tag : .NET, Ms SQL Server 2012, Win (Windows App), VB.NET, VS 2012 (.NET 4.x), Windows
da = New SqlDataAdapter("UPDATE tblcodeall SET Stock = Stock - '" & CDbl(txtQuantity.Text.Trim) & "' WHERE Codeid = '" & ComboBox1.SelectedValue.ToString() & "'", sqlcon)
End Sub
อันนี้ผมให้มันโชว์ใน Datagrid อีกตารางครับ
ds = New DataSet
da = New SqlDataAdapter("SELECT * FROM tblcodeall WHERE Stock < Min", sqlcon)
da.Fill(ds, "tblcodeall")
DataGridView1.DataSource = ds.Tables("tblcodeall")
คือผมจะเอา Select และ If ไปใส่ตรงใหนครับ คือตอนนี้ผมทำได้แค่ เพิ่ม ลบ แก้ไข ยังไส่ if
คือผมเข้าใจแบบบนี้ถูกเปล่าครับ
Dim i As Integer
If i < Min Then
เบิกเกินค่า min กำหนด
End If