25-11-18, 01:26 AM
PHP كود :
If Conn.State = ConnectionState.Closed Then
Conn.Open()
End If
Dim cmd As New OleDb.OleDbCommand
cmd.Connection = Conn
cmd.CommandType = CommandType.Text
cmd.CommandText = "update buy set qun =@qun where id=@id"
cmd.Parameters.AddWithValue("@qun", textcount.Text)
cmd.Parameters.AddWithValue("@id", Textid.Text)
cmd.ExecuteScalar()
Conn.Close()
