Advertisement
Guest User

Untitled

a guest
Dec 19th, 2014
157
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.84 KB | None | 0 0
  1. waiting = True
  2. TableGetterThread.RunWorkerAsync(New tableInfo(tablename, filter))
  3. While waiting
  4. Me.Refresh()
  5. Threading.Thread.Sleep(100)
  6. End While
  7.  
  8. Private Sub TableGetterThread_DoWork(sender As Object, e As System.ComponentModel.DoWorkEventArgs) Handles TableGetterThread.DoWork
  9. Dim user As String = "username"
  10. Dim pass As String = "password"
  11. getTable_Table = Nothing
  12. getTable_Table = bromcomReader.getEntityData(e.Argument.tablename, e.Argument.Filter, user, pass).Tables(0)
  13. getTable_Table.TableName = e.Argument.tablename
  14. Console.WriteLine("FinishedDoWork")
  15. End Sub
  16.  
  17. Private Sub TableGetterThread_RunWorkerCompleted(sender As Object, e As System.ComponentModel.RunWorkerCompletedEventArgs) Handles TableGetterThread.RunWorkerCompleted
  18. Console.WriteLine("Completed")
  19. waiting = False
  20. End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement