Sub UpdateWOTable()
'Open DB connection
Dim cnx As ADODB.Connection
Dim rst As New ADODB.Recordset
Dim strsql, SO, ItemGrp As String
Dim date_print As Date
Dim date_finish As Date
Dim date_proof As Date
Dim nb_poses, qty_proof, stock_proof, stock_pvc, qty_pvc...