Hi,
While running the code progress bar is not showing.... please help
While running the code progress bar is not showing.... please help
progress dialog not showing:
SQL1.ExecNonQuery("delete from TAB_TEAM ")
L= a.Query("select * from FSH WHERE LC = "& empid &"") 'LC = " & empid & " ' changed on 18th july
ProgressDialogShow("Wait......")
For i = 1 To L.Size -1
Dim MyRecord As String=L.Get(i)
MyRecord=MyRecord.Replace("[","").Replace("]","") 'get rid of brackets in each record
Dim strRecArray() As String
strRecArray=Regex.Split(",",MyRecord)
SQL1.ExecNonQuery2("INSERT INTO TAB_TEAM VALUES(?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)", strRecArray)
Next