摘要： Public Sub answerAdd(ByVal username As String) Dim tmpObj As Object = HttpContext.Current.Application(getAppName()) HttpContext.Current.Application.Lock() '判断存值含有当... 阅读全文