Advertisement
Aveneid

Untitled

Dec 27th, 2020
1,689
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.   Sub updateDataView()
  2.  
  3.         Select Case currentSet
  4.             Case "items"
  5.                 cmd = New SqlCeCommand("SELECT items.id,items.name,items.price,categories.name from items inner join categories on items.category = categories.id", con)
  6.             Case "clients"
  7.                 cmd = New SqlCeCommand("select id,name,phone,identificator from Clients", con)
  8.             Case "receipts"
  9.                 cmd = New SqlCeCommand("select clients.name,receipt_id,date from receipts inner join clients on clients.id = receipts.client_id", con)
  10.         End Select
  11.         If con.State = ConnectionState.Closed Then con.Open()
  12.         myDA = New SqlCeDataAdapter(cmd)
  13.         myDataSet = New DataSet()
  14.         If myDataSet.Tables.Count > 0 Then
  15.             myDA.Fill(myDataSet, currentSet)
  16.             MainGridView.DataSource = myDataSet.Tables(currentSet).DefaultView
  17.         End If
  18.  
  19.         con.Close()
  20.         MainGridView.Focus()
  21.     End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement