| Finally m_Client.Close() End Try Return atemp ''''Console.WriteLine("检查完毕。。") End Function
''''超时后强制结束网络等待。 Private Sub t_Elapsed(ByVal sender As Object, ByVal e As System.Timers.ElapsedEventArgs) Handles t.Elapsed ''''Console.WriteLine("关闭。。") m_Client.Close() t.Dispose() End Sub End Class
Public Class SqlServer ''''sql server解析类 '''' ''''因为返回的字符串类似 name1;value1;name2;value2;name3;value3; .... ''''而且不固定长度 ''''所以这里用NameValueCollection返回。
上一页 [1] [2] [3] [4] [5] [6] 下一页 |