以追加模式打开记录文件

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

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

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

error1.Close()