Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Add your voice to the tech community where 5M+ people, just like you, are talking about what matters.
If rec7.State = adStateOpen Then rec7.MoveFirst i = 1 Do While Not rec7.EOF esql = "SELECT ProgressSetback, Month, Fiscal from tblOrgMonthlyProgressSetbacks where PIID = " & MSFlexGrid1.TextMatrix(i, 4) & " And MonthlyID = " & MonthlyID & " And Month = " & SelectedMonth & " And Fiscal = " & Fiscal rec9.CursorType = adOpenStatic rec9.CursorLocation = adUseClient rec9.LockType = adLockOptimistic rec9.Open esql, conn, , , adCmdText If rec9.EOF = True And rec9.BOF = True Then If MSFlexGrid1.TextMatrix(i, 10) <> "" Then rec9.AddNew rec9!AgencyID = AgencyID rec9!PIID = MSFlexGrid1.TextMatrix(i, 10) rec9!MonthlyID = MonthlyID rec9!ProgressSetback = MSFlexGrid1.TextMatrix(i, 10) rec9!Month = SelectedMonth rec9!Fiscal = Fiscal rec9.Close End If End If If rec9!ProgressSetback <> "" Then rec9!ProgressSetback = MSFlexGrid1.TextMatrix(i, 10) rec9.Close End If i = i + 1 rec7.MoveNext Loop End If
|How to add contact name to VBA code to automate emails in outlook using a Template||11||89|
|Excel - Save a copy of work book||13||89|
|I need help embedding an image as HTML in my vb.net application||3||73|
|Fastest way to find and count same items VB6||16||26|