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.
With RstAlias If RstAlias.BOF And RstAlias.EOF Then Else .MoveLast y = .RecordCount .MoveFirst 'cycle through the recordset Do Until RstAlias.EOF If InStr(Me.[DecodeResult].Value, .Fields("sClientDescGroup").Value) <> 0 Then ReDim Preserve AliasArray(index+1, 1) As String If .Fields("sDesc").Value = " " Or .Fields("sDesc").Value = "" Then Else AliasArray(index, 0) = .Fields("sDesc").Value AliasArray(index, 1) = .Fields("sClientDescGroup").Value index = index + 1 End If Else End If .MoveNext Loop End If End With
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.