学步园

                '以追加模式打开记录文件

                Dim error1 As TextWriter = New StreamWriter("d:/error.log", True)

                error1.WriteLine("{0}试图以{1}登录时间{2}", user, pwd, DateTime.Now)

                error1.Close()